MVR5
I%loadR6#'%%pathG%'stringG6$%%tempG%-warning_flagG6"F+C.-%'printfG6#QjpThis~Map
le~coastal~point~database~was~created~by~Vince~Costanzo~while~at~Villanova~Univ
ersity.|+F+-F.6#QcqThe~coastal~points~were~obtained~from~US~Geological~Survey~d
ata~at~http://rimmer.ngdc.noaa.gov/coast/.|+|+F+-%*unprotectG6#.%/coastal_point
sG@%0F7F8C%>8$F8>8%%%trueG>F8F7>F?%&falseG-F.6#QDLoading,~please~be~patient~.~.
~.~|+|+F+A9$@$/F8F7C%@$0F=.F=>F8F=-%(protectGF6-%&ERRORG6#-%$catG6$FH%D~does~no
t~a~coastal~point~database.G@$F?C$-%(WARNINGG6#Q]pa~database~was~already~loaded
~this~session.~~Previous~database~erased~from~memory.F+-F.6#Q"|+F+FP-F.6#-FV6$Q
CDatabase~successfully~loaded~from~F+FH-F.6$Q.~(%d~points)|+F+-%%nopsG6#F8-%'RE
TURNG6#%%NULLGF+FfoF+F+,
I(extractRF$60F)%&temp2G%#iiG%,skip_factorG%$llrG%(min_lonG%(max_lonG%(min_latG
%(max_latG%*sub_rangeG%(size_srG%$optG%&optidG%)optvalueGF+F+C>F-F1@$FJ-FS6#%^p
a~coastal~point~database~has~not~been~loaded~this~session.~~Use~the~"load"~comm
and.G>8'""">8(-%&evalfG6#7$;,$%#PiG!""F[r;,$F[r#F\r""#,$F[r#FbqF`r@$2""$9#-FS6#
%3too~many~argumentsG@$2FfrF`r-FS6#%Sat~least~one~of~skip=~or~lonlat=~must~be~s
pecifiedG?(8&F`rFbqFfrF@C$>8/&9"6#F`s@%-%%typeG6$Fcs/%'symbolG%)anythingGC%>80-
%#opG6$FbqFcs>81-Fbt6$F`rFcs@'/F`t.%'lonlatG@%-Fis6$Fet-%%listG6#%&rangeG@%/-Fe
o6#FetF`r>FdqFet-FS6#%\prange~must~be~specified~in~the~form~lonlat~=~[min_lon..
max_lon,~min_lat..max_lat]GFhu/F`t.%%skipG@%3-Fis6$Fet%(integerG2""!Fet>FaqFet-
FS6#%Bskip~value~must~be~a~whole~numberG-FS6$%/unknown~optionGFcs-FS6#%Soptions
~must~be~specified~in~the~form~option=valueG>8)-Ffq6#-Fbt6$Fbq-Fbt6$FbqFdq>8*-F
fq6#-Fbt6$F`rFew>8+-Ffq6#-Fbt6$Fbq-Fbt6$F`rFdq>8,-Ffq6#-Fbt6$F`rFcx>F=-Ffq6#F[r
@&52FhwF`w2FfxF^x-FS6#%9range~must~be~increasingG5552F`w,$F=F\r2F=Fhw2F^x,$F=$!
"&F\r2,$F=$""&F\rFfx-FS6#%\prange~must~lie~within~[-Pi..Pi,-Pi/2..Pi/2]~=~[-180
*deg..180*deg,-90*deg..90*deg]G@$4/-%*substringG6$FH;!"#F\rQ#.mF+C$-Ffn6#Q[ofil
e~extension~should~be~.m~to~optimize~file~size~and~load~time.F+Fin-F.6#QCWorkin
g,~please~be~patient~.~.~.|+|+F+>8.-%&floorG6#*&FdoFbqFaqF\r>8--%$seqG6$,&*&F`s
FbqFaqFbqFbqFbqFbq/F`s;Fdv,&Fg[lFbqF\rFbq>F=7#-F_\l6$-%#ifG6%3331&&F8Ffs6#FbqFh
w1F`wFa]l1&Fb]l6#F`rFfx1F^xFf]lFb]lFjo/F`sF]\lF4>F?F8>F8F=B6$F8FH>F8F?FP-F.6#-F
V6$Q@Database~successfully~saved~to~F+FH-F.6%Q8~(%d~points~=~%2.1f%%)|+F+-Feo6#
F=,$*&Fg^lFbqFdoF\r"$+"FgoF+FfoF+F+,
I(mapplotR6#'%"fG%)operatorG6D%#ppG%#gpG%(check_fG%%initG%-read_optionsG%.proce
ss_rangeG%*plot_gratGF_p%(grat_onG%)coast_onG%'grat_cGFap%#ccG%#psG%#msGFhpFipF
jp%)x_coordsG%)y_coordsG%'sampleG%+sample_cntGFbpFcpFdpFep%+view_rangeG%"gG%"hG
%'startiG%&stopiG%$parG%$merG%)imageptsGF+F+C9@$0-Feo6#7#-Fbt6$Fbq-%%evalG6#FHF
`r-FS6#%Nfunction~f~must~have~two~arguments~(lon,lat).G@$0-Feo6#7#-FH6$.%$latG.
%$lonGF`r-FS6#%\ofunction~f~must~return~an~ordered~pair~(enclosed~in~parenthese
s).G>Fg[l%%greyG>FcsFeq>F`t%&blackG>FfxF@>F]\lF@>F?Fjo>F=Fjo>Fet-Ffq6#,$F[r#Fbq
"#=>82-Ffq6#,$F[r#Fbq""*@$2FbqFfr?(F^xF`rFbqFfrF@C%>83&Fes6#F^x@%4-Fis6$FcdlF[t
-FS6$%6Invalid~option~formatGFcdlC$>84-Fbt6$FbqFcdl>85-Fbt6$F`rFcdl@1/F_el.%,co
ast_colorG>F`tFcel/F_elFjt@%-Fis6$FcelF_u@%/-Feo6#FcelF`r>FcsFcelFhuFhu/F_el.%0
graticule_colorG>Fg[lFcel/F_el.%*graticuleG@%30Fcel.%#ONG0Fcel.%$OFFG-FS6$%MInv
alid~graticule~option~(must~be~ON~or~OFF)GFcdl>Ffx-%&evalbG6#/FcelF^gl/F_el.%1p
arallel_spacingG@%-Fis6$Fcel%)constantG>Fet-FfqFbfl-FS6$%Fnonnumeric~value~for~
parallel_spacingGFcel/F_el.%1meridian_spacingG@%F_hl>FhclFchl-FS6$%Fnonnumeric~
value~for~meridian_spacingGFcel/F_el.%&coastG@%F\gl-FS6$%IInvalid~coast~option~
(must~be~ON~or~OFF)GFcdl>F]\lFggl-FS6$%/Unknown~optionGFcdl@$F]\l@$FJF]q>8:-Ffq
6#-Fbt6$FbqFat>8;-Ffq6#-Fbt6$F`rFat>8<-Ffq6#-Fbt6$FbqFft>8=-Ffq6#-Fbt6$F`rFft@&
52FcjlF]jl2F_[mFijlFby5552F]jl,$F\yF\r2F\yFcjl2Fijl,$F\yF]z2,$F\yFazF_[mFcz>8?-
%(unapplyG6%-Fbt6$Fbq7#-FH6$.%"xG.%"yGF\]mF^]m>8@-Fe\m6%-Fbt6$F`rFi\mF\]mF^]m@$
FfxC)>8A-%%ceilG6#*&F]jlFbqFhclF\r>8B-Fi[l6#*&FcjlFbqFhclF\r>8D-F_\l6$-%%plotG6
&7%-Fc\m6$*&F^xFbqFhclFbqF_]m-Fa]mF\_m/F_]m;FijlF_[m/%(scalingG%,constrainedG/%
%axesG%%NONEG/%&colorGFg[l/F^x;Fi]mF_^m>Fi]m-F[^m6#*&FijlFbqFetF\r>F_^m-Fi[l6#*
&F_[mFbqFetF\r>8C-F_\l6$-Fh^m6&7%-Fc\m6$F]]m*&F^xFbqFetFbq-Fa]mF[am/F]]m;F]jlFc
jlFa_mFd_mFg_mFi_m>F?-&%&plotsG6#%(displayG6$Fd`mFd^m@$F]\lC$>8E7#-F_\l6$-F[]l6
%3331&&F8FedlFc]lFcjl1F]jlFdbm1&FebmFg]lF_[m1FijlFhbm7$-Fc\m6$FdbmFhbm-Fa]mF\cm
Fjo/F^x;FbqFdo>F=-&Fcam6#%*pointplotG6'FjamFd_m/F\t%&POINTG/Fb_m%,CONSTRAINEDG/
Fh_mF`t-Fbam6$F?F=F+F+F+F+,
I*mapplot3dRF^_l6DFc_lFd_l%#spGFe_lFf_lFg_lFh_lFi_lF_pFj_lF[`l%(surf_onGF\`lFap
F]`l%'surf_cG%"tGF^`lF_`lFhpFipFjpFe`lFf`l%"qGFg`lFh`lFi`lFj`lFbpFcpFdpFepF[alF
+F+C>@$F^alFgal@$0F\blFer-FS6#%^ofunction~f~must~return~an~ordered~triple~(encl
osed~in~parentheses).G>F`tFibl>FhclF\cl>Fcdl%&whiteG>F]\lF@>Fg[lF@>FcsF@>F?Fjo>
F=Fjo>F`sFjo>FcelFbcl>86Ficl>FetFeq@$F_dl?(FfxF`rFbqFfrF@C%>87&Fes6#Ffx@%4-Fis6
$F^fmF[t-FS6$F\elF^fmC$>88-Fbt6$FbqF^fm>89-Fbt6$F`rF^fm@5/FifmFhel>FhclF]gm/Fif
mFefl>F`tF]gm/FifmFifl@%30F]gmF^gl0F]gmFagl-FS6$%Minvalid~graticule~option~(mus
t~be~ON~or~OFF)GF^fm>F]\l-Fhgl6#/F]gmF^gl/FifmF\hl@%-Fis6$F]gmFahl>Fcel-Ffq6#F]
gm-FS6$FfhlF]gm/FifmFhhl@%Fchm>FhemFfhm-FS6$F^ilF]gm/Fifm.%.surface_colorG>Fcdl
F]gm/FifmF`il@%Fggm-FS6$%Iinvalid~coast~option~(must~be~ON~or~OFF)GF^fm>Fg[lF^h
m/Fifm.%(surfaceG@%Fggm-FS6$%Kinvalid~surface~option~(must~be~ON~or~OFF)GF^fm>F
csF^hm/FifmFjt@%-Fis6$F]gmF_u@%/-FeoFghmF`r>FetF]gmFhuFhu-FS6$FiilF^fm@$Fg[l@$F
JF]q>Fi]m-Ffq6#-Fbt6$Fbq-Fbt6$FbqFet>F_^m-Ffq6#-Fbt6$F`rFb[n>Fd`m-Ffq6#-Fbt6$Fb
q-Fbt6$F`rFet>Fd^m-Ffq6#-Fbt6$F`rF^\n@&52F_^mFi]m2Fd^mFd`mFby5552Fi]mF\\m2F\yF_
^m2Fd`mF_\m2Fa\mFd^mFcz>F]jlFd\m>FcjlFb]m>Fijl-Fe\m6%-Fbt6$FerFi\mF\]mF^]m@$F]\
lC)>F_[m-F[^m6#*&Fi]mFbqFhemF\r>8>-Fi[l6#*&F_^mFbqFhemF\r>Fa]m-F_\l6$-&Fcam6#%+
spacecurveG6'7%-F]jl6$*&FfxFbqFhemFbqF_]m-FcjlF\_n-FijlF\_n/F_]m;Fd`mFd^mFa_mFd
_mFjcm/Ffx;F_[mF^^n>F_[m-F[^m6#*&Fd`mFbqFcelF\r>F^^n-Fi[l6#*&Fd^mFbqFcelF\r>Fc\
m-F_\l6$-Ff^n6'7%-F]jl6$F]]m*&FfxFbqFcelFbq-FcjlFc`n-FijlFc`n/F]]mFj_mFa_mFd_mF
jcmFb_n>F?-Fbam6$Fc\mFa]m@$Fg[lC$>Fjam7#-F_\l6$-F[]l6%3331&&F8F`fmFc]lF_^m1Fi]m
Fgan1&FhanFg]lFd^m1Fd`mF[bn7%-F]jl6$FganF[bn-FcjlF_bn-FijlF_bnFjo/FfxF_cm>F=-&F
cam6#%,pointplot3dG6'FjamFd_mFfcmFhcm/Fh_mFhcl@$Fcs>F`s-%'plot3dG6+7%,$-F]jl6$F
dblFbbl$"$***!"$,$-FcjlFbcnFccn,$-FijlFbcnFccn/FdblFj_m/FbblFa_nFd_mFfcmFhcm/Fh
_mFcdl/%&styleG%,PATCHNOGRIDG/%+projectionG%+ORTHOGONALG-Fbam6%F?F=F`sF+F+F+F+,
I$deg$"+_#H`u"!#6F+
