!.MXINTB+ @MAX2 AMAX2 MAX0 AMAX0 ^\.PROG.X.DATA..BLNK..BYED \IRTR% IRTN% GTARGDGTARGBj#MAX2 AMAX2  MAX0  AMAX0 ,;@;>>0!H!N2o;~@:(=(;.d:(BF;CSL-;!.MNINTL+ @MIN2 AMIN2 MIN0 AMIN0 f\.PROG.X.DATA..BLNK..BYED \IRTR% IRTN% GTARGDGTARGBj#MIN2 AMIN2  MIN0  AMIN0 4;@;>>0!H!N2o;~@:(=(;.d:(BH;CSL/;!.MXMN r+ @DMAX1 DMIN1 AMAX1 MAX1 AMIN1 MIN1 l\.PROG.l.DATA..BLNK.RTNI% w\RTNR% RTND% CMPMM%MXMNM%\GTADRD @#DMAX1 DMIN1  AMAX1 MAX1 #AMIN1 &MIN1 .;F!>'!> ; !!;&`!0!`2x<;8`2~a !;J=(a !;]k;!.EX + @.EX \.PROG.#.DATA..BLNK.ITOI% #.EX ;;;" " _; D;!.FX + @.FX \.PROG.#.DATA..BLNK.RTOI% #.FX ;;;" " ]; D;!.GX + @.GX \.PROG.#.DATA..BLNK.DTOI% #.GX ;;;" " X; D;!.HX + @.HX \.PROG.#.DATA..BLNK.CTOI% #.HX ;;;" " Y; D;!.IX + @.IX \.PROG.#.DATA..BLNK.RTOR% #.IX ;;;" " Y; D;!.JX + @.JX \.PROG.#.DATA..BLNK.DTOD% #.JX ;;;" " M; D;(INT1 )>INT1 .DATA..EMUL.[](CEXP ) { %){ i%)*{ i%)* > CEXP 9.DATA..EMUL..SX TEMP% FIX% RTN% EXP COS SIN [  ](CSIN ) i{iB{%){i i6{ %)ii*i 6f{ i B{%)iii 6i*> CSIN {.DATA..EMUL..SX FIX% RTN% RCON% TEMP% EXP COS SIN ['  ^  ](CCOS ) i{iB{%){i i6{ %)ii*i 6Bf{ i B{%)iii 6i*> CCOS |.DATA..EMUL..SX FIX% RTN% RCON% TEMP% EXP SIN COS ['  _  ](CLOG ){f % ) %){ %) > CLOG 0.DATA..EMUL..SX FIX% RTN% ALOG CABS ATAN2 [  ](CSQRT ){%)f%)i6%){ iii*6i   i{iB{ i B > CSQRT x.DATA..EMUL..SX FIX% RTN% TEMP% RCON% SQRT ABS CABS [  An^](INT ){u]1>INT .DATA..EMUL.[](AMOD ){uuu6%)u*>AMOD ".DATA. .EMUL.AINT [](MOD ){rrr3r'>MOD .DATA..EMUL.[](IABS )r{f?>IABS #.DATA..EMUL.[](FLOAT ){r]>FLOAT .DATA..EMUL.[](IFIX ){u]1>IFIX .DATA..EMUL.[](SIGN )i{iBu{iB>SIGN 6.DATA..EMUL.[*2](ISIGN )f{f?r{f?>ISIGN 6.DATA..EMUL.[*2](DSIGN )l{lE x{lE >DSIGN 6.DATA. .EMUL.[*2](DIM ){uui >DIM &.DATA..EMUL.RCON% RDATA%[ "](IDIM ){rrf<>IDIM %.DATA..EMUL.[!](REAL )>REAL .DATA. .EMUL..SX [](AIMAG )=>AIMAG .DATA..EMUL..SX [  ](DBLE ){u]8 >DBLE .DATA. .EMUL.[](CMPLX )fufu<<= >CMPLX .DATA..EMUL..SX [  ](CONJG )ffSB<=>CONJG .DATA..EMUL..SX [   ](CABS ){fSfS*f Sf S* % )<< = >CABS 8.DATA..EMUL..SX SQRT [  ](DMOD ){xxx9%)x-! >DMOD ".DATA..EMUL.DINT [ ](IDINT ){x]q>IDINT .DATA..EMUL.[](SNGL ){x]s>SNGL .DATA..EMUL.[](AINT )i {iB f {iB<>AINT B.DATA. .EMUL.INT% INTR% [ '>](DINT )l {lE f {lE <>DINT B.DATA..EMUL.INT% INTR% [   '>](IRTR% ){f]>IRTR% .DATA..EMUL.IRTN% [](CMPMM%)c ~ c~i i ZW WllZWWc~i i ZW~llZW~>CMPMM%c.DATA..EMUL.MXMNM%[ <)""55ETQ`](RTNI% ){l]q>RTNI% .DATA..EMUL.MXMNM%[ ](RTNR% ){l]s>RTNR% .DATA..EMUL.MXMNM%[ ](RTND% )>RTND% .DATA. .EMUL.MXMNM%[ ](DTOI% )  x f{f?  ffK{ll- ff ZA~{ll- {fff{l l9 <>DTOI% .DATA..EMUL.MXPRM%DCON% DDATA%TEMP% MAXBT%[ 3>Rp~](RTOI% ) u f {f? ffK{ii*ffZA~{ii*{fff {ii6<>RTOI% .DATA..EMUL.MXPRM%RCON% RDATA%MAXBT%[ 3> Rp~](CTOI% ){i]? r { r?~  { % ) f fK{ll0 ff ZA~{ll0 {ffrfZ{il`?< <A<<>CTOI% .DATA.(.EMUL..SX IMXBIT[ %+ "$@^l&](ITOI% ) r  f{f? ffK{ff'ffZA~{ff'{fff {ff3< <>ITOI% .DATA..EMUL.MXPRM%TEMP% MAXBT%[ 1<Pn|](RTOR% )u{f%){iu*{ % )>RTOR% ?.DATA..EMUL.ALOG EXP [ 5 ](DTOD% )x{f%) {lx- { % ) >DTOD% ?.DATA..EMUL.DLOG DEXP [ 5 ](SIN ){u]8 {%)]s>SIN .DATA..EMUL.SC% [](COS ){lu]7 {%)]s<A ">COS ".DATA..EMUL.SC% [](SC% )<(=O  ?nh/j@ 3;lƈ@QW A 17) xfxE xi]7Z~{xl- {l]qflf]! fxx xl Z~fl x! {xx- {% ') {xl- ffK{fNf{lE ~ !%! )<E<@(`ۓ<<< =">SC% .DATA.c.EMUL.DCON% DPEV% PERR% [" ]:!<1@HkvJLVXY]](TANH )f % )iZ ~ {uu{ %){iiii6~{f %){ii6{iiii6>TANH q.DATA..EMUL.RCON% TEMP% ABS EXP [C m](EXP )< A PO< >=A?i?rU@[@X=A< @@) i { i Bi iZ~{i l`7- {l]q{lf]!]sii Z~ {ii {% #)%){ii*f{ii6~" %"!)<BU<A <EXP .DATA.\.EMUL.TEMP% RCON% APEV% SETEXPPERR% [#V"&*,"-0;4<n>@JQRV](ATAN2 )<A < A!< A2C)u u  {%)~{uu6{%)u{ii u{ii ~%)<>ATAN2 z.DATA.!.EMUL.RCON% ABS ATAN PERR% [ (kvG]](ATAN )< A < ?c_?1>?+@ @@@UA){ %  )%)i{iBiiZÄ~{ii6{ii*{%#){ii*f{i if{iB% )<=>ATAN .DATA.R.EMUL.RCON% IGTERRSETERRAPEV% [L&*,0468/:HV<>HL](ALOG ){f%)i *u < Ak>ALOG +.DATA..EMUL.RCON% ALOG10[  !'](ALOG10)< A PO< @&'< @D< @`@% @o-)u uiZC~{%)%)f?%){ii *{iiii6{ii*{%#){ii*{fi `*{ii ii ~ % )~<<<=!> ALOG10.DATA.O.EMUL.RCON% ILOG2 SETEXPRSHIFTAPEV% PERR% [!I"$(/18: DEI](SQRT )< @ׂAj@!/< @@)u {%)% )f?%){%#)ffK{f?%) % ){ii*i*$"{i iui6*#~ '%%'&)<A PO<<<$<&=(> SQRT .DATA.e.EMUL.RCON% ILOG2 SETEXPRSHIFTAPEV% ISHIFTPERR% [(_"&(,35<>Y HOV{X Z[_](DTANH )f%)lZ ~ { xx { %  ) {ll!ll9 ~{f %) { ll9 {ll !ll 9 >DTANH q.DATA..EMUL.DCON% DABS DEXP [ Cm](DEXP )< A PO3?< @@< ?/K/kB IC/OAo< ABt=tJDæS) l{lE llZ~{ll- {l]q{lf]! ll Z~ {ll ! {ll- {%') { % ') {ll- {llll!9 "!%"){ll- f#{ll9 ~$'%%'&)<BU<A <<&=( =(">DEXP .DATA..EMUL.DCON% DPEV% DSTEXPPERR% [(:B "JRZ"-\;dltj{v~](DCOS ){lx! {%) <A ">DCOS .DATA..EMUL.DSIN [ ](DSIN )< (Avn8B(D kEŊKE^}y-< AB6SD 谛E&U|) l  { l E l lZ~{ l l- {l ]q{ l f]! { l l  l lZ~{ ll ! {l l - {%') {%') {l l-l9 ffK{ f Nf {lE ~ #!%#")<E<@(`ۓ<<<<"=$ =$2>DSIN .DATA..EMUL.DCON% DPEV% PERR% [$ 2RZ'\5dloznvx](DATAN2)<A "< A!TD-< A2CZ1)x x  x{lE ~{xx9 {%) x{ll  x{ll ! ~%)<>DATAN2.DATA.-.EMUL.DCON% DATAN PERR% [ 8{-$Wm()](DATAN )< A "< 8@  q*AZPIB`J#EC"WXlCVM3h;C^ŕ~C%o< 8AB};&C 8cC8~Cr\@CkRl0C%o){ % )% )  l{lE llZDŽ~{ll9 {ll- {%') {%') {ll-l9 f{l l! f{lE %  )<=! =!B>DATAN .DATA..EMUL.DCON% IGTERRSETERRDPEV% [!z B/:HV](DLOG ){f%)l - x < AkU>DLOG +.DATA..EMUL.DCON% DLOG10[  !'](DLOG10)<A PO3?< @&&>< @DPy< 8@ kÁ@ k.@ Z9x@{Nh@ DLOG10.DATA..EMUL.DCON% ILOG2 DSTEXPDSHIFTDPEV% PERR% [!BJR Zbjnpwy ](DSQRT )< @@< @ׂAj@!/){x]s i{%)%)f?%){!%!# )ffK"{ff#3$%$){ii*i*]8 (&{l lxl9- '~+)%+*){i]8 <A PO<<< <#<(<*=, > DSQRT .DATA.n.EMUL.DDATA%RCON% DCON% ILOG2 SETEXPRSHIFTAPEV% PERR% [,h  "&*.046 =?F JL\VX_~a cdh](ABS )u{iB>ABS #.DATA..EMUL.[](DABS )x{lE >DABS #.DATA. .EMUL.[](DPEV% )r@{fW r! {lx-f W << =>DPEV% A.DATA..EMUL.DDATA%[:](APEV% )r@{fSr! {iu*f S << =>APEV% A.DATA..EMUL.RDATA%[ : ](RDATA%)<<A<A>RDATA%.DATA..EMUL.RCON% [](DDATA%)<<A<A>DDATA%.DATA..EMUL.DCON% []!PERR% + @PERR% \.PROG..DATA..BLNK.IOERRX\GTARGBC#PERR% ; 3=;!.RINT.g+ @INTR% }\.PROG.>.DATA..BLNK.INT% #INTR% |;a:@0!);G_>(;`!;'{DGyw#wx#6;<;