Category : Pascal Source Code
Archive   : EJCPLX01.ZIP
Filename : TRIG.TPU

 
Output of file : TRIG.TPU contained in archive : EJCPLX01.ZIP

TPU6Â@|DÌÌÌÜì´¶¨
~ë œ»”Õà õz ^ëKò6MÐU 0 ¡rÆæÁ z YTRIGCÒÒYSYSTEMaéQ
DEGREETYPEöÊþ0RDEGREES¢ÜRMINUTES0¢ÜRSECONDS ¢ÜPINFINITYžÜ{,—®P™v–}@STANV 
¢Ü¢ÜSARCSIN¡ 
¢Ü¢ÜSARCCOS ¿ 
¢Ü¢ÜSDEGREESTORADIANSð 
¢Ü¢ÜÇSRADIANSTODEGREES 
¢Ü¢ÜS
SIN_DEGREE, 
¢Ü¢ÜS
COS_DEGREEJ 
¢Ü¢ÜäS
TAN_DEGREE h 
¢Ü¢ÜS
ARCSIN_DEGREE$† 
¢Ü¢ÜS
ARCCOS_DEGREE(¤ 
¢Ü¢ÜS
ARCTAN_DEGREE, 
¢Ü¢ÜSDEGREEPARTSTODEGREES0à 
¢Ü¢Ü¢Ü¢ÜSDEGREEPARTSTORADIANS4&

¢Ü¢Ü¢Ü¢ÜSDEGREESTODEGREEPARTS8l

¢Ü¢Ü¢Ü¢ÜXSRADIANSTODEGREEPARTS<È

¢Ü¢Ü¢Ü¢ÜSSIN_DEGREEPARTS@"
¢Ü¢Ü¢Ü¢Ü#SCOS_DEGREEPARTSDh
¢Ü¢Ü¢Ü¢ÜSTAN_DEGREEPARTSH®
¢Ü¢Ü¢Ü¢ÜSARCSIN_DEGREEPARTSLô
¢Ü¢Ü¢Ü¢Ü›SARCCOS_DEGREEPARTSP:
¢Ü¢Ü¢Ü¢ÜSARCTAN_DEGREEPARTST€
¢Ü¢Ü¢Ü¢ÜSDEGREETYPETODEGREESXÆ
¢ÜöÊSDEGREETYPETORADIANS\æ
¢ÜöÊSDEGREETYPETODEGREEPARTS`
öʢܢܢÜiSDEGREESTODEGREETYPEdb
¢ÜöÊšSRADIANSTODEGREETYPEh–
¢ÜöÊËSDEGREEPARTSTODEGREETYPElÊ
¢Ü¢Ü¢ÜöÊ„SSIN_DEGREETYPEp&
¢ÜöÊsSCOS_DEGREETYPEtF
¢ÜöÊDSTAN_DEGREETYPExf
¢ÜöÊ/SARCSIN_DEGREETYPE|†
¢ÜöÊñSARCCOS_DEGREETYPE€¦
¢ÜöÊ£SARCTAN_DEGREETYPE„Æ
¢ÜöÊSSINHˆæ
¢Ü¢Ü¿SCOSHŒ/
¢Ü¢ÜSTANHg
¢Ü¢ÜSCOTH”…
¢Ü¢ÜÒSSECH˜£
¢Ü¢ÜSCSCHœÁ
¢Ü¢ÜSARCSINH ß
¢Ü¢ÜCSARCCOSH¤
¢Ü¢ÜSARCTANH¨=
¢Ü¢ÜSARCCOTH¬l
¢Ü¢ÜÂSARCSECH°Š
¢Ü¢Ü{SARCCSCH´¨
¢Ü¢ÜõSLOG10¸Æ
¢Ü¢ÜXSLOG¼å
¢Ü¢Ü¢ÜSPOWERÀ
¢Ü¢Ü¢ÜESROOTÄI
¢Ü¢Ü¢Ü~ë œ»”¶
ÕÃ > ú
õz ^ëKØ
ò6MÐU 0 ¡r ÆæÁ z PRADIANSPERDEGREEžÜ¼‡è–5úŽù?”
PDEGREESPERRADIANžÜ²°¥Óà.å@PMINUTESPERDEGREEžÜð@PSECONDSPERDEGREEžÜá
@PSECONDSPERMINUTEžÜð@PLNOF10žÜƒ«K¬Ý]“@Š t RRADIANS^¢Ü` R COSINEVALôÿ^¢ÜR
TANGENTVALîÿ^¢Ü« RINVALUE¢ÜÝ RINVALUE£¢ÜÉ RRESULTôÿ£¢Üú RDEGREESÇ¢Ü RRADIANSõ¢Ü6 RDEGREES#¢ÜT RDEGREESK¢Ür RDEGREESs¢Ü RDEGREES›¢Ü® RDEGREESÆ¢ÜÌ RDEGREESñ¢Ü
þ RDEGREES¢ÜRMINUTES ¢Üê RSECONDS¢ÜX
D
RDEGREESX¢ÜRMINUTES X¢Ü0
RSECONDSX¢Ü´
v
 
R DEGREESIN”¢ÜRDEGREES”¢ÜRMINUTES
”¢ÜŒ
RSECONDS”¢Üú
Ò
RRADIANSÕ¢ÜRDEGREESÕ¢ÜRMINUTES
Õ¢Üæ
RSECONDSÕ¢ÜT@RDEGREES¢ÜRMINUTES ¢Ü,RSECONDS¢Üš†RDEGREESM¢ÜRMINUTES M¢ÜrRSECONDSM¢ÜàÌRDEGREES„¢ÜRMINUTES „¢Ü¸RSECONDS„¢Ü&RDEGREES»¢ÜRMINUTES »¢ÜþRSECONDS»¢ÜlXRDEGREESõ¢ÜRMINUTES õ¢ÜDRSECONDSõ¢Ü²žRDEGREES/¢ÜRMINUTES /¢ÜŠRSECONDS/¢ÜÐR DEGREEVARèÿiöÊðR DEGREEVARèÿšöÊN:R DEGREEVARîÿËöÊRDEGREESË¢ÜRMINUTES
Ë¢Ü&RSECONDSˢ܀RDEGREES
¢ÜlR DEGREEVARöÊ´ RRADIANS
E¢ÜR DEGREEVAREöÊèRDEGREES{¢ÜRMINUTES{¢ÜÔRSECONDS
{¢ÜüR DEGREEVAR{öÊ0R DEGREEVARèÿ¿öÊPR DEGREEVARèÿëöÊpR DEGREEVARèÿöʐR DEGREEVARèÿCöÊ°R DEGREEVARèÿröÊÐR DEGREEVARèÿ¡öÊRINVALUEТÜPMAXVALUEžÜÏ>3áÇ3°@ðRSIGNôÿТÜ9MRINVALUEò¢ÜPMAXVALUEžÜÏ>3áÇ3°@qRINVALUE¢ÜRINVALUE6¢Ü­RINVALUEX¢ÜËRINVALUEz¢ÜýRINVALUEœ¢ÜéRSIGNôÿœ¢Ü,RINVALUEÁ¢ÜRSIGNôÿÁ¢Ü[RINVALUEæ¢ÜGRSIGNôÿæ¢ÜvRINVALUE ¢Ü”RINVALUE0 ¢Ü²RINVALUEU ¢ÜÐRINNUMBERz ¢ÜïRBASE  ¢ÜRINNUMBER ¢Ü4RINNUMBER à ¢ÜREXPONENTà ¢ÜShRINNUMBER ë ¢ÜRTHEROOTë ¢Üÿÿÿÿ (08@HPX`hpx€ˆ˜ ¨°¸ÀÈÐØàèðø (08@HPX`hpx€Í00Ñ@'5=5J0W0d2q2~2‹0˜c ¥D³Ç0Á,ÒBàBíDúDDB#P1A?dL-[4iPw?†?“A A­Aº?ÇÝ8Ô—(êCûC=="´8/´8B¿8U:h:u:‚:Eœ›0©C»SYSTEMTRIGÎ]BTRIG.PAS^y
%2‹P£˜ J"Ǫ õ¯ #´K¹s¾›ÃÆÈñÍÖNXÜ/”ã7!!)Õí#ó-Mø-„ý/»/õ//-i(šË$+$E1+{8¿?ëDICNrS¡XÐe QòuC~.6ƒ.Xˆ(z(œ” RÁ¡ Ræ® ] ¹%0 ¾%U Ã%z Ï% Ô0à Ù,ë ã.U‰åƒì‹F‹^‹V
š‰Fô‰^ö‰Vø‹Fô‹^ö‹Vø1É1ö1ÿšuÇFúÿ¯ÇFüP™ÇFþvëz‹F‹^‹V
š‹Nô‹vö‹~øš‰Fî‰^ð‰Vò‹Fî‹^ð‹Vò¹ÿ¯¾P™¿v–šr‹Fî‹^ð‹Vò¹ÿ¯¾P™¿všvÇFúÿ¯ÇFüP™ÇFþvë‹Fî‹^ð‹Vò‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì‹F‹^‹V
€æ¹1ö1ÿšuÇFú!ÇFü¢ÚÇFþIëP‹F‹^‹V
‹N‹v‹~
šRSP¸1Û1ÒY^_ššRSP‹F‹^‹V
Y^_šš‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì ‹F‹^‹V
1É1ö1ÿšuÇFú!ÇFü¢ÚÇFþI锋F‹^‹V
‹N‹v‹~
šRSP¸1Û1ÒY^_šš‹N‹v‹~
šš‰Fô‰^ö‰Vø‹F‹^‹V
1É1ö1ÿšs"‹Fô‹^ö‹Vø¹‚!¾¢Ú¿Iš‰Fú‰^ü‰Vþë‹Fô‹^ö‹Vø‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì‹F‹^‹V
¹{—¾5¿úš‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì‹F‹^‹V
¹†¾Óà¿.eš‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿv
ÿvÿv蚉Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿv
ÿvÿv蚉Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿv
ÿvÿvèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿv
ÿvÿvèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿv
ÿvÿvèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿv
ÿvÿv蚉Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì‹F‹^‹V
¹Œ1ö¿ašRSP‹F ‹^‹V¹†1ö¿pš‹N‹v‹~šY^_š‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿvÿvÿvÿvÿvÿv ÿv
ÿvÿvèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰å‹F‹^‹VšÄ~&‰&‰]&‰U‹F‹^‹VÄ~&‹
&‹u&‹}š¹†1ö¿pšÄ~
&‰&‰]&‰UÄ~
&‹&‹]&‹UšÄ~&‰&‰]&‰UÄ~
&‹&‹]&‹UšÄ~
&‰&‰]&‰UÄ~&‹&‹]&‹U¹†1ö¿pšÄ~&‰&‰]&‰U‰ì]ÊU‰åÿvÿvÿvèRSPÄ~WÄ~
WÄ~Wè‰ì]ÊU‰åƒìÿvÿvÿvÿvÿvÿv ÿv
ÿvÿv蚉Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿvÿvÿvÿvÿvÿv ÿv
ÿvÿv蚉Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿvÿvÿvÿvÿvÿv ÿv
ÿvÿvèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿvÿvÿvÿvÿvÿv ÿv
ÿvÿvèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿvÿvÿvÿvÿvÿv ÿv
ÿvÿvèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿvÿvÿvÿvÿvÿv ÿv
ÿvÿv蚉Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÄ~W~èW¸Pšÿvìÿvêÿvèÿvòÿvðÿvîÿvøÿvöÿvôè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÄ~W~èW¸Pš~èWèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÄ~W~îW¸Pš‹Fî‹^ð‹VòÄ~&‰&‰]&‰U‹Fô‹^ö‹VøÄ~
&‰&‰]&‰U‹Fú‹^ü‹VþÄ~&‰&‰]&‰U‰ì]ÊU‰åÿvÿv ÿv
Ä~WÄ~ÇWÄ~Ç Wè‰ì]Ê
U‰åÿvÿv ÿv
èRSPÄ~WÄ~ÇWÄ~Ç Wè‰ì]Ê
U‰å‹F‹^‹VÄ~&‰&‰]&‰U‹F‹^‹VÄ~&‰E&‰]&‰U
‹F
‹^ ‹VÄ~&‰E &‰]&‰U‰ì]ÊU‰åƒìÄ~W~èW¸Pš~èW蚉Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÄ~W~èW¸Pš~èW蚉Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÄ~W~èW¸Pš~èWèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÄ~W~èW¸Pš~èWèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÄ~W~èW¸Pš~èWèRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÄ~W~èW¸Pš~èW蚉Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì ÇFôÇFöÇFø‹F‹^‹V
1É1ö1ÿšs(ÇFôÇFöÇFø€‹F‹^‹V
Àt€ö€‰F‰^‰V
‹F‹^‹V
¹‡á¾Ç3¿0švÇFúÿ¯ÇFüP™ÇFþvëQ‹F‹^‹V
Àt€ö€šRSP‹F‹^‹V
šY^_š¹‚1ö1ÿš‹Nô‹vö‹~øš‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì‹F‹^‹V
€æ‰F‰^‰V
‹F‹^‹V
¹‡á¾Ç3¿0švÇFúÿ¯ÇFüP™ÇFþvëC‹F‹^‹V
Àt€ö€šRSP‹F‹^‹V
šY^_š¹‚1ö1ÿš‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿv
ÿvÿvèRSPÿv
ÿvÿvèY^_š‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿv
ÿvÿvèRSPÿv
ÿvÿvèY^_š‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿv
ÿvÿvèRSP¸1Û1ÒY^_š‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒìÿv
ÿvÿvèRSP¸1Û1ÒY^_š‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì ÇFôÇFöÇFø‹F‹^‹V
1É1ö1ÿšs(ÇFôÇFöÇFø€‹F‹^‹V
Àt€ö€‰F‰^‰V
‹F‹^‹V
‹N‹v‹~
š¹1ö1ÿšš‹N‹v‹~
šš‹Nô‹vö‹~øš‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì ÇFôÇFöÇFø‹F‹^‹V
1É1ö1ÿšs(ÇFôÇFöÇFø€‹F‹^‹V
Àt€ö€‰F‰^‰V
‹F‹^‹V
‹N‹v‹~
š¹1ö1ÿšš‹N‹v‹~
šš‹Nô‹vö‹~øš‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì ÇFôÇFöÇFø‹F‹^‹V
1É1ö1ÿšs(ÇFôÇFöÇFø€‹F‹^‹V
Àt€ö€‰F‰^‰V
¸1Û1ҋN‹v‹~
šRSP¸1Û1ҋN‹v‹~
šY^_šš¹‚1ö1ÿš‹Nô‹vö‹~øš‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì¸1Û1ҋN‹v‹~
šRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì¸1Û1ҋN‹v‹~
šRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì¸1Û1ҋN‹v‹~
šRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì‹F‹^‹V
š¹‚¬¾Ý¿]š‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]ÊU‰åƒì‹F ‹^‹VšRSP‹F‹^‹V
šY^_š‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]Ê U‰åƒì‹F ‹^‹V1É1ö1ÿšv,‹F ‹^‹Vš‹N‹v‹~
šš‰Fú‰^ü‰VþëD‹F ‹^‹V1É1ö1ÿšuÇFúÇFüÇFþë‹F ‹^‹V1É1ö1ÿš‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]Ê U‰åƒìÿvÿvÿv ¸1Û1ҋN‹v‹~
šRSPè‰Fú‰^ü‰Vþ‹Fú‹^ü‹Vþ‰ì]Ê 0ü0È-0øN0Ä\0È|0È•0È0ÀD0¼V0ô[0Äo0t0È0ÀA0¼S0ôX0Äf0k0Ȉ0¸¡0À0À 0ø 0ü       00Ä0Ä10¸?0¸G 0# *0ì
0¼70ÀD0ðe0ì†0À¯  8$ 4#0ø& 4#0ü& 4# * 4# * 4# * 4#0&0 060 X '0 8%  8,0 \ 0ø#0 \ 0ü#0 \ '0 \ '0 \ '0 \ 0#0È%0Èf0Ž0Ÿ0¼§0ij0ÀÁ0È.0V0g0¸o0Ä{ Œ ˆ!0Ä' ˆ Œ!0Ä' Œ0Ä! ˆ0Ä!0È%0Àf0¸r0ôw0¸…0Š0À˜0È%0Àf0¼r0ôw0¸…0Š0À˜0È%0¼d0¸|0Ä„0‰0Ä•0À£0Ä ¨ 0Ä ¤ 0Ä   00Ä00!0Ä)0È0&0À4090ÈX0Ä0Ä À)