tidal_ellipse.ps

Ellipes Parameters Conversion and Velocity Profiles for tidal Curremts in Matlab

%!PS-Adobe-2.0
%%Creator: dvipsk 5.58f Copyright 1986, 1994 Radical Eye Software
%%Title: tidal_ellipse.dvi
%%Pages: 28
%%PageOrder: Ascend
%%BoundingBox: 0 0 612 792
%%DocumentPaperSizes: Letter
%%EndComments
%DVIPSCommandLine: dvips tidal_ellipse.dvi -o
%DVIPSParameters: dpi=300, comments removed
%DVIPSSource:  TeX output 2002.10.16:1843
%%BeginProcSet: tex.pro
/TeXDict 250 dict def TeXDict begin /N{def}def /B{bind def}N /S{exch}N
/X{S N}B /TR{translate}N /isls false N /vsize 11 72 mul N /hsize 8.5 72
mul N /landplus90{false}def /@rigin{isls{[0 landplus90{1 -1}{-1 1}
ifelse 0 0 0]concat}if 72 Resolution div 72 VResolution div neg scale
isls{landplus90{VResolution 72 div vsize mul 0 exch}{Resolution -72 div
hsize mul 0}ifelse TR}if Resolution VResolution vsize -72 div 1 add mul
TR[matrix currentmatrix{dup dup round sub abs 0.00001 lt{round}if}
forall round exch round exch]setmatrix}N /@landscape{/isls true N}B
/@manualfeed{statusdict /manualfeed true put}B /@copies{/#copies X}B
/FMat[1 0 0 -1 0 0]N /FBB[0 0 0 0]N /nn 0 N /IE 0 N /ctr 0 N /df-tail{
/nn 8 dict N nn begin /FontType 3 N /FontMatrix fntrx N /FontBBox FBB N
string /base X array /BitMaps X /BuildChar{CharBuilder}N /Encoding IE N
end dup{/foo setfont}2 array copy cvx N load 0 nn put /ctr 0 N[}B /df{
/sf 1 N /fntrx FMat N df-tail}B /dfs{div /sf X /fntrx[sf 0 0 sf neg 0 0]
N df-tail}B /E{pop nn dup definefont setfont}B /ch-width{ch-data dup
length 5 sub get}B /ch-height{ch-data dup length 4 sub get}B /ch-xoff{
128 ch-data dup length 3 sub get sub}B /ch-yoff{ch-data dup length 2 sub
get 127 sub}B /ch-dx{ch-data dup length 1 sub get}B /ch-image{ch-data
dup type /stringtype ne{ctr get /ctr ctr 1 add N}if}B /id 0 N /rw 0 N
/rc 0 N /gp 0 N /cp 0 N /G 0 N /sf 0 N /CharBuilder{save 3 1 roll S dup
/base get 2 index get S /BitMaps get S get /ch-data X pop /ctr 0 N ch-dx
0 ch-xoff ch-yoff ch-height sub ch-xoff ch-width add ch-yoff
setcachedevice ch-width ch-height true[1 0 0 -1 -.1 ch-xoff sub ch-yoff
.1 sub]{ch-image}imagemask restore}B /D{/cc X dup type /stringtype ne{]}
if nn /base get cc ctr put nn /BitMaps get S ctr S sf 1 ne{dup dup
length 1 sub dup 2 index S get sf div put}if put /ctr ctr 1 add N}B /I{
cc 1 add D}B /bop{userdict /bop-hook known{bop-hook}if /SI save N @rigin
0 0 moveto /V matrix currentmatrix dup 1 get dup mul exch 0 get dup mul
add .99 lt{/QV}{/RV}ifelse load def pop pop}N /eop{SI restore userdict
/eop-hook known{eop-hook}if showpage}N /@start{userdict /start-hook
known{start-hook}if pop /VResolution X /Resolution X 1000 div /DVImag X
/IE 256 array N 0 1 255{IE S 1 string dup 0 3 index put cvn put}for
65781.76 div /vsize X 65781.76 div /hsize X}N /p{show}N /RMat[1 0 0 -1 0
0]N /BDot 260 string N /rulex 0 N /ruley 0 N /v{/ruley X /rulex X V}B /V
{}B /RV statusdict begin /product where{pop product dup length 7 ge{0 7
getinterval dup(Display)eq exch 0 4 getinterval(NeXT)eq or}{pop false}
ifelse}{false}ifelse end{{gsave TR -.1 .1 TR 1 1 scale rulex ruley false
RMat{BDot}imagemask grestore}}{{gsave TR -.1 .1 TR rulex ruley scale 1 1
false RMat{BDot}imagemask grestore}}ifelse B /QV{gsave newpath transform
round exch round exch itransform moveto rulex 0 rlineto 0 ruley neg
rlineto rulex neg 0 rlineto fill grestore}B /a{moveto}B /delta 0 N /tail
{dup /delta X 0 rmoveto}B /M{S p delta add tail}B /b{S p tail}B /c{-4 M}
B /d{-3 M}B /e{-2 M}B /f{-1 M}B /g{0 M}B /h{1 M}B /i{2 M}B /j{3 M}B /k{
4 M}B /w{0 rmoveto}B /l{p -4 w}B /m{p -3 w}B /n{p -2 w}B /o{p -1 w}B /q{
p 1 w}B /r{p 2 w}B /s{p 3 w}B /t{p 4 w}B /x{0 S rmoveto}B /y{3 2 roll p
a}B /bos{/SS save N}B /eos{SS restore}B end
%%EndProcSet
%%BeginProcSet: special.pro
TeXDict begin /SDict 200 dict N SDict begin /@SpecialDefaults{/hs 612 N
/vs 792 N /ho 0 N /vo 0 N /hsc 1 N /vsc 1 N /ang 0 N /CLIP 0 N /rwiSeen
false N /rhiSeen false N /letter{}N /note{}N /a4{}N /legal{}N}B
/@scaleunit 100 N /@hscale{@scaleunit div /hsc X}B /@vscale{@scaleunit
div /vsc X}B /@hsize{/hs X /CLIP 1 N}B /@vsize{/vs X /CLIP 1 N}B /@clip{
/CLIP 2 N}B /@hoffset{/ho X}B /@voffset{/vo X}B /@angle{/ang X}B /@rwi{
10 div /rwi X /rwiSeen true N}B /@rhi{10 div /rhi X /rhiSeen true N}B
/@llx{/llx X}B /@lly{/lly X}B /@urx{/urx X}B /@ury{/ury X}B /magscale
true def end /@MacSetUp{userdict /md known{userdict /md get type
/dicttype eq{userdict begin md length 10 add md maxlength ge{/md md dup
length 20 add dict copy def}if end md begin /letter{}N /note{}N /legal{}
N /od{txpose 1 0 mtx defaultmatrix dtransform S atan/pa X newpath
clippath mark{transform{itransform moveto}}{transform{itransform lineto}
}{6 -2 roll transform 6 -2 roll transform 6 -2 roll transform{
itransform 6 2 roll itransform 6 2 roll itransform 6 2 roll curveto}}{{
closepath}}pathforall newpath counttomark array astore /gc xdf pop ct 39
0 put 10 fz 0 fs 2 F/|______Courier fnt invertflag{PaintBlack}if}N
/txpose{pxs pys scale ppr aload pop por{noflips{pop S neg S TR pop 1 -1
scale}if xflip yflip and{pop S neg S TR 180 rotate 1 -1 scale ppr 3 get
ppr 1 get neg sub neg ppr 2 get ppr 0 get neg sub neg TR}if xflip yflip
not and{pop S neg S TR pop 180 rotate ppr 3 get ppr 1 get neg sub neg 0
TR}if yflip xflip not and{ppr 1 get neg ppr 0 get neg TR}if}{noflips{TR
pop pop 270 rotate 1 -1 scale}if xflip yflip and{TR pop pop 90 rotate 1
-1 scale ppr 3 get ppr 1 get neg sub neg ppr 2 get ppr 0 get neg sub neg
TR}if xflip yflip not and{TR pop pop 90 rotate ppr 3 get ppr 1 get neg
sub neg 0 TR}if yflip xflip not and{TR pop pop 270 rotate ppr 2 get ppr
0 get neg sub neg 0 S TR}if}ifelse scaleby96{ppr aload pop 4 -1 roll add
2 div 3 1 roll add 2 div 2 copy TR .96 dup scale neg S neg S TR}if}N /cp
{pop pop showpage pm restore}N end}if}if}N /normalscale{Resolution 72
div VResolution 72 div neg scale magscale{DVImag dup scale}if 0 setgray}
N /psfts{S 65781.76 div N}N /startTexFig{/psf$SavedState save N userdict
maxlength dict begin /magscale true def normalscale currentpoint TR
/psf$ury psfts /psf$urx psfts /psf$lly psfts /psf$llx psfts /psf$y psfts
/psf$x psfts currentpoint /psf$cy X /psf$cx X /psf$sx psf$x psf$urx
psf$llx sub div N /psf$sy psf$y psf$ury psf$lly sub div N psf$sx psf$sy
scale psf$cx psf$sx div psf$llx sub psf$cy psf$sy div psf$ury sub TR
/showpage{}N /erasepage{}N /copypage{}N /p 3 def @MacSetUp}N /doclip{
psf$llx psf$lly psf$urx psf$ury currentpoint 6 2 roll newpath 4 copy 4 2
roll moveto 6 -1 roll S lineto S lineto S lineto closepath clip newpath
moveto}N /endTexFig{end psf$SavedState restore}N /@beginspecial{SDict
begin /SpecialSave save N gsave normalscale currentpoint TR
@SpecialDefaults count /ocount X /dcount countdictstack N}N /@setspecial
{CLIP 1 eq{newpath 0 0 moveto hs 0 rlineto 0 vs rlineto hs neg 0 rlineto
closepath clip}if ho vo TR hsc vsc scale ang rotate rwiSeen{rwi urx llx
sub div rhiSeen{rhi ury lly sub div}{dup}ifelse scale llx neg lly neg TR
}{rhiSeen{rhi ury lly sub div dup scale llx neg lly neg TR}if}ifelse
CLIP 2 eq{newpath llx lly moveto urx lly lineto urx ury lineto llx ury
lineto closepath clip}if /showpage{}N /erasepage{}N /copypage{}N newpath
}N /@endspecial{count ocount sub{pop}repeat countdictstack dcount sub{
end}repeat grestore SpecialSave restore end}N /@defspecial{SDict begin}
N /@fedspecial{end}B /li{lineto}B /rl{rlineto}B /rc{rcurveto}B /np{
/SaveX currentpoint /SaveY X N 1 setlinecap newpath}N /st{stroke SaveX
SaveY moveto}N /fil{fill SaveX SaveY moveto}N /ellipse{/endangle X
/startangle X /yrad X /xrad X /savematrix matrix currentmatrix N TR xrad
yrad scale 0 0 1 startangle endangle arc savematrix setmatrix}N end
%%EndProcSet
TeXDict begin 40258431 52099146 1000 300 300 (tidal_ellipse.dvi)
@start /Fa 79 125 df<60F0F0F0F0F0F0F0F0F0F0700000000060F0F0600414799312>
33 D<30187838FC38FC70FC70FC70FCE0FCE078E031C001C001C0038003800700070007
000E180E3C0E7E1C7E1C7E1C7E387E383C18180F1A7F9612>37 D<60F0F8781818183030
60C080050C799312>39 D<0180038006000C0018003800300070007000E000E000E000E0
00E000E000E000700070003000380018000C0006000380018009197B9612>I<80C06030
181C0C0E0E070707070707070E0E0C1C183060C08008197C9612>I<070007000700E738
FFF87FF01FC01FC07FF0FFF8E7380700070007000D0E7E9012>I<038003800380038003
800380FFFEFFFEFFFE0380038003800380038003800F0F7F9112>I<60F0F878183030E0
C00509798312>I<FFF8FFF8FFF80D037E8B12>I<60F0F0600404798312>I<0018003800
380070007000E000E001C001C001C003800380070007000E000E001C001C001C00380038
0070007000E000E000C0000D1A7E9612>I<07C00FE01C703838701C701CE00EE00EE00E
E00EE00EE00EE00EE01E701C701C38381C700FE007C00F147F9312>I<060006000E001E
00FE00EE000E000E000E000E000E000E000E000E000E000E000E000E00FFE0FFE00B147D
9312>I<0F803FC070E0E070E038E038403800380030007000E000C00180030006000C00
183830387FF87FF80D147E9312>I<0FC03FF07838701C201C001C0038007007E007F000
38001C000E000E400EE00EE01C78383FF00FC00F147F9312>I<00F001F0037003700670
0E700C701C70387038707070E070FFFEFFFE007000700070007003FE03FE0F147F9312>
I<7FF07FF07000700070007000700070007F807FE06070007000384038E038E038E07070
E03FC01F000D147E9312>I<01F007F80E1C181C381C70007000E7C0EFF0F838F01CE00E
E00EE00E700E700E301C38381FF007C00F147F9312>I<E000FFFEFFFEE018E038007000
E000C001C00380038007000700070007000E000E000E000E000E0004000F157F9412>I<
07C01FF03C78783C701C701C701C38380FE007C03C78701CE00EE00EE00EE00E701C783C
1FF00FE00F147F9312>I<07C01FF038387018E01CE00CE00EE00E701E383E1FEE0FCE00
0E001C001C7018703870F03FC00F800F147F9312>I<60F0F06000000000000060F0F060
040E798D12>I<60F0F06000000000000060F0F070303060C0800413798D12>I<00180078
00F801E007C00F801E003C00F800F000F8003C001E000F8007C001E000F8007800180D13
7E9312>I<FFFEFFFE7FFE0000000000007FFEFFFEFFFE0F097F8E12>I<C000F000F8003C
001F000F8003C001E000F8007800F801E003C00F801F003C00F800F000C0000D137E9312
>I<1FC07FF0F078E038403800F001E00380070007000700070000000000000000000600
0F000F0006000D147E9312>I<038007C007C006C006C00EE00EE00EE00EE00C601C701C
701C701FF01FF0383838383838FC7EFC7E0F147F9312>65 D<FFE0FFF03838381C381C38
1C381C383838783FF03FF8381C380E380E380E380E381E383CFFF8FFF00F147F9312>I<
03E60FFE1C3E381E700E700E600EE000E000E000E000E000E000600E700E700E381C1C38
0FF003E00F147F9312>I<FFC07FF038783838381C381C381E380E380E380E380E380E38
0E380E381C381C383838787FF0FFC00F147F9312>I<FFFEFFFE380E380E380E38003800
38E038E03FE03FE038E038E03800380E380E380E380EFFFEFFFE0F147F9312>I<FFFEFF
FE380E380E380E38003800387038703FF03FF03870387038003800380038003800FE00FE
000F147F9312>I<FC7EFC7E38383838383838383838383838383FF83FF8383838383838
3838383838383838FC7EFC7E0F147F9312>72 D<FFE0FFE00E000E000E000E000E000E00
0E000E000E000E000E000E000E000E000E000E00FFE0FFE00B147D9312>I<FC7EFC7E7C
7C745C76DC76DC76DC76DC76DC76DC77DC739C739C701C701C701C701C701CF83EF83E0F
147F9312>77 D<FEFEFEFE3E383A383B383B383B383B383B383B3839B839B839B839B839
B839B838B838F8FEF8FEF80F147F9312>I<3FE07FF07070E038E038E038E038E038E038
E038E038E038E038E038E038E038E03870707FF03FE00D147E9312>I<FFE0FFF8383C38
1C380E380E380E380E381C383C3FF83FE0380038003800380038003800FE00FE000F147F
9312>I<FF80FFE038F03878383838383838387838F03FE03FC038E03870387038703870
38773877FE3EFE1C10147F9312>82 D<1F303FF070F0E070E070E070E00070007F003FC0
0FE000F0007800386038E038E030F070FFE0CF800D147E9312>I<7FFEFFFEE38EE38EE3
8E03800380038003800380038003800380038003800380038003800FE00FE00F147F9312
>I<FE3F80FE3F80380E00380E00380E00380E00380E00380E00380E00380E00380E0038
0E00380E00380E00380E00380E001C1C000E380007F00003E0001114809312>I<FC7EFC
7E783C38383838383838381C701C701C701C700C600EE00EE00EE006C006C007C007C003
800F147F9312>I<F83EF83E701C701C701C701C701C701C77DC77DC77DC36D836D836D8
36D836D836D83C783C781C700F147F9312>I<7C7C7C7C3C701CF01EE00FE00FC007C007
800380078007C00FC00EE01EE01C701C703838FC7EFC7E0F147F9312>I<FC7EFC7E3838
38381C701C700EE00EE00EE007C007C003800380038003800380038003800FE00FE00F14
7F9312>I<7FF8FFF8E070E070E0E000E001C003800380070007000E000E001C00381C38
1C701C701CFFFCFFFC0E147E9312>I<FFC0FFC0E000E000E000E000E000E000E000E000
E000E000E000E000E000E000E000E000E000E000E000E000E000E000FFC0FFC00A1A7A96
12>I<FFC0FFC001C001C001C001C001C001C001C001C001C001C001C001C001C001C001
C001C001C001C001C001C001C001C0FFC0FFC00A1A7F9612>93 D<0E003F80FFE0F1E040
400B057D9312>I<FFF8FFF8FFF80D037E7F12>I<1FC0003FF000383800101C00001C0007
FC003FFC00781C00E01C00E01C00E01C00703C003FFF801FCF80110E7F8D12>97
D<F800F80038003800380038003BE03FF03C38381C380C380E380E380E380E380C381C3C
383FF01BC00F147F9312>I<07F01FF8383870106000E000E000E000E000600070383838