Google
 

Trailing-Edge - PDP-10 Archives - FORTRAN-10_V7wLink_Feb83 - mthmsg.rlr
There is 1 other file named mthmsg.rlr in the archive. Click here to see a list.
Xae5555a5f5xe,e?0Hi,eVpHk,SC(	 DDHm,eC(Hp,
SBxHs	""",eBxHv,EBxHx,	 EC(H{,CSPH},CRH	(@@"H,eRHH,#eSH
,&	   *C'PH,*CKPH,-C'	"3H,1C&HH,4CjhH#	(;,8ukP	H',;uH	H,,?EBH	 DDD
H3,B]
H6,Fu'PH:	"""L,IC>HH?,MEP
HD,P	 U]:
HH,Tu:Hs	(@@]HR,[0a@<HU,^]?HW,b	 f[@H\$N: Result overflow$N: Result underflow$N: Imagin	 nary part underflow$N: Real part underflow$N: Imaginary part overflow$N: Real p	 wart overflow$N: Both parts overflow$N: Both parts underflow$N: ABS(arg) too lar	 ge; result=zero$N: ABS(arg) too large; result=infinity$N: REAL(arg) too large; 	 IMAG(result)=+infinity$N: REAL(arg) too large; REAL(result)=+infinity$N: ABS(IM	 AG(arg)) too large; result=zero$N: ABS(REAL(arg)) too large; result=zero$N: A	 BS(IMAG(arg)) too large; REAL(result)=infinity$N: ABS(IMAG(arg)) too large; IMAG(	 !result)=infinity$N: Arg is zero; result=-infinity$N: Zero ** zero is indetermin	 *ate, result=zero$N: Zero ** (negative,any) is indeterminate, result=(infinity,inf	 2inity)$N: Both parts indeterminate$N: Negative arg; result=$N(ABS(arg))$N: A	 ;rg is zero; result=(-infinity,zero)$N: ABS(arg) greater than 1.0; result=+infini	 Cty$N: Both arguments are zero; result=zero$N: Negative base ** non-integer;  	 LABS(base) used$N: Zero ** negative exponent; result=infinityCMATH: Complex overf	 TlowCMATH: Complex underflowERRSET: Error number out of range - ignoredMTHOP: fun ]ction code exceeds range	"P [hP [|
5a#5f&	D"5xeeW.GPy((