0001 function VMT_MeanXS2GE_3D(A,V,pathstr,filestr,vscale,voffset)
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012 gex = nanmean(V.mcsX,1);
0013 gey = nanmean(V.mcsY,1);
0014 gez = vscale.*(voffset-V.mcsBed);
0015 utmzonemat = repmat(A(1).Comp.utmzone(2,:),size(gex'));
0016 [mcslat,mcslon] = utm2deg(gex',gey',utmzonemat);
0017 if ~isempty(pathstr)
0018 outfile = [pathstr '\' filestr(1:end-4)];
0019 else
0020 outfile = [filestr(1:end-4)];
0021 end
0022 GEplot_3D(outfile,mcslat,mcslon,gez);
0023 eval(['!' outfile '.kmz'])