JHELBIG_ANGSIZ_OLD 5-JUL-2007 15:06Compaq Fortran V7.5-2630 ( $BSS$<$DATA$^ $LITERAL$ilF$CODE$$LINK$BNCSIZLOWSIZCNTRCTMERROR>PATH@ $HELBIG_ANGSIZ_OLD$MSTEP@ $HELBIG_ANGSIZ_OLD$VALUE28 $HELBIG_ANGSIZ_OLD$DD128 $HELBIG_ANGSIZ_OLD$ZZ28 $HELBIG_ANGSIZ_OLD$ZZ1@ $HELBIG_ANGSIZ_OLD$ZZREAL@ $HELBIG_ANGSIZ_OLD$BOUNCE8 $HELBIG_ANGSIZ_OLD$MAXZ@ $HELBIG_ANGSIZ_OLD$VARETA@ $HELBIG_ANGSIZ_OLD$NOTYET8 $HELBIG_ANGSIZ_OLD$ZMAX@ $HELBIG_ANGSIZ_OLD$WMTYPE@ $HELBIG_ANGSIZ_OLD$ERROR8 $HELBIG_ANGSIZ_OLD$K8 $HELBIG_ANGSIZ_OLD$ETA@ $HELBIG_ANGSIZ_OLD$OMEGA@ $HELBIG_ANGSIZ_OLD$LAMBDA@ $HELBIG_ANGSIZ_OLD$LOOPS8 $HELBIG_ANGSIZ_OLD$RISK@ $HELBIG_ANGSIZ_OLD$CHOICE@ $HELBIG_ANGSIZ_OLD$DEBUG@JP$HELBIG_ANGSIZ_OLD$INICOS8J`$HELBIG_ANGSIZ_OLD$QQ@J$HELBIG_ANGSIZ_OLD$ANGSIZ@J0$HELBIG_ANGSIZ_OLD$BNGSIZ@J$HELBIG_ANGSIZ_OLD$LOWLEV@J@$HELBIG_ANGSIZ_OLD$ODEINT8J %$HELBIG_ANGSIZ_OLD$MMM@J`.$HELBIG_ANGSIZ_OLD$POLEX8JX9$HELBIG_ANGSIZ_OLD$ETAZ@J@<$HELBIG_ANGSIZ_OLD$BSSTEP@JD$HELBIG_ANGSIZ_OLD$ASDRHS x=6 H$H76H76H76 H$H76 H$76 H$H7='ՙ''ՙ''ՙ''ՙ''ՙ''ՙ'R  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 = ERROR 6: Z2 < 0.0= ERROR 5: Z1 < 0.0= ERROR 7: Z1 > ZMAX=H9NOT REALLY LARGER THAN ZMAX BUT CLOSE ENOUGH FOR TROUBLEP= ERROR 9: Z2 > ZMAXh=@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 = 8=.&INICOS ERROR 1: OMEGA < 0.0; OMEGA = =#;p^~4Gx^~8! ޴>^~ޜcGq8GGP_& R""2@J?"8~@`G{"4P"<E`[hbD PGX>@ZkpB"""H]"H}tGxb@Zk4///TG4GTG/4G8=10D1D! CTG"<e`B@_&G9#PX= R""?"b"2@JGhbP"@ZkpB"""`]"`tGxb@Zk/<G< %D/@T4GGaT 4G4FF€ bT FU4G@(,T`4G4GT D8%TG4GtG`F8@(,GT4GG!G8ETG4G4G D8% GT/4GTGtaF(,8Ų GT/4GG!G(,8e_BG/`2V (,8E/3FTBb/pST@ZktGwáWPBXb"GaTPaT@Zk"PBB\8"Xb@TH@ZkH=b*TG/@ T% T/ T(,8%^//_G T/@(,8eR//pGTPB8"Xb@Zk%T(4G"D//@G(,8e>//eBbAGTpaU@ZkBAT BTb/TATAAU/aaT0W@Zk0"gT`Bhb/0TTH=/@Zk`BHPhb@ZkP=`B@T\hb/AT W!W`X=@ZkX`=@TTGTgA]T`g]`T"(%T,8WWe EC,h]Ņ „%G 0@G !tGG(I@B7 T/MULUMU/LU,U U/U+//%T0`@B`BlD?""b"`hbGP" PR"X]G/@Zk<Ű_%E e<E/TD@cT/C`T@ TCCU/ `T TT/,/ _8ݦ֢W(8%@=h]]=0ŲLE!cGp]x]}ݤ=]}݌#/k///@`AT@T/AAU@`U T/ Tk//P#(Gh^~GP"p^x~"[^~cGGH^ G_& R"2@J$P"q?"{"b PX@Zkh$_&GBXb" R" "2@JG"P" 1@bW@/# P=X}?"`b"/@ZkB"""btG`]"`@ZkB"G""X"PP]"tGb@Zk//5/$G_&(¦4G R"B2@JGb"5@bDh"#?"/PXݶ"P"@Zk/4GTGD$"b"(⦨BGP"xb`TP"3 jT// @C_& R"l PX?"2@J@ZkeTGtGB#0"4""?"bG`b"XP]_&X R"P"2@J@Zk(BG""PtGP]"b"X"@ZkC//$G_&(¦TG R"B2@JGb"b@T"/0AT// #?"/(P"XݶP"@Zk!GtGB#8"@""?"bG`b"P]_&X R"P"2@J@Zk(BG""PtGP]"b"X"@Zk@G(4G#"?"b"BbG$P]_&" R"X2@JP"@Zku/`G(#4G?""BbGb" P]_&"X R"P"2@J@Zk/Y/Hd8B@b/@T| AT/JTAaUJU/!AU-T@Zk`tG_&Hpb4G R"$(?"2@JBbGP"x"`T@=`=/+T`" P}b"X@Zk`H""8="@]@]"@b"8b#@TH ""/*DU` T_/,W@]w@G/#$H}eEH WcGh]p]x}]}#k///#G#^~G`"^~޴P[^~cGGG D"$HP>?"" 1@X^_& R"2@J{"XbW@ D/`޶h@Zk@B"`""HbtGp]"p@Zk@Bx"G""h"``]"tGHb@Zk$_&GbPB R"l"2@J"`"XbGs" `=?"h}b"@Zk@B"""HbtGx]"x/@ZkGdG =?""`"PBXbG2BB@BPF_& R"2@JpFb"`"h"/@Zk@B"`""HbtG]"@Zk@Bh"G""h"``]"tGHb@Zk"u@CQF/ /0¤d%/T@ lU@} T9//b$DBb/#T`NBT/ONTNVO/V/.UU@ZkBtG4Gh?""b"`=G0B8b Tx"#T@= @#//p]_& R"x2@Jp"@Zkh@@T``T8]"8="@]"b"@ "Gpb#e@$GG0B?"b"8bG"E p]_&@" R"xp"2@J@Zk;/d "E8="@]"Gb"pb# WdT@ "DT8}@]7@$GTG0B?"b"8bG/"" `]_& R"h2@J`"@Zk //" E@ HDpx]/%eąBb/$TdTJBT/KJTJUKU/*jUNU@Zk@} tGb_&4GG R"b"¦0B2@J8b/Tx" @#`"hݶ?"`"/@Zk@="8="@]"b"G8]pb#@ "@@T!"T`T_+W \g@$GTG0B?"b"8bG/"" `]_& R"h2@J`"@Zk//E"d@U@ @x] dU@}DU5//T$Bb/MBT`NMT/MUNV-U/U@ZkhtGT4G"`=?"b"0BG8bx"$T@= `#]_& R"2@J"@Zkh}/CCTcTg8]"8="@]"Gb"@ "pb#c@$GTG0B?"b"8bG/""A ]_& R"2@J"@Zk8//dE"8="@]"b"pb#GGGdT@ "DT8}@]6@_&""0B?" R"2@Jb"8b`" ``! Gh=@ZkØ@ px}H}PX/WWWecG]]}ݤ]}#k//p#@`^~h^p~xcGGG#@2ۅxH* T/ T-T _/XU@ X/lOU"H_V/p/("b#8b88 "~< "~X"`b" 8"o@@=_&GBH" R""2@JGP"bN!8DS /// P}X?" b"@ZkHd@BtG?"Bb b"P"GX`D8R"/ PX]_& R"2@J"@Zk2//@"x`DB_&`G R""P=2@J b"Gb1"P"X=?"@ZkB_&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][{ \]골 "hk]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 U4VUxՕ_ /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}"/x@#p`"^[~ݔGG]"}GGTG@ZkxT)0 @)//*0 B*=*#Tp _!JDU&@/U//tG /G ]"(]0}8@hHݤ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/#4G1; ^~(^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[?V¤C GG"GtG@ZkBT ////C "GGGtGT@Zk///"@@)!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@ZkUB}@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" PwBGG4G/P } @=/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_//G G4G tBh 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"XB "/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]`}`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{#"yVbHxk!P+! ! bK!!4G tG//9 @}!@GF"NLB="~GG"G"b#i_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{p[xb>^cc ABTÅ/JATMaU kU/KbUJULU/AU ~*MU>NUNU@Zk> ^ Tb#\#!*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#PDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<GDFOR$WRITE_SEQ_LIS_XMIT<b#PDFOR$WRITE_SEQ_LIS_XMIT<@DFOR$WRITE_SEQ_LIS_XMIT<\GDFOR$WRITE_SEQ_LIS<b#PDFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<GDFOR$WRITE_SEQ_LIS_XMIT<b#PDFOR$WRITE_SEQ_LIS_XMIT<@DFOR$WRITE_SEQ_LIS_XMIT4dGx MATH$SQRT_G4hb#P MATH$SQRT_G4t@x MATH$SQRT_G4 G MATH$POW_GG4b#P MATH$POW_GG4 @ MATH$POW_GG4 G MATH$POW_GG4b#P MATH$POW_GG4 @ MATH$POW_GG4 4GD MATH$POW_GG4<b#P MATH$POW_GG4 @@D MATH$POW_GG4G MATH$SQRT_G4b#P MATH$SQRT_G4@ MATH$SQRT_G4G MATH$ACOS_G4b#P MATH$ACOS_G4@ MATH$ACOS_G4G MATH$COS_G4b#P MATH$COS_G4@ MATH$COS_G4G MATH$COS_G4b#P MATH$COS_G4@ MATH$COS_G4 G8 MATH$COS_G4b#P MATH$COS_G44@8 MATH$COS_G< GTDFOR$WRITE_SEQ_LIS<$b#PDFOR$WRITE_SEQ_LIS <P@TDFOR$WRITE_SEQ_LIS<GHDFOR$WRITE_SEQ_LIS<,b#DFOR$WRITE_SEQ_LIS<D@HDFOR$WRITE_SEQ_LIS< `GDFOR$WRITE_SEQ_FMT< b#DFOR$WRITE_SEQ_FMT< @DFOR$WRITE_SEQ_FMT< GDFOR$WRITE_SEQ_FMT_XMIT< b#DFOR$WRITE_SEQ_FMT_XMIT< @DFOR$WRITE_SEQ_FMT_XMIT< G DFOR$WRITE_SEQ_FMT_XMIT< b#DFOR$WRITE_SEQ_FMT_XMIT<  @ DFOR$WRITE_SEQ_FMT_XMIT<@ G DFOR$WRITE_SEQ_LIS<T b#DFOR$WRITE_SEQ_LIS< @ DFOR$WRITE_SEQ_LIS< G DFOR$WRITE_SEQ_LIS< b#DFOR$WRITE_SEQ_LIS< @ DFOR$WRITE_SEQ_LIS< , Gt DFOR$WRITE_SEQ_FMT< D b#DFOR$WRITE_SEQ_FMT< p @t DFOR$WRITE_SEQ_FMT< x G DFOR$WRITE_SEQ_FMT_XMIT<  b#DFOR$WRITE_SEQ_FMT_XMIT<  @ DFOR$WRITE_SEQ_FMT_XMIT< G, DFOR$WRITE_SEQ_LIS< b#DFOR$WRITE_SEQ_LIS<( @, DFOR$WRITE_SEQ_LIS< < G DFOR$WRITE_SEQ_FMT< T 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< G DFOR$WRITE_SEQ_LIS< b#DFOR$WRITE_SEQ_LIS< @ DFOR$WRITE_SEQ_LIS<@ Gx DFOR$WRITE_SEQ_LIS<D b#DFOR$WRITE_SEQ_LIS<t @x DFOR$WRITE_SEQ_LIS4 G MATH$SQRT_G4 b# MATH$SQRT_G4 @ MATH$SQRT_G< GX DFOR$WRITE_SEQ_LIS< b#DFOR$WRITE_SEQ_LIS<T @X DFOR$WRITE_SEQ_LIS< dGDFOR$WRITE_SEQ_FMT< b#DFOR$WRITE_SEQ_FMT< @DFOR$WRITE_SEQ_FMT< GDFOR$WRITE_SEQ_FMT_XMIT< b#DFOR$WRITE_SEQ_FMT_XMIT< @DFOR$WRITE_SEQ_FMT_XMIT< GDDFOR$WRITE_SEQ_FMT_XMIT< <b#DFOR$WRITE_SEQ_FMT_XMIT< @@DDFOR$WRITE_SEQ_FMT_XMIT< XGDFOR$WRITE_SEQ_FMT< pb#DFOR$WRITE_SEQ_FMT< @DFOR$WRITE_SEQ_FMT< GDFOR$WRITE_SEQ_FMT_XMIT< b#DFOR$WRITE_SEQ_FMT_XMIT< @DFOR$WRITE_SEQ_FMT_XMIT< G4DFOR$WRITE_SEQ_FMT< b#DFOR$WRITE_SEQ_FMT< 0@4DFOR$WRITE_SEQ_FMT< 8GXDFOR$WRITE_SEQ_FMT_XMIT< Db#DFOR$WRITE_SEQ_FMT_XMIT< T@XDFOR$WRITE_SEQ_FMT_XMIT< XGDFOR$WRITE_SEQ_FMT_XMIT < |b#DFOR$WRITE_SEQ_FMT_XMIT< @DFOR$WRITE_SEQ_FMT_XMIT4G< MATH$SQRT_G4b# MATH$SQRT_G48@< MATH$SQRT_G<hGDFOR$WRITE_SEQ_LIS<lb#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<GXDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<T@XDFOR$WRITE_SEQ_LIS<GDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS4dG MATH$SQRT_G4hb# MATH$SQRT_G4@ MATH$SQRT_G<GDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<xGDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS4$GX MATH$SQRT_G4(b# MATH$SQRT_G4T@X MATH$SQRT_G<GDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<GdDFOR$WRITE_SEQ_LIS<$b#DFOR$WRITE_SEQ_LIS<`@dDFOR$WRITE_SEQ_LIS<G DFOR$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<GDDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@@DDFOR$WRITE_SEQ_LIS<XGDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS<GDFOR$WRITE_SEQ_LIS<b#DFOR$WRITE_SEQ_LIS<@DFOR$WRITE_SEQ_LIS4x;G; MATH$LOG10_G4|;b#X MATH$LOG10_G4;@; MATH$LOG10_G4;G; MATH$SQRT_G4;b#X MATH$SQRT_G4;@; MATH$SQRT_G4<G< MATH$SQRT_G4 <b#X MATH$SQRT_G4<@< MATH$SQRT_G<<G<DFOR$WRITE_SEQ_LIS<<b#XDFOR$WRITE_SEQ_LIS<<@<DFOR$WRITE_SEQ_LIS4<G< DFOR$STOP4<b#X DFOR$STOP4<@< DFOR$STOP4EG|E MATH$SQRT_G4Eb# MATH$SQRT_G4xE@|E MATH$SQRT_G  MATH$LOG10_G=8  DFOR$STOP;@ MATH$SQRT_G=@X=0`9;=, 7 DFOR$HANDLER=;=:?6-C;==B DFOR$WRITE_SEQ_LIS=0`;=0@D;= , A@A=0`.;=pX ;=0 %;=d =0(<;= ` <?h;=x=@333333@ffffff=0 @;=t  >;=9KH ;==CAN'T GET HERE=,@̚>׼H@;=0`;=0 7 DFOR$HANDLER=;;=8-@o zERROR IN BSSTEP>Ƶ `=ERROR h=8p=@+88x=00;=X 7 DFOR$HANDLER=;( DFOR$WRITE_SEQ_FMT_XMIT DFOR$WRITE_SEQ_FMT= =: ANGSIZ ERROR=: INICOS ERROR=0h;=P< 7 DFOR$HANDLER= Z2 @=Z1 H= @=0p;=` 7 DFOR$HANDLER=( @R-8es?UUUUUU?h MATH$POW_GG MATH$COS_G(DFOR$WRITE_SEQ_LIS_XMIT=. MATH$ACOS_G=@UUUUUU Q=A98HELBIG_ANGSIZ_OLDCompaq Fortran V7.5-2630 = &4P4='$HELBIG_ANGSIZ_OLD$INICOS4=h`    (                    !   3 G E O  ]& _. c&                        $ V uh $ + >     : : < N p X M .      d :=  4=  =  = ` = "`44=#$HELBIG_ANGSIZ_OLD$QQ`4=  = @ $= &44='$HELBIG_ANGSIZ_OLD$ANGSIZ4=                   ( " "\ / 3 / / / 3M = A = ? ? I I( O O Y Y  c e g q m o q                $      @ Z=   4=  e4=  = D =  = &044='$HELBIG_ANGSIZ_OLD$BNGSIZ04=7/          (                   " &  & !      / ; ? = A  ^ \  ` ^  \  ^  ` ^ l j n                                           & $ (   C E G E( N   t t tH Z=  4=  e4=  = D Z=  T4=  e4=  = D Z=  4=  e4=  = @ = ` /= &44='$HELBIG_ANGSIZ_OLD$LOWLEV4=             , ( ;  =  C / C  G  G   0 =  = &@44='$HELBIG_ANGSIZ_OLD$ODEINT@4=   q  q  q  q  q  q  m  m         q    0  0 4 0  0 ( 0  0  0 D >  , B  D   D  D  D 0 D  D   N  T  V  X  X  X  X  X  X ( X  X  P  m  m & > D& > }p   8  z(         (   =  = #%4 4=$$HELBIG_ANGSIZ_OLD$MMM%4= +  b  n b b j b ( f /  1  1  1  1  1  1  1  1  1  1  1  /  /  /  1  /  1  1  /  /   9  A   E  S  E  E  G  E  I  I  I  I  I  I  I  K  I  I  I  K  I  G  I  K  I  G  G  I  G   S  E  E  ]  ]  ] | ]  ] L ]  ]  L =  = %`.44=&$HELBIG_ANGSIZ_OLD$POLEX`.4=XP  g U k U k U k U                 4  (        <  (                                                                                       58  (    L =  = $94X4=%$HELBIG_ANGSIZ_OLD$ETAZ94=d\  k  Y g F s  q <   -   ' % ! !        V      ,  =  y= &<4@4='$HELBIG_ANGSIZ_OLD$BSSTEP<4=                                )        0 ( qH    G`      P =  C= &D44='$HELBIG_ANGSIZ_OLD$ASDRHSD4= i ( r     v  v  v  r   i  m z zA z | { | | { { Z=  E4=  e4= h = 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