1PAGE 1 EXPONENTIATION TEST (C) 1978 UND
* * * * * S O U R C E L I S T I N G * * * * *
0001 TITLE EXPONENTIATION TEST
0002 * NARROW
0003 * CHECK
0004 * EULER
0005 L LEVEL.K=INTGRL(RATE.JK)
0006 N LEVEL=1
0007 R RATE.KL=LEVEL.K
0008 S ZERZER.K=0**0
0009 S ZERANY.K=0**TIME.K
0010 S ANYZER.K=TIME.K**0
0011 S POSPOS.K=TIME.K**TIME.K
0012 S POSNEG.K=TIME.K**(-TIME.K)
0013 S NEGPOS.K=(-TIME.K)**TIME.K
0014 S NEGNEG.K=(-TIME.K)**(-TIME.K)
0015 S POSPF.K=TIME.K**(1/(TIME.K+1))
0016 S POSFN.K=TIME.K**(-1/(TIME.K+1))
0017 S NEGFP.K=(-TIME.K)**(1/(TIME.K+1))
0018 S NEGFN.K=(-TIME.K)**(-1/(TIME.K+1))
0019 PARM DT=1
0020 PARM STOP=3
0021 PARM PRTPER=1
0022 NOTE THE CONDITIONS WITH ZERO
0023 PRINT ZERZER,ZERANY,ANYZER
0024 NOTE COMBINATIONS OF POSITIVE AND NEGATIVE
0025 PRINT POSPOS,POSNEG,NEGPOS,NEGNEG
0026 NOTE COMBINATIONS WITH FRACTIONAL EXPONENTS
0027 PRINT POSPF,POSFN,NEGFP,NEGFN
1PAGE 2 EXPONENTIATION TEST (C) 1978 UND
* * * S T A T S A N D O P T I O N S * * *
27 SOURCE STATEMENTS
NO DIAGNOSTIC MESSAGES
CARD TYPE OCCURRENCE
PARM 3
N 1
L 1
R 1
S 11
* 3
NOTE 3
PRINT 3
TITLE 1
OPTIONS IN EFFECT:
CHECK NOSYSTEM NODOCUMENT NARROW
STATS GO NOSYMBOL NOXREF
WARN NOOBJECT SOURCE NOTIME
INTEGRATION METHOD:
EULER LOWER SUM
1PAGE 3 EXPONENTIATION TEST - THE CONDITIONS WITH ZERO (C) 1978 UND
TIME ZERZER ZERANY ANYZER
0.0000 1.0000 1.0000 1.0000
1.0000 1.0000 0.0000 1.0000
2.0000 1.0000 0.0000 1.0000
3.0000 1.0000 0.0000 1.0000
1PAGE 4 EXPONENTIATION TEST - COMBINATIONS OF POSITIVE A (C) 1978 UND
TIME POSPOS POSNEG NEGPOS NEGNEG
0.0000 1.000 1.0000 1.000 1.0000
1.0000 1.000 1.0000 -.000 -1.0000
2.0000 4.000 0.2500 4.000 0.2500
3.0000 27.000 0.0370 -27.000 -0.0370
1PAGE 5 EXPONENTIATION TEST - COMBINATIONS WITH FRACTION (C) 1978 UND
TIME POSPF POSFN NEGFP NEGFN
0.0000 0.0000 0.0000 0.0000 0.0000
1.0000 1.0000 1.0000 -1.0000 -1.0000
2.0000 1.2599 0.7937 1.2599 0.7937
3.0000 1.3161 0.7598 1.3161 0.7598