From: SMTP%"ALLAN@otago.ac.nz" 30-JUL-1991 21:41:46.84 To: hagood@scri1.scri.fsu.edu CC: Subj: Real Number Checker Date: Wed, 31 Jul 91 13:20 GMT +1200 From: Allan Udy Subject: Real Number Checker To: hagood@scri1.scri.fsu.edu X-VMS-To: IN%"hagood@scri1.scri.fsu.edu" ClassExtended Determines if the passed string is actually a real number, or if it is an invalid number. See External Mover comments for parameters. (This file must be converted with BinHex 4.0) :$80XBA0c4AKdC@jNC@3!8%9B9$4%69J!!!!!!!!!!!4&6LJ!!!!!!3!!!!2*!!! #b3!!!(`[$NkkrGT)E3GD5'lrm+Q4F!5`E[r`CJB[$NkkrF*`"Je$E'&cFd9iG'9 ZC'9N!J!!!&"&@&3d4%eB!!!!!!!!!!"349K80%40@!!!!!!!!!!!!!!!!!!!!!! !!!!!!!!!!+2bLai!!!!!!!!%4Il+5-![!#mm!!!!FNkY!'SJ(d(`#,"$l[lNF"- Jf9()rr``NA!+X'lrm'B!!*i[,[rm2c`!#NKZrrC)E[rX5'lrj+Q0,blrl%KZrZ5 TN!")E[lN2c`!(NkY%aT+E[l+AX!b,[l+XQlqNPr"`!&RA#"ZrXBJ8$!ZrXVP3#K `!2`J9%2Z!!!!MNj@!!"#CbmZ!!K1ZJ"f%"p)J$e!!!a1ALkI6R@%68&*6J!!!$! m%""b"'!'-$`)%())60m$!#32Rm%[#8K[!!3r!+RV8B&Z)&#"5&F[!JC!!!`r!+R Vhm%`&dM!D`46!'!#4J!HJ%l398")9dK[!!3r!!4!,rkTkf$1-$``%()+B,!JAdK [!!4b!(!FB-3!!!!+!!%d4&4&1TJkQ!!!!GG$D'9MDb"dD'8JFQ9KE#"ZG@eLCA) Z)&4SC5"bCA0eE(3JD@jND@0KG'8JG'KP)'0XBA0c)'pQ)(4SC5"`BA*KE@9dCA) J9'K[Ff8JBfaKFh0PFb"KFQ8k$5!J)#!J-$SJ6Qpd)'%JER9YBQ9b$5!J)#!J-6S J6Qpd)'%JER9YBQ9b$5!J)#!J-MSJD@jQD@jTG(N0)#!J)#!c1L"kCA*[$5!J)#! J0$SJEQpbE@&XDATPC#"ZG@eLCA)0)#!J)#!e1L"%C@j[FQeKE'PkC@3JER9YBQ9 b$3e"ERNJFQ9cG@ad)(9ZC'9b)$-J+$!X-5"[FL!b+5"cD'peE'3JBQ8JD@jdCA* `FQ9dC@3JBA-JB@iJD@jfB@aTC#"ZG@eLCA)Z$3e"EQ4bC5"$BACPCfiX)%eTBh* [)%0[ER0eE(4TEQFJ8bj",Je"GLiJC'9c)%0PFQPcD@9bFb!a-L`J3dJY-6!`15" 3G@aXH3e6GfPdHQ9bE'&ZC!d0$9"[Fh4$BA*N9f&bC6SJD@BJH@pe)(9cC5"TG#` JFf9ZC#"YC5"K)("[Fh4MBA*N)#KKEQ3JGfPZ)(4SC5"LC@&eG'PQG@aPFh3JF'p cG'0KFQ3JBfpZG'9cG#NJ$3ebC5"$BACPCfi06@PMFQmJ3fpZFh9XG'PZCb"6,N% Z$8&f,L"NCA-J3f9bDA0TCA*c)$%b$80),6%`-$NJ8(9XE(N08hGTG(TPFQaKEQ3 !!!%!!!!$b3!!!XN!!!"m!$DRe!4U!!!!(!"D!!)d4%9B!!!!'M4#6N3!!!!Q0%4 843!!!$)kQ!!1)!!!!!!frTJkQ!!!)!!!NJ!frT`kQ2rr!!!!S!!frT!!$80XBA0 c4AKdC@jNC@363faKFh0&H(4PEQ4PC#JQ8LNk5G`*: