VMT_PlotShorelineFilled

PURPOSE ^

Plots a shoreline map given the shoreline data structure 'Map' (see

SYNOPSIS ^

function VMT_PlotShorelineFilled(Map)

DESCRIPTION ^

 Plots a shoreline map given the shoreline data structure 'Map' (see
 VMT_LoadMap.m) on the current map

 Shoreline is is filled with channel cutout in this version. 

 See Also: VMT_PlotShoreline

 P.R. Jackson, 12-9-08

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function VMT_PlotShorelineFilled(Map)
0002 % Plots a shoreline map given the shoreline data structure 'Map' (see
0003 % VMT_LoadMap.m) on the current map
0004 %
0005 % Shoreline is is filled with channel cutout in this version.
0006 %
0007 % See Also: VMT_PlotShoreline
0008 %
0009 % P.R. Jackson, 12-9-08
0010 
0011 brks = find(Map.UTMe == -9999);
0012 
0013 for i = 1:length(brks)+1
0014     if i == 1
0015         ll = 1;
0016         if ~isempty(brks)
0017             ul = brks(i)-1;
0018         else
0019             ul = length(Map.UTMe);
0020         end
0021         indx =ll:ul;
0022         figure(gcf); hold on 
0023         patch(Map.UTMe(indx),Map.UTMn(indx),'k','EdgeColor',[0.706 0.706 0.573],'LineWidth',1); hold on
0024     elseif i == length(brks)+1
0025         ll = brks(i-1)+1;
0026         ul = length(Map.UTMe);
0027         indx =ll:ul;
0028         figure(gcf); hold on 
0029         patch(Map.UTMe(indx),Map.UTMn(indx),[0.8,0.733,0.533],'EdgeColor',[0.706 0.706 0.573],'LineWidth',1); hold on
0030     elseif i > 1 & i < length(brks)+1
0031         ll = brks(i-1)+1;
0032         ul = brks(i)-1;
0033         indx =ll:ul;
0034         figure(gcf); hold on 
0035         patch(Map.UTMe(indx),Map.UTMn(indx),[0.8,0.733,0.533],'EdgeColor',[0.706 0.706 0.573],'LineWidth',1); hold on
0036     end   
0037 end
0038 %xlabel('UTM Easting (m)')
0039 %ylabel('UTM Northing (m)')
0040 set(gca,'DataAspectRatio',[1 1 1],'PlotBoxAspectRatio',[1 1 1])

Generated on Thu 21-Aug-2014 10:40:31 by m2html © 2005