F HELBIG_ANGSIZ 9-JUL-2007 11:26Compaq Fortran V7.5-2630  $BSS$T$DATA$~ $LITERAL$i,G$CODE$$LINK$LOWSIZMERROR>PATH8 $HELBIG_ANGSIZ$MSTEP8 $HELBIG_ANGSIZ$VALUE28 $HELBIG_ANGSIZ$YSTART8 $HELBIG_ANGSIZ$D128 $HELBIG_ANGSIZ$Z28 $HELBIG_ANGSIZ$Z18 $HELBIG_ANGSIZ$ZZREAL8 $HELBIG_ANGSIZ$NOTYET8 $HELBIG_ANGSIZ$BOUNCE8 $HELBIG_ANGSIZ$MAXZ8 $HELBIG_ANGSIZ$ZMAX8 $HELBIG_ANGSIZ$WMTYPE8 $HELBIG_ANGSIZ$ERROR8 $HELBIG_ANGSIZ$VARETA8 $HELBIG_ANGSIZ$K8 $HELBIG_ANGSIZ$ETA8 $HELBIG_ANGSIZ$OMEGA8 $HELBIG_ANGSIZ$LAMBDA8 $HELBIG_ANGSIZ$LOOPS8 $HELBIG_ANGSIZ$RISK8 $HELBIG_ANGSIZ$CHOICE8 $$HELBIG_ANGSIZ$DEBUG8JH$HELBIG_ANGSIZ$INICOS8J$HELBIG_ANGSIZ$QQ8J$HELBIG_ANGSIZ$ANGSIZ8JP$HELBIG_ANGSIZ$BNGSIZ8J`$HELBIG_ANGSIZ$LOWLEV8J$HELBIG_ANGSIZ$ODEINT8J&$HELBIG_ANGSIZ$MMM8J0/$HELBIG_ANGSIZ$POLEX8JH:$HELBIG_ANGSIZ$ETAZ8J8=$HELBIG_ANGSIZ$BSSTEP8JE$HELBIG_ANGSIZ$ASDRHS =6 H$H76 H76 H76 H$H76 H$76 H$H7=g g g g g g   0@` z=h\SOMETHING'S WRONG!!!!!!ERROR IN ODEINT: TOO MANY STEPSERROR IN ODEINT: STEPSIZE TOO SMALL`=@1ERROR 12: ERROR CALCULATING D32, EXPANDING PHASE=@3ERROR 12: ERROR CALCULATING D32, CONTRACTING PHASE=@3ERROR 12: ERROR CALCULATING D34, CONTRACTING PHASE=@3ERROR 12: ERROR CALCULATING D14, CONTRACTING PHASE@=@1ERROR 12: ERROR CALCULATING D14, EXPANDING PHASEx=0"ERROR 11: OVERFLOW ERROR POSSIBLE=0%ERROR 13: BNGSIZ INVALID FOR WMTYPE =@2ERROR 12: ERROR CALCULATING D12ERROR 6: Z2 < 0.0= ERROR 5: Z1 < 0.0= ERROR 7: Z1 > ZMAX0=H9NOT REALLY LARGER THAN ZMAX BUT CLOSE ENOUGH FOR TROUBLEp= ERROR 9: Z2 > ZMAX=@2ERROR 4: COMPUTATION NOT RECOMMENDED IN WMTYPE 17=@6YOU MUST CALL INICOS FIRST!!!!!!!!!!!!!!!!!!!!!!!!!!!=8)INICOS ERROR 3: ROUNDOFF ERROR, BAD ZMAX(=8)INICOS ERROR 2: ETA OUT OF RANGE; ETA = X=.&INICOS ERROR 1: OMEGA < 0.0; OMEGA = =@#@;h^~4Gp^x~X! ^~ޜcGq0P G8~G_&?" R"x{""@G2@J`48DP"X[`bB PX>G/@ZkhB"x""H]"H}tGpb@Zk2/TG4GTG/4G8=10D1D! CTG@"8dXB@_&G(9#PX= R""?"xb"2@JG`bP"@ZkhB"x""`]"`tGpb@Zk/8G8] $/g@T//4GaTG 4G(FF bT€ FU(G@,0/T`4G4GT D4$TG4GtG`F4@,0GT4GG!G4DTG4G4G D4$ GT/4GTGtaF,04IJ GT/4GG!G,04d_BG/`2V ,04D/3FTBb/pST@ZktGwáWHBPb"GaTPaT@Zk"HBB\8"Pb@TH@ZkH=b*TG/@ T$ T/ T,04$^//_G T/@,04dR//pGTHB8"Pb@Zk%T,4G"D//@G,04d>//dBbAGTpaU@ZkBAT BTb/TATAAU/aaT0W@Zk@"gTXB`b/0TTH=/@ZkXBHP`b@ZkP=XB@T\`b/AT W!W`X=@ZkX`=@TTGTgA]T`g]`T",%T04d D0c ąGGB"0b\/UZ#TsV/StVTUSU/3tVnVqV/9`%UT0`CVVUVVU/UU5VV/V,%T0`CTXVWV/XUWU7V/VV0`C%TTZ9W/Y:WZUYU/9:W.W1W/ %TT0`C\{W[|W\U/[U;|WnW/qW`%T0`C\_lG@B``GR"XBP=X]_& R""?"2@Jb"P"G`b@ZktG_80$ _8}Ld,$4sW@]}=<d;!cGh]p]x}]}݌#/k///@`AT@T/AAU@`U T/ Tk//P#;Gp^~P"x^~9#[^cG1xGH^G_&?" R""2@J% {"b$  PX>G/@Zk%$G"B?""b"Gb!1 @W @' P]_&X R""2@JP"@ZkB"""btG`]"`/@ZkBG"""XP"P]"tGb/@Zk/S/ %G4G$EGP"Bb5BF?"#c@_&Pݶ R""X2@Jb"@Zk/24GTG%e_&"?" R"b"|$B2@JbGTpZ#/@ T pPX]BP"@Zki$TGtGB#0"(""?"bGb"\P]_&X R"P"2@J@ZkBG""PtGP]"b0"X"@ZkG//%GTGE$E?""BGP"bT#/4  T//cb"/,@_&Pݶ R"X2@J/@Zk#//$GtGB#8"@""?"bGb"P]_&X R"P"2@J@ZkBG""PtGP]"b0"X"@Zk$%G_&B4G R"?"2@JP"Gb& P}""b"X/@Zk//$%G_&B4G R"?"2@JGP"b " P}X"b"@Zkn@"Ņ0B8bT`JBT/KJTJUKU/*jUNU@Zkh tG_&@`=4G R"b$%?"2@JBGP"b Tx"@=h=+T`" P}b"X@Zkh@"$""@]8="@]"8]@b"b#@@T"/*BU` T_/,W@]䗇@$%_&GbB R""2@JbP"GG P=s"?"X}b"/@ZkG ///"HADWcGp]x]}]#k/// #G#^~G`"^~`[^~cG(GHG "$H"P>X^_& R"2@J?"p{" 1@hbW@ D`޶h@Zk@B"x""Hb =tGp]"p@Zk@B"G""h"``]"tGHb@Zk$_&G8b`B R"p"2@J"`"hbGs" `=?"h}pb"@Zk@B"""HbtGx]"x/@ZkGdG?""`"`BhbG2BB@BPF_& R"2@JpFpb"`"h"/@Zk@B"x""HbtG]"@Zk@B"G""h"``]"tGHb@Zk"u@CQF/ /@d%T/@ lU T@}:///b$DBb/#T`NBT/ONTNVO/V/.UU@Zk0BtG4Gh?""b"`=8GPBXb Tx"#T@= @#//p]_& R"x2@Jp"@Zkh/@@T``T @8]""8="@]"Pb""b#g@$GG8PB?"b"XbG/"@"I p]_& R"x2@Jp"@Zk@//d "E "8="@@]"Pb"b#dTDT" W8}@] 7@$GTG8PB?"b"XbG/"" `]_& R"h2@J`"@Zk//@"EHDpx]/%eąBb/$TdTJBT/KJTJUKU/*jUNU@Zk@} tG0b_&4GG R"b"8¦PB2@JXb/Tx" @#`"hݶ?"`"/@Zk@=""@8="@]"Pb"8]b#"@@T!"T`T_+W \ e@$GTG8PB?"b"XbG/"" `]_& R"h2@J`"@Zk//E"@d@U@x] dU@}DU5//T$Bb/MBT`NMT/MUNV-U/U@ZkhtGT4G"`=?"b"8PBGXbx"$T@= `#]_& R"2@J"@Zkh}/CCTcT e@8]""8="@]"Pb""b#c@$GTG8PB?"b"XbG/""E ]_& R"2@J"@Zk<//dE""@8="@]"Pb"峘b#dT"DT8}@]8@GG8BPB?"b"XbG`"///``R""h]_& R"2@J@Zk/@px}H}PX/WWWdcG]]}]}#k/p#@`^~h^p~xcGGG#@2ۅxH* T/ T-T _/XU@ X/lOU"H_V/p/"b#8b8"~"~X"`b" 8"o@@=_&GBH" R""2@JGP"bN!8DS /// P}X?" b"@ZkHdBtG?"Bb b"P"GX`D8R"/ PX]_& R"2@J"@Zk2//"x`DB_&`G R""P=2@J b"Gb1"P"X=?"@ZkøB_&G" P} R""X=?"2@J b"bGP"/@Zk //H#C00PcG`]h]p}x#k///0#4G ^~(^0~8@H޴P_X`>h^p~+Wx޵^~ޜGQr#$bT}p=GGG G][{ \],"k]d`}`BM/9@]@F/"9@ @R@F/" "9 B]&BU@F"9 B -BF"V(B 9 @ -@F"W(@#9C CF/"9 @]&@UCFׅ Q4Bs""9C]CFA4@"XC}`B`/9@ @F/"9@]@R@s"F"G PB¤'!(ℜ p!//GG"GtG, G@ZkG창@4G/{///9@B]FBF/""9B]BGFUFB"#9C]CF"2 9 @]&@ZB[CF""9B]BF"5ZS&@YB"9B]B{F"[BۅSBZBPCY$@[BSB0Y{TB1"VBXCA/@ATWBUB BR"JTKT/LTMT__NT_ _ __ __ ____/U  V +V/ LV mVV/'T GU gU/ U U4V =UxՕ_ /9@B]FBF/"SFBTDB[OBԆ1"R"UT__VV?0̢r7T__VG4GL61B VCFf0@C9@CYCFL"QXCZZCZZCX:@KGC@4GH#C///9@B]FBF/""9B]BGF""9B]BYBFSB"R#9@C]FCF"2"9 B]&BAB9SFVDCa"Y$BUB{#WBTBZXCQ8B`CR"h5hWhthh/`//9@B]FBF/"@DBPXB{#R"hЗ\/T0U/U/OV&`Tˢ8F}"/@#`"^[~ݔGG]"}GGTG@ZkT)0 @)//*0 B*=*#T _!JDU&@/U//tG /G ]"(]0}8@HݤPX`=h]p}xݥ]}݌#k/cGf`}`@4GN//9B BF/"9B]BYBF/"w#9`C mCABF"9`C]fCF"TdCw"9`B]fBF"FdB 9@]@F/"9`B mBI@ F)""[hCٕ"9@ @ FShB"E@}B%/9B]BF/"9B BVB"F"VG"PBPL//w_,0 B9 B9BF,/"0F4B&G/gQ1BQ1B}`@1 J 4GBH1"7`///9 A]&AF/"i!9`A]fA GF[$A" 9@]@F""9B]BOdA{X@F/"MB ͆JQAKqAE@VB}@)!hjhhh֖)/9 A]&AF/"Z$AP1A )!h/TGK/#4G1x; ^~(^1"0~8p"@H޴WPX`>hp^x~GG~Gb T4G } @m/9B BF/""9B BGFXB"VBZBu#9`C eCYBF/" 9@ @FXvGVsC"9B]BF/"Z@PB]BօGGP9BFKKT"9`C]fCFXCMMTNNT/"Y2C99@]@ZBFOOTXqC" KUVBWB! Z@[tCF@} @ U"VV://Vە/? //9B BF/"VBV9B]BZBFzRRT/"FB[B! "frV[?Vx¤C GG"GtG@ZkBT ////C "GGGtGT@Zk///x"@@)!G4G/9 B]&BF/"9 B %BF"U$B"9B BF"9B]BWBY&BF7YX)B@`T/"xRB"9B BFXAaT`U"WB9B]BFTBQ#/UMmT/"9@C ECFԅ/"9@C]FCUBSDCVBF46ҕ"@IC#9C CF5@OoT  V"RCr9C]CZFCF/OV/SsT"[ CXC! 1" @؆Vۖx //9 B %BF/"V$B9 B]&BFWwT"@)BY&B9! 1" /W?]BWC] GGG"tG@ZkUxB}@WG4GR"m /9 B]&BF/"9 B %BF"V2BU&BW$B6Uw1#9 C]&CF/*TKKT+T/A T"9 C %CC2CF[&C"Y$C1! U9 A]&AF7مNNT/ ULU"9 A %AT2AFS&A/"I$AU#9C]CF)QQTUOU/"9C CGCFCCG"XCcSV }@1"TTTTVR@VX//9 B]&BF/"9 B %BF"S2BV&BY$Bֆ 1"VWWT/VUV/G ](]0}8@HݤPX`=p]x}h#/k///s0#~^^~9`BaB (F0޴8p@H>P^X~`G /="G"G4GPwBP } @=/9 C !CF/"y 9`@ a@GFZ CB2C" 9@ @F""Er@P@Y Ep9@@ A@XCF:/"ZR@E`@8"Cu@P@D@X@@BU@}B9#ECpd_/9 C !CF/"D2CC5CX C"9#/8`F//o@V } BG4G$#/O///9@]@F/"9@ @V@F/" 9@]@B@F"9@ @F"Q@"9B BF"YB…d 9`@ a@F/"9B]BTr@F4 @@Z#֕"9`@]f@FUB"Cx@}@C#@/9@ @F/"9@]@Y@Z#F"YG PBP_//GG4G tB TDd } BM`/9 C]&CF/"9 C !CZ$CF/""9B]BC2CF"9B BF"BB#9C CF"cGC 9@ @F/"9C]CC@F9#"ÆTBz"9@]@FXC"F@}BƖ/9 C !CF/"9 C]&CB2C"F"G9#PB#// C/ ///#C////#/[4G Bs"H$B "/9`BaBF/"RwB29`@a@F: WzW[T/"Yc@Y9C9 KG4GY@Y:W@/9@]@F/"V@R@h9@ @F<W/"!9A]AI@ FG)^p^x~޵^~GXGp(BGGG#ޤG]`X}`C4G "/g///9B]BF/"9B BGF/"4#9 C]!CRBFGZBVB/"9 C 'CXCGA CF"ZI&C!9A AF"PAxЅ9A]AY1CFGWB"4! `?=ZQCYA9 A 'AFRv"9 A]!AHAFٕGV&A"RQB2{#A AI5A}`C")/`///9B]BF/"9B BGF/"PBZBpV CZY5C{#"yVXb@k!P+! ! bK!!4G tG//9 @}!@GF"NLB="~GG"G"b#m_GG ="^}"0"b#G_W/aTA!T =___ _ _쮽@4G _ _/9 @]!@F/"9 @ '@R*@F/"T$@҅"9B]BFnU/"9B BFWB/"UB5!#9 C]!CFpV/"9 C 'CF[*C/"Y$C[y!"9 B]!BFrSV/"9 B 'BFR*B/"Q$B"9B]BFtV/"9B BFWB/"VB׆A#9@C]ACFvV/"9@C GCF[JC/"ZDC:___UUmN_rUlp_k_ @! _/xWTUj__6Ta__/T`]q/KUjk^Ul^T`!^ T`^ T`,_/9 @]!@F/"9 @ '@R*@F/"X$@҅X ! nU_T`^!`T/T*0B}[cW/[cW}[T/bW(4GD///G(]0]8}@HPݤX`h=p]x}ݥ]}#k//]]=}@@GRTSQ\\V]//8@G=TTV/9@C}ACF_W"LLC̋_}WRVV/oOV㕽/#$@^~H^P~X`^h~pGGP{`[hb>^cc ABTÅ/JATMaU kU/KbUJULU/AU ~*MU>NUNU@Zk> ^ Txb#\$#p!*T`+T(0 8"-MT8 _cTc$= "(]0(CKlUх}G@]H]0@Ba"T(CP}/dDUKmUBbU/BNTbCTh}/$TpA/T/AT`]!W3X#k<GDFOR$WRITE_SEQ_LIS<b#HDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<GDFOR$WRITE_SEQ_LIS_XMIT<b#HDFOR$WRITE_SEQ_LIS_XMIT<@DFOR$WRITE_SEQ_LIS_XMIT<<GDFOR$WRITE_SEQ_LIS<xb#HDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<GDFOR$WRITE_SEQ_LIS_XMIT<b#HDFOR$WRITE_SEQ_LIS_XMIT<@DFOR$WRITE_SEQ_LIS_XMIT4TGh MATH$SQRT_G4Xb#H MATH$SQRT_G4d@h MATH$SQRT_G4 tG MATH$POW_GG4xb#H MATH$POW_GG4 @ MATH$POW_GG4 G MATH$POW_GG4b#H MATH$POW_GG4 @ MATH$POW_GG4 $G4 MATH$POW_GG4,b#H MATH$POW_GG4 0@4 MATH$POW_GG4xG MATH$SQRT_G4|b#H MATH$SQRT_G4@ MATH$SQRT_G4G MATH$ACOS_G4b#H MATH$ACOS_G4@ MATH$ACOS_G4G MATH$COS_G4b#H MATH$COS_G4@ MATH$COS_G4G MATH$COS_G4b#H MATH$COS_G4@ MATH$COS_G4G( MATH$COS_G 4b#H MATH$COS_G4$@( MATH$COS_G<G DFOR$WRITE_SEQ_LIS<b#HDFOR$WRITE_SEQ_LIS<@ DFOR$WRITE_SEQ_LIS<4GDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS< G DFOR$WRITE_SEQ_FMT< b#DFOR$WRITE_SEQ_FMT<  @ DFOR$WRITE_SEQ_FMT<  GD DFOR$WRITE_SEQ_FMT_XMIT< , b#DFOR$WRITE_SEQ_FMT_XMIT< @ @D DFOR$WRITE_SEQ_FMT_XMIT< D Gt DFOR$WRITE_SEQ_FMT_XMIT< h b#DFOR$WRITE_SEQ_FMT_XMIT< p @t DFOR$WRITE_SEQ_FMT_XMIT< G DFOR$WRITE_SEQ_LIS< b#DFOR$WRITE_SEQ_LIS< @ DFOR$WRITE_SEQ_LIS<P b#DFOR$WRITE_SEQ_LIS<| G DFOR$WRITE_SEQ_LIS< @ DFOR$WRITE_SEQ_LIS<  G DFOR$WRITE_SEQ_FMT<  b#DFOR$WRITE_SEQ_FMT<  @ DFOR$WRITE_SEQ_FMT<  G DFOR$WRITE_SEQ_FMT_XMIT<  b#DFOR$WRITE_SEQ_FMT_XMIT<  @ DFOR$WRITE_SEQ_FMT_XMIT<D G DFOR$WRITE_SEQ_LIS<P b#DFOR$WRITE_SEQ_LIS< @ DFOR$WRITE_SEQ_LIS<  G DFOR$WRITE_SEQ_FMT<  b#DFOR$WRITE_SEQ_FMT<  @ DFOR$WRITE_SEQ_FMT<  G4 DFOR$WRITE_SEQ_FMT_XMIT<  b#DFOR$WRITE_SEQ_FMT_XMIT< 0 @4 DFOR$WRITE_SEQ_FMT_XMIT<H G DFOR$WRITE_SEQ_LIS<d b#DFOR$WRITE_SEQ_LIS< @ DFOR$WRITE_SEQ_LIS< G DFOR$WRITE_SEQ_LIS< b#DFOR$WRITE_SEQ_LIS< @ DFOR$WRITE_SEQ_LIS48 Gl MATH$SQRT_G4< b# MATH$SQRT_G4h @l MATH$SQRT_G< G DFOR$WRITE_SEQ_LIS< b#DFOR$WRITE_SEQ_LIS< @ DFOR$WRITE_SEQ_LIS<XGDFOR$WRITE_SEQ_LIS<hb#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS< DGDFOR$WRITE_SEQ_FMT< b#PDFOR$WRITE_SEQ_FMT< @DFOR$WRITE_SEQ_FMT< GDFOR$WRITE_SEQ_FMT_XMIT< b#PDFOR$WRITE_SEQ_FMT_XMIT< @DFOR$WRITE_SEQ_FMT_XMIT< GDFOR$WRITE_SEQ_FMT_XMIT<  b#PDFOR$WRITE_SEQ_FMT_XMIT< @DFOR$WRITE_SEQ_FMT_XMIT< (GlDFOR$WRITE_SEQ_FMT< @b#PDFOR$WRITE_SEQ_FMT< h@lDFOR$WRITE_SEQ_FMT< pGDFOR$WRITE_SEQ_FMT_XMIT< |b#PDFOR$WRITE_SEQ_FMT_XMIT< @DFOR$WRITE_SEQ_FMT_XMIT < GDFOR$WRITE_SEQ_FMT< b#PDFOR$WRITE_SEQ_FMT< @DFOR$WRITE_SEQ_FMT< G(DFOR$WRITE_SEQ_FMT_XMIT< b#PDFOR$WRITE_SEQ_FMT_XMIT< $@(DFOR$WRITE_SEQ_FMT_XMIT< (GTDFOR$WRITE_SEQ_FMT_XMIT< Lb#PDFOR$WRITE_SEQ_FMT_XMIT< P@TDFOR$WRITE_SEQ_FMT_XMIT4G  MATH$SQRT_G4b#P MATH$SQRT_G4@  MATH$SQRT_G<8GDFOR$WRITE_SEQ_LIS<<b#PDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<G$DFOR$WRITE_SEQ_LIS<b#PDFOR$WRITE_SEQ_LIS< @$DFOR$WRITE_SEQ_LIS<GDFOR$WRITE_SEQ_LIS<b#PDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS44Gl MATH$SQRT_G48b#P MATH$SQRT_G4h@l MATH$SQRT_G<GDFOR$WRITE_SEQ_LIS<b#PDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<HGDFOR$WRITE_SEQ_LIS<Tb#PDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS4G( MATH$SQRT_G4b#P MATH$SQRT_G4$@( MATH$SQRT_G<PGDFOR$WRITE_SEQ_LIS<Xb#PDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<G4DFOR$WRITE_SEQ_LIS<b#PDFOR$WRITE_SEQ_LIS<0@4DFOR$WRITE_SEQ_LIS<GDFOR$WRITE_SEQ_LIS<b#PDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<dGDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<GDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<(GlDFOR$WRITE_SEQ_LIS<Tb#DFOR$WRITE_SEQ_LIS<h@lDFOR$WRITE_SEQ_LIS<pGDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS48<GX< MATH$LOG10_G4<<b#H MATH$LOG10_G4T<@X< MATH$LOG10_G4<G< MATH$SQRT_G4<b#H MATH$SQRT_G4<@< MATH$SQRT_G4<G< MATH$SQRT_G4<b#H MATH$SQRT_G4<@< MATH$SQRT_G<T=G=DFOR$WRITE_SEQ_LIS<t=b#HDFOR$WRITE_SEQ_LIS<=@=DFOR$WRITE_SEQ_LIS4=G= DFOR$STOP4=b#H DFOR$STOP4=@= DFOR$STOP4EG;=9KH;==CAN'T GET HERE=,@̚>׼H8;=0``;=0 7 DFOR$HANDLER=;;=0(@o zERROR IN BSSTEP>Ƶ=0;=L< 7 DFOR$HANDLER=+88x( DFOR$WRITE_SEQ_FMT_XMIT=@ DFOR$WRITE_SEQ_FMT=8= =ERROR =: ANGSIZ ERROR= =: INICOS ERROR=0p;=D< 7 DFOR$HANDLER= Z2 8=Z1 @= @=0h;=L 7 DFOR$HANDLER=( ?h?UUUUUU@R-8es MATH$POW_GG MATH$COS_G(DFOR$WRITE_SEQ_LIS_XMIT=. MATH$ACOS_G=@UUUUUU M==54 HELBIG_ANGSIZCompaq Fortran V7.5-2630 = "4H4=#$HELBIG_ANGSIZ$INICOS4=um z    !            # !  5 I G Q  _& a. e&                        " ,I          "       E X j h\-    '    ' P :=  p4=  = 0 =  = 44=$HELBIG_ANGSIZ$QQ4=  = @ = "44=#$HELBIG_ANGSIZ$ANGSIZ4=z             $ [   P               (   (  O - S )  /  5 /  /n  C C C C ?, G R \8 Z=  ( 4=  e4= 4 = @ =  /= "4P4=#$HELBIG_ANGSIZ$BNGSIZ4= n n n n n  n    ,         5 1 / 5 5  c g A g K G C  I C  U e c   ~   ~                                 6 : 6 :      ( 8 6   Q S U S ^$ \   ~# ~ ~8 Z=  4=  e4= H = D Z=  $4=  e4=  = D Z=  4=  e4=  = @ = P = "`44=#$HELBIG_ANGSIZ$LOWLEV`4=       6( D F L L P P  0 =  = "44=#$HELBIG_ANGSIZ$ODEINT4= )  z z z z z z v v   '     z )  :  : 4 :  : ( :  :  : D H  , L  N   N  N  N 0 N  N   X  ^  `  b  b  b  b  b  b ( b  b  Z  w  w & H D& H }p   8  z(         (   =  = &44= $HELBIG_ANGSIZ$MMM&4= 6  c  o c c k c ( g :  <  <  <  <  <  <  <  <  <  <  <  :  :  :  <  :  <  <  :  :   D  L   P  ^  P  P  R  P  T  T  T  T  T  T  T  V  T  T  T  V  T  R  T  V  T  R  R  T  R   ^  P  P  h  h  h | h  h L h  h  L =  = !0/44="$HELBIG_ANGSIZ$POLEX0/4=aY  r U v U v U v U                  4  (        <  (                                                                                       D    8    (       L =  =  :4H4=!$HELBIG_ANGSIZ$ETAZ:4=XP   w   Z s G  y C  4 +  ' % ! !          D    ,  =  u= "=484=#$HELBIG_ANGSIZ$BSSTEP=4=                                )        0 ( qH    G`      P =  0= "E44=#$HELBIG_ANGSIZ$ASDRHSE4= j (               t   x   3      Z=  E4=  e4= s = d =  Le4 =   DFOR$HANDLER DFOR$WRITE_SEQ_LIS DFOR$WRITE_SEQ_LIS_XMIT DFOR$HANDLER DFOR$WRITE_SEQ_FMT DFOR$WRITE_SEQ_FMT_XMIT DFOR$HANDLER DFOR$HANDLER DFOR$HANDLER DFOR$STOP MATH$LOG10_G MATH$SQRT_G MATH$POW_GG MATH$ACOS_G MATH$COS_G