Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-05 - decus/20-0137/bmd/bmd02t.exe
There is 1 other file named bmd02t.exe in the archive. Click here to see a list.
?p0`0 0`
?hX
S?x " 
 
<++G2	`~	p70l
SFa2l(YES  FINISH    PROBLM    SELECT    (1H177H BMD02T-AUTOCOVARIANCE AND POWER SPECTRAL ANALYSIS -REVISED JANUARY 15, 1969/2X40HHEALTH SCIENCES COMPUTING FACILITY, UCLA//)(2A6,4A3,F5.0,I2,I4,I3,2I2,F5.0,A6,A3,12X,2I2)(1H0///'0FINISH CARD ENCOUNTERED.')(1H ///40X,26HP R O B L E M  N U M B E R,4X,A6/40X,26(1H*)///)(20X,31HINPUT DATA TO BE PRINTED OUT---A3//20X,33HINPUT SERIES TO BE PLOTTED OUT---A3//20X,13HDETRENDING---A3//20X,15HPREWHITENING---A3//20X,81HVALUE OF CONSTANT C USED IN THE PREWHITENING TRANSFORMATION Z(T)=X(T+1)-CX(T) ---F10.5//20X19HNUMBER OF SERIES = I2//20X,23HNUMBER OF DATA POINTS =I5//20X,24HNUMBER OF LAGS CHOSEN = I3//20X,28HNUMBER OF SELECTION CARDS = I2//20X,20HUSE PREVIOUS DATA---A3//)(20X,25HCONSTANT TIME INTERVAL = F10.5,1X,A6//)(20X,34HNUMBER OF VARIABLE FORMAT CARDS = I3//)(18A4)('0VARIABLE FORMAT IS'/(20X,18A4))(A6,1X,3A4,I2,A1,2I2,1X,6(I2,3A1,I2)/6X,9(I2,3A1,I2)/6X,4(I2,3A1,I2))(1H1,10X,77HSINCE PREWHITENING IS DONE IN THE INPUT DATA , CROSS-SPECTRUM IS NOT COMPUTED/10X,66HPROGRAM WILL PROCEED TO NEXT SERIES IN THE SELECTION CARD (IF ANY)/10X,39H OR TO THE NEXT SELECTION CARD (IF ANY))('0PROGRAM EXPECTS A ''PROBLM'' CARD.')(1H0,20X,47HCONSTANT USED IN PREWHITENING TRANSFORMATION IS,F7.5,23H,A VALUE NOT PERMITTED.)(1H0,37X,22HDATA STORAGE EXCEEDED.)(1H0,37X,29HNUMBER OF LAGS IS TOO LARGE =,I5)('0CONTROL CARD OUT OF ORDER OR MISPUNCHED. CARD IS PRINTED BELOW. '/1X,2A6,4A3,F5.0,I2,I4,I3,2I2,F5.0,A6,A3,12X,2I2)('0CONTROL CARD OUT OF ORDER OR MISPUNCHED. CARD IS PRINTED BELOW.'/1X,A6,1X,3A4,I2,A1,2I2)('0PROGRAM EXPECTS A ''SELECT'' CARD.')(1H0,37X,43HNUMBER OF SERIES IS OUTSIDE PROGRAM LIMITS.)(1H0,37X,43HNUMBER OF POINTS IS OUTSIDE PROGRAM LIMITS.)(1H0,37X,23HPROGRAM CANNOT PROCEED.)(1H0,37X,44HNO SELECTION CARD SPECIFIED. ONE IS ASSUMED.)~`~p Y~pBMD02T    + -<4 
Q D	x $ D	W <G,4 <H, <K,

3D
O2F
O+
a <U,, 	W1D+
` <X, <2,42
3D
O2F
O+  <Z,, <], <`,
 <b, <e,
"$
.	T$	T5$( <k, <n,
"$2.	U$	U5$+ <p, <s,
 	U D	~#	T D $3$	U+ 	T$	U0dh+!$3$+ 
3D
+7D	X+5d
+$+D "$D	X6b0b+	X $ F
N D  <w,
:; 
N+ <y,"	X $ F
N D  <|,
:; 
N+ "
97D+"	T $ F
M D
+	U.DZ1B F
M D  <,
:; 
M++ 
Q_D
LZD
: 
: <,
:
:; 
L+ <,"	X $ F
K D  <,
:; 
K+ <
,"	U $ F
KD  <
:; 
K+"	U $ . H 

P:Jl.$8&
; 
M+
9"$#2d++ D@dZ1B
: 
: <,
:
:;+"	T $ F D
: 
: <,
:
:;+	T $ . H 
	U.J 
TJl.$8&
91B, $.	U D	{d D	zd	U D	zf	U F	x 	x	z F	~ 	WF	x F	y	W!& F	y7`	V+-"	V $ F D	|@d	{ 
P@fp,F	X F	b,F	l Fz*d
"
 $ F D  <!,
:;+
O3D
2F
+$ <A,|6@	|+ " B 	v2D
+<",l"
 $ F
P D D	{ p F3F
L+<;,|$3D	|+ 6@	|+Z1B
2D	w+3D	S+ <3,P+ <$,,:; 
P+:	|; +
X7`	W+ <*,
+) <,,,+) </, <2,
+) <3,, <6, <9,
+) <C,, <F, <I,
+) <N,, <Q,,+
] <T,,+) <W,, $ D	V+
0
L
Q

;

P
X

`

X
L
Q

P
;`
L
Q

Pp	Wp	Wx	Xx
RX(0
O0
:$	R$	R$	S$	S(	T$	T$	U$	U$	V$	V(	W00$
$$	XX-`	WX
:X7($	R$	R$	S$	S(	T$	T$	U$	U$	V$
X`(	W00Xe$	XXj(^Xk(^h	W(
PXj(^Xk(^X_(
PX_(Th	W(T`	WXn0
O$	v$	w$	w$
L$	X${$
$p$	X$	b$	l${XuX
	(	TX
X
$	UX
X
 
0
O0
:$	R$	R$	S$	S(	T$	T$	U$	U$	V$	V(	W00$
$$	XX
6X
,	0
O$	v$	w$	w$
L$	X${$
X
:X
FX
@X
JYES  B    C    S    H    T         **   X    *    (1H1,21X,3HLAG,14X,15HCROSSCOVARIANCE,15X,15HCROSSCOVARIANCE/37X,9HOF SERIES,I3,4H AND,I3,11X,9HOF SERIES,I3,4H AND,I3/20X,1H(A6,1H),11X,15H(POSITIVE  TAU),15X,15H(NEGATIVE  TAU)//)(19X,F9.4,10X,F15.6,15X,F15.6)(1H1,7X,44HGRAPH OF CROSS-COVARIANCE FUNCTION OF SERIES,I3,4H AND,I3,36H PLOTTED AGAINST TIME UP TO A LAG OF,F9.4,1X,A6//)(12H1  FREQUENCY,6X,11HCO-SPECTRUM,6X,19HQUADRATURE SPECTRUM,5X,27HAMPLITUDE OF CROSS-SPECTRUM,4X,23HPHASE OF CROSS-SPECTRUM/1X,8H(CYCLES/A6,1H),6X,2HOF,19X,2HOF,26X,2HOF,27X,2HOF/16X,6HSERIES,I3,4H AND,I3,5X,6HSERIES,I3,4H AND,I3,12X,6HSERIES,I3,4H AND,I3,13X,6HSERIES,I3,4H AND,I3,2H *//)(3X,F8.3,5X,F14.7,7X,F14.7,14X,F14.7,15X,F14.7)(1H0,10X,37H* PHASE GIVEN IN FRACTION OF A CIRCLE)(1H1,8X,46HGRAPH OF AMPLITUDE OF CROSS-SPECTRUM OF SERIES,I3,4H ANDI3,42H (IN LOG SCALE) AGAINST FREQUENCY (CYCLES/A6,1H)//)(1H1,3X,33HPHASE OF CROSS-SPECTRUM OF SERIES,I3,4H AND,I3,63H -- PLOTTED IN FRACTIONS OF A CIRCLE AGAINST FREQUENCY (CYCLES/,A6,1H)//)(1H1,10X,5H*****/15X,29HTHE POWER SPECTRUM OF SERIES I3,5H AND I3,54H ARE NOT COMPUTED ACCORDING TO THIS SELECTION CARD NO.I3/15X,68HTHE COHERENCE SQUARE AND THE TRANSFER FUNCTIONS CANNOT BE CALCULATED/15X,5H*****)(13H1   FREQUENCY7X16HCOHERENCE SQUARE,11X,12HAMPLITUDE OF,13X,12HAMPLITUDE OF,15X,8HPHASE OF/9H (CYCLES/A6,1H),11X,2HOF,15X,3(18HTRANSFER  FUNCTION7X)/20X,6HSERIES,I3,4H AND,I3,11X2(4HFROMI3,3H TO,I3,11X),4HFROMI3,3H TO,I3,2H *//)(3X,F9.4,9X,F14.7,3(A2,9X,F14.7))(1H0,10X,84H** INDICATES THAT THIS VALUE IS TOO HIGH DUE TO SAMPLING ERROR. IT WILL BE SET EQUAL/14X,71HTO THE MAXIMUM VALUE OF THE REMAINING COHERENCES FOR PLOTTING PURPOSES.)(1H0,10X,91HX INDICATES THIS VALUE IS NOT COMPUTABLE DUE TO A NEGATIVE OR ZERO POWER SPECTRAL ESTIMATE./13X,82HIT WILL BE SET EQUAL TO THE MAXIMUM OF THE REMAINING VALUES FOR PLOTTING PURPOSES.)(1H1,16X,40HGRAPH OF COHERENCE SQUARE BETWEEN SERIESI3,4H ANDI3,27H AGAINST FREQUENCY (CYCLES/A6,1H)//)(1H1,5X,51HGRAPH OF AMPLITUDE OF TRANSFER FUNCTION FROM SERIESI3,3H TOI3,42H (IN LOG SCALE) AGAINST FREQUENCY (CYCLES/A6,1H)//)]8({ #kB 1Lf3}8({YlvL(RPdGJ~<` \K p @k p @w !p @o !p @b !p @h !p @t+_K6$ pp"@"ppB" pp,~ w D	"	{ $ Fm Dv@fb Fx/$ De"e.	U Fuf F^"u $ e. H`.b 
.
o 
/
'Jb .b 
`.
o 
/
'Jx.$8&g v b^ F0 x^ F?:v; m+b <, <,
"	W Dp"	{ $ 	WHp <, <
,
.$8&y p Dg"	{ $ (.	{/ H` 
 0 J	$.$8& 
	{ Ja"	{.& $:a 
? J 	$.$8& 	{(/$ Dv 
	{(	b3DZ+ (	b2D[+0"O D^ O Fd"v $ ^3(	$ 	$ H^ d2h	$ 	$ Hd.$8& <
"	Wg D` $3d	{+@d_ $ Dy "' Bq+!Od_ Dy ") Bq $.v Dx"v $ Fi Dv 	WD`Zq1B'+'1B)+) v 	$ D	#+*>x 	$ F	#"g DK <|,1:v; i+#"g DK <w,1"	{ $ 0? HN 0? H].$8&1 OD DO 	{ NF FN ^D D^ 	{ ]F F]"	~ Dc"	{ $ Ft D\@f0 \ F? 	~dc"c Fd"	{ $ cHd \ <v,6aN@ 0 \ <u,6d]@ ?.$8&C:\; t+?"	{ $ 0	yH H0 ?	yH H?.$8&M 1N 1M D	 	{ 0N 0M F	 @N @M F	 ?N ?M F	/$ Di"i.& $ 
1
0
L 0M H	 
@
?
L ?M H	.$8&a"	{ $ 
	
 	 HK <t,5 @0.$8&j <l,e <, <,
"	y D`"	{ $ 	yH` <, <,
.$8&t <",, 	{ 	b3FZ+} 	b2F[+"	{ $ (0 HK <s,64 @	.$8&~ <%, <(,
 <r,Q <*, <-,
 <l, Z2D	w+j3D	v+
+j "S Bm "O Be N D_ Dc Dy"	{ $ .h7@'+' f HN .h 
0
' J	 y3(	 	 Hy .t7@'+3 f H	$ .t 
.
h 
/
' 0 H	B3hM+% s H	$ "N Be+- _3(	B 	B H_+- u HN "R Bm@j	B H	$ J	 .t7@'+4 f H] .t 
0
' J	 c3(	 	 Hc+7@h	B u H	$ u H]@h	 "R Bm.$8& <5, <8,
"	y D`"	{ $ 	yH` <>, <A,
 	$3Hs+B 	$2Hu+C _ H	B N3Hu+F ]3Hu+H+I y H	+D c H	.$8&< <F,,Ze1BN+N1BO+O <I,,Zm1BR+R1BS+S <L,, 	{ 	l3FZ+W 	l2F\+Z <O, <R,
 <q,Q 	{ 	l3FZ+] 	l2F\+j"	{ $ (	 HK <p,64 @	 (	 HK <o,64 @	.$8&^ <T, <W,
 <n,Q <Z, <],
<m,QK,~x	x	x	Kx	Kx	Cx	x	KxKxdxd8`Kg	#	d^y8`Kg	#	d^LyXz$k$w$k$w00X
$k$w(g00X00$k$w$k$w$k$w$k$wX9(`(	(	(0(?X>XC
$k$w00XP$k$w$	|Xs00$k$w$k$w$w$k$k$wX
(`(	B(	$(	(N(	(](?X>XX X3
$k$w00X> 9~j y~jQ>tp \b d D"	{ $ 		# H` <,5 @a7H	+s5hz7H	+p5hq 	xa H?+~ 	x H?+~ 	xa H?+~7H	+w5hx 	xH	x H?+~@h?+~ c H?+~7H	+w5h} a H?+~ a H?.$8&g"	{ $ ? H?.$8& b,~x`*0   X0   1     0    8W>tp \ 	 D
 D
 $3$	{+ $ D+ $ D $.d D 	y D 	WF!$ D	!$@ D!$ D
@d	$!$ D	$"	y D
 	yf?& F3f+)!${D 
 ? D	#" D	#  D	  D	 <C,1 
 D
 D <>,1:
; 
+2:
; +$ <9,1 ,~8		#	
8		#	
8		#	
*0   YlvL&	3|a3,p \N !p @H K D	 P DM O DI"	{ $ .H 
M2j' 
' JM .H 
I3*' 
' JI.$8&V $3d	{+a $ DJ@dI+bOdJOfI!$	W DK"	y DJ"	{ $ FL DM 	yFJ.H  F	# <s,1:M; L+f <n,1 N,~8JNK	#	MIIJ8JNK	#	MIOJYES  A    B    P    *0        *    (1H1,21X,3HLAG,30X,14HAUTOCOVARIANCE/20X,1H(,A6,1H),28X,9HOF SERIES,I3//)(19X,F9.4,26X,F13.6)(1H1,9X,42HGRAPH OF AUTOCOVARIANCE FUNCTION OF SERIES,I3,37H PLOTTED AGAINST TIME UP TO A LAG OF F9.4,1X,A6//)(1H119X9HFREQUENCY22X24HPOWER SPECTRAL ESTIMATES/17X,8H(CYCLES/A6,1H),25X,9HOF SERIESI3//)(21X,F8.3,26X,F14.7,A1)(1H0,6X,88H* THIS ESTIMATE IS NEGATIVE INDICATING SOME LEAKAGE. IT WILL BE SET EQUAL TO THE MAXIMUM/9X,85HVALUE OF THE REMAINING ESTIMATES FOR FUTURE PLOTS AND EQUAL TO ZERO FOR CALCULATIONS.)(1H0,6X,44HTHE CHECK SUM OF POWER SPECTRAL ESTIMATES IS,F14.7,14H AND SHOULD BE,F14.7/7X,17HTHE DIFFERENCE IS,F14.7)(1H1,18X,47HGRAPH OF THE POWER SPECTRAL ESTIMATES OF SERIESI3,27H AGAINST FREQUENCY (CYCLES/A6,1H)//)(1H1,10X,34HPOWER SPECTRAL ESTIMATES OF SERIESI3,6X49HPLOTTED IN A LOG SCALE AGAINST FREQUENCY (CYCLES/A6,1H)//)]8({ #kB}8({YlvL(RPda?<\@ \g p @ !p @
 !p @+xC6$ pp"@"ppB" pp,~ | D	"	{ $ F D@f/$ D".	U F|f F}"| $ . H{.
 
.

 
/
'J.$8&  } FN:; +{ <2, <5,
"	W D"	{ $ 	WH <7, <:,
.$8& 	{ 	X3Fy+ 	X2Fx+- k D"k F <<, <?,
"	{ $ 2hN N H 3(N N H.$8&"	W D} $3d	{+$@dz $ D+%Odz D"	{ $ F D 	WF} N F	# <-,1:; +' <(,1 O DD DO 	{ NF FN"	~ D~"	{ $ F D
@f] 	~f~"~ H"	{ $ ~F 
 <',6aN@].$8(7 
 	yF]:
; +4  ^j ^j F 	{.	{ 
]
j ]j H/& F".( $ . 
^
]
i 
]
j
 J.$8(I"	~ D 	T	T$ D{ 	TD D 	S2Dx+]"	{ $ 	~H <&,6a"{ @
 . 
'

 J'.$8&U <A, <D,
"	y D} " B	 "w B .	{ "H H"	{ $ H D 	yF}.6 +l   F0+m   F0 <F, .  <I,
. D  03D+Z1Bw+w1B+ k D"	{ $ . 
3*' 
' J.$8&y " B	 " B .  F:; +gZ	1B+1B+ <L,, 	~	W D D} <O, <R,
 	{ 	X3Fy+ 	X2Fy+7@	V+ <T, <W,
 <%,Q7 	V+ <Y, <\,
"	{ $ . (' Hh <$,64 @N.$8& <#,Q"	{ $ 03H+  .@j'.$8& g,~xOx	hx	xx8}h	#	z8}h	#	iX00$X((NX$(00X&	00$X/(}((0X2XE
(((}XQ
$00X\$00YES  *0   (1H15X24HORIGINAL DATA OF SERIES I3//)(10F11.5)(1H1,10X,22HGRAPH OF INPUT SERIES I3///) 0(RPdg6,@ \x p @e !p @k p @a p @h ` D	 	~ D	U6 	W+"	U $"(.e$	U. Hk 
.
k 
 l L/.$8&+"$.e$	U Db"	U $ .b H` 
.
k 
 l L/.$8& 	R2D^+ <, <,
 <,"	U $ Ff Dn n.k <	,
:n; f+, 	R2D^+3"{ Dl { Fb"	U $ .k 
l3*' 
' Jl .k 
b2j' 
' Jb.$8&! <
, <
@df"	U $ Fd Dn!&Ff.k  F	# <|,1:n; d+- <w,1@d	| $.	{ D_ z2Fe+8 <v,u6@	|+q 	S2D^+A"$.	U Do"o $ .k"
'
	T
  J'.$8&< o D	Ud	U D	x@di@fij"	U $ .k ' *ii.$8&E 	x *id,7 Da 	S2D^+l@di@fij"$.	Ud DhD Dh!&	x!$}	x	x$@ D_"	U $ (.(/	U,6j .k 'a *Hjjjii.$8&W _ *id,7 Dh"hha Fm"	U $"(.h Ha 
.
k"
a
h
mL/.$8&f+q"	U $ .k"
aJ'.$8&md	U@D	xxNe>Apa@AphAp,~pe	k8fz	x	#	blzz8fz	x	#	bl{zXo$eXs(Xt$e(25H ERROR ON TAPE ASSIGNMENT)iC<@ \ p @ p B4 $5` $ D 3D+"$.4D5d <+,+ <-, $3D+" $3D+$ <0,  D+& <2,, <*,42   Ap  Ap,~```XSPECTG    (A6,I1,8(I2,F6.0))(11H0DATA POINTI5,10H OF SERIESI3,57H VIOLATES THE RESTRICTION FOR TRANSGENERATION OF THE TYPEI3,52H. THE PROGRAM CONTINUES LEAVING THE VALUE UNCHANGED.)('0IMPROPER SPECTG CARD IS PRINTED BELOW.'/1X,A6,I1,8(I2,F6.0))(58H0CONTROL CARD ERROR. PROGRAM EXPECTED A SPECTG CARD BUT A A6,16H CARD WAS FOUND.)(55H0PROGRAM WILL GO TO THE NEXT SELECTION OR PROBLEM CARD.)(40H0ILLEGAL TRANSGENERATION CODE SPECIFIED.){e^biJ
"6 $ FB DE E <,
:E; B+,C3D52F6+f"6 $ FB DE 71F+ E 7 D?0D++r $ D? E ; DD"$.?$?5$r"	U $ D76b?0b++44%41484<4K4Q4U4X4Z 7.E7$+`4Dc 7.E ( Hr <~,5 @+c 7.E7$+`5d* 7.E!( H+c 7.E ( Hr <},5 @ ( Hs <|,5 @+c 7.E7`+` 7.E ( Hr <{,64t @+c 7.E ( Hr <z,6 @+c 7.E7$+`4Dc 7.E $}4DH5d` 7.E $ Dr <y,5 @@ 7.E <x,y @+c 7.E 	xH H+c 7.E7`+` 7.E ( Hr <w,64 @+c 7.E7@+` 7.E!(H+c 7.E DH+c 7.E DH+c 7.E7`+` 7.E ( Hr <v,51 @+c <, E <,
:78&:E;<B+
 <, <,
"6 $ F@ DE E <,
:E; @+l, <,, $ D	|+t <,,+o q,~p	rDx	rx@x	rx	rx	rx	sxrx	rxrxqXF0C$6$7(;XH$7$A$7X^0CXW0C$6$7(;XfXl(1H023X71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED, ASSUMED TO BE 1.)mu \( p @5`/ <3,, $ D+0 0d+, (  Ap,~X      (17X      5(F1 2.3, 8X)/ 7X,       4(F1 2.3, 8X), F12. 3)   +     1X,  2X,  3X,  4X,  5X,  6X,  7X,  8X,  9X,  10X .    (1H 6X5(F12.3,8X),F12.3/17X,5(F12.3,8X))(1H F12.3,1X,103A1,F12.3)(1H 13X,103A1)(1H 14X,101A1)(15X,20(5H+....),1H+)!yyX~h|h08`!Ya2~L@ \1 p @0d p @K p @0e !p @H !p @0p p @L p @0g p @0r p @0a7@0b+1l@dB <2W,3$"0o9 DL I DK/$$K4$1,7`B+1 <2[,,7`B+1a 0o D: 1 90n F9*d1 <2^,"& $ FQ D0o 0o <2a,
 $.d0o; Q+1!"& $ FP DK K <2c,
 $.dK; P+1&,7`B+1+2J"$.K4$1/4D10"$.DK $/K D0q I 0h DC6`B+1H I 0h FEd D0q0n$	  D0q0o D: 1 90n F9*d18 <2d,"& $ FN D0o 0o <2g,
 $.d0o; N+1="& $ FN D0o 0o <2i,
 $.d0o; N+1C,6`B+2J $3DI+1^ <2j,"K $ FM D0o <2m,
:0o; M+1L 1_DMZDA <2o,
 1_D0mZD0o <2p,
:0o; 0m+1S:A; M+1P <2r,
"0q $ F0h D0o <2s,
:0o; 0h+1Z,7`B+1a+13<2u,,6`B+13@d0bRD0b7 0a+2 1D0gZD0o 1 &$&.0o 9 H8*d1e:0o; 0g+1d <2S,3$"AJ D0p7$0r+2H4D2#7 0a+2"0r $ F0f D@.0p  F0c J0d DI5$1t@dI @.H"9 D85$1x@d8!$r8I0p$
:@; 0f+1p+2K 1 &$& 9 H8*d2 $ D0n"0r $ F0d D@.0p  F0c @.H"9 D85$2@d8!$p88L$KD DA$$.0n $8 D1 <2P,4
:@; 0d+2	 0b&$6D+2 P D7+2 0r D7 <2x, <2{,
 1_D0cZD@ $$@ <2},
:@; 0c+2 <2~,
:0b+2K $/O DJ.$ D7dO D8 $3dO@d8"@8$ J D6 0r D7 $ DA"&.J/7 J D0n"$.DA 0n&(  H0o0H+2? P D7 <3, <3,
 1_D0sZD@ $$@.A <3,
:@; 0s+27 <3,
"@D6 0r D7+2G <3	, <3
,
,1D0sZD@ $$@.A <3
:@; 0s+2B <3,
:0n8&2/$3DB+13$D0b31K3Ap0e3ApL3Ap0g3Ap,~p0c1p0c1HK0e1OAJ@HL0g1I0o90nX0}X0t(9(9XB(9(9X0|(0r(P(0r(P(0rX0}X0x(0d(7$8(7(0dX0x(6(7$8(7(6X0z(7$8(7038P3Xpt~!!!40c=tz8]!|-1g3    4    5    6    7    8    9    A    B    C    D    E    F    G    H    I    /    ~xM?T@ p @3 p @3~3@3}+4 4	ZD4 4 32H3~+4 3 H3~+4*d4
y1,~	`Z(X^. >X.~(3~+4	~+4)Z. \x <x*<x .ez+4$!"	b+  "4&	b+Z`.Z. h+ggM?}
&4+	b+4,
?NO CORE AVAILABLE - CAN NOT PROCEED
a.3@1,>7,>7+4@"4n0B+4<!"A`X#p5@49/#p!"X#p+4@\p+4@a.9'1,>7
6+ _4`4I"`Q@,> <4o,,^,> <4r,
,^*b4F+4S,> <4s,,^7@4m+4N,> <4v,
,^+4P,> <4x,
,^Z5"4S,> <4y,
,^,7@4m,
,> <4{,,^,,> <4~,,^,> <5,
,^(@qd1@,,
1@#+4b0@*+4T,>T<5,,^+4T,^,^,^,~('TypeGtoContinue,XtoExit,TTotrace.'/2H*,$)(A1)(1H514A5/)(1HA5,1X,O6)PAUSESTOP.pX4jp{X4kp94lp>4mp X4dX~4ip xCR
5-#p+5   ,~>attempt to take SQRT of negative argKc3@ p p+5<Kc3K  ,5< 
,~Kc3J  ,5< ,~Kc3I  ,5< ,~Kc3H4B5S5@5@5"5R+D4*0
5?U ,~,>,># $)D/$@,>4d5IX $(F) + 5I5F5I5"5H"` ,5i+5Q#  ,> <5T,64,^@,> <5U,6,^5&5Q+P4*05V,^,^,^,~! ,~xxAttempt to raise negative single precision number to non-integer powerKc#@ p p+5iKc#K  ,5i @,~Kc#J  ,5i @,~Kc#I  ,5i @,~Kc#H4B6
5@5l5"5v+D4*0
5kU ,~ D6
!$ @6 B65"5s#`+ 6,5s!"B,~+ 5w(BdB+ 5w5B5r  6
,~ +7`6+5`d +D4*05{+D4*0
5{Ui`di@6i6+5vi6`B"`+5v/6iiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii
f6-K|6-6~Z6c	6%b&6,b%6,b%6+6+06*/6*/6).6).6(-6(-6'RMSQv6~Z|p6NX:GYXpX26
pX26pX16|!5{=?H6P)yP)G"5zP5p	
~J5v'G5v
~J5u
~I5s
~I5rS	YVBSo&B	WG5l.G5`.F5c.E5f.D5i.V5i	WG5^PU7RMSQTE/86~IzP5]NR:JYX051G
5+ae5STvF5)aZ5%aY5$aj5P3?K~5B555DA5DR5I;5I:5]5]5DR|p5koYUlrBKYX<:42
Y]@4m
Y?44
\!4F{-^4@{-X4<{-O4N{-N4b{-N4S{-M4P{-M4IVBSo&BTE)|4/\6.AwBP@VKV4PbXlVkBI
YPbKYYYh[|ggMA
JTUR/}F
/|N	@\:T(q5vX_<F

zR(TsT	`u6
(J"4*
&*
 R	WJ
>
_Bb
_2v	^,6RW	`
K^
2b
2RYmtL(bIz4)	G4[4	qG4ZzR4ZzR 4%a4zA4G4[4
o44	qG4		4;.33:02393~P43~UJ3}
M4

M~4	539I3;
a3i]3>
u3V%a3+3N3P"(3]tU38ti3@t}3I3mM3g3	3E@h3;.33]f33m h30K3!rp3J3
373E'z3!333r O3
3K3E?M33E(O3sJ3$sJyP3#h041)1s1d A0|=1851e
a1n'1&'2x a1l
u1c;1&+2{,u1m992O2c,2%a11B-3u1,31C-3u%1/uu1^@22(2m2[3	+1P2o3
zA0t31"?1P32BzU0xG1(S2o32Bzi0za1a[1??1R3+3[{M1w #1Z{a1xS2 72s1
_2: K2u10
s2E _1d	qG0tP]0sP]0sf0r^0rK0qg0q:g0p60p	0oE@h0o0n]f0nPH0m\0hPI0hPI0gAKM0gPJ0fPJ0fG9M0ePK0ePK0d0dPL0c:020c
0b0bm0a9RP4QP5QP5PePP6O!OP6NP7NP7M0K1P8MALhLJL
KG:hKJCEMJ!IFuTNIHg[B/BCFhA
AWF@
@=":2I729E?M98_*TN87C77c"6P\6=1=g`1PA 
a,%a0/G0[+o3	qG 0K($N*$N~@)h06sh05r
8AU!%l
a'~;}O|aX&>xK%r&1A3w,K=*,M+k3zAZ?lzU\GmS
_
s	qGFXSE|	S
$	zw8yOwY@I	#:g	`[	S&G.5AOVY1	E*9Z	T$	U=I?&	|)TS	y+w){_&)+	WE4910'W	V)^7	|
D:	9.5%c	wzC`Z	l%a2	w
!C	VI@P6@]	}S10Kqq2U^`	u+	R.	X&	yM#1	CzO	~ZO	U
9 ?g[_U ;+	{
3#q_GA+	R +$	z,$	{4M@%\75	}^b@[	W	x :	xf9^9(Y	
7KV=	TU\	%=.0mNuNl0uA$
au)!Q"3*G&!&[o+-0+2	qGYY0K;s[;s[|p!m
l0UtnAM:wvo%A<'E;WqOfcmta]tA{% s+?%8!ES
_a
s	qGoXSE|	Soo
$	zw8yOwY@I	#:g	`[	SAOVY1	n*9Z	T$	U}nx:=mPHm=I?&	|wlPIl)TS	ygk+w){_&)+	Wk4910'W	V)^7	|:	v'=iEQ-h%c	w;jh`Z	l%a2	w`Y	b`Y	XP4gP5gIfP5fqe
!C	VP6eP6d]	}P7dS1P7c0Kxq2U^P8c`	u+	R.	X&	yObM#1	CzO	~ZO	U{5bg[_+	{
3#q_GA+	R +$	zf}a&k^Cja,$	{4M@5	}^b@[	W	x :	xf9^9(Y	gS`
`KV=	TU\	%dm=]0C%H|%Hn |h04h&	9E
aUR|
a}	$i'$}'(;3O4
U3&3DGg[goFzAY	{]w
!!?O	{q
5 G!SR	|
I[p?T{eoxSWqg%	hU<
x{Y	hi8&U&
+q \&i/
A?{ #&}\S{ 7$
i&	Q
_ K#&	%2
}
s2 _	qGKV9%XSE|	SNf9
$	zw8yOwY@I	#:g	`[	SAOVY1	*9Z	T$	Uy:*PH
PJ
+w){_&)+	W;F3OMa

4910'W	V)^7	|:	%c	w`Z	l%a2	w
~gY	`Y	b`Y	XP4P5P5q
!C	VxP6P6]	}P7S1P7.0Kgq2U^P899`	u+	R.	X&	yU
NJ
~gYM#1	CzO	~ZO	UOhE~g[_+	{
3#q_GA+	R +$	z	ygq}&kxHQ},$	{P?1S|4M@5	}y^b@[	Wq|	x :	xf9^KV9{9(Y	
{%zKV=	TU\	%=]0xz!ZZl!ZZf l
aY
E_
a
!bGl[RoVff+s?n	qGNXSE|	S
$	zw8yOwY@I	#:g	`[	SAOVY1	M*9Z	T$	UE@hM=I?&	|)TS	y+w){_&)+	W4910'W	V)^7	|:	%c	w`Z	l%a2	w`Y	b`Y	XP4LP5L
!C	V]	}S10KNq2U^`	u+	R.	X&	yM#1	CzO	~CEMKZO	Ug[_+	{
3#q?GA+	RD+$	zg3K)JHQJ,$	{4M@5	}^b@[	W	x :	xf9^9(Y	KV=	T*IU\	%=0
ae0zA5G8[o#!${%)C+1?2S>
9a(	qGXSE|	SNq
$	zw8yOwY@I	#g%
*9Z	T$	UE@h
=I?&	|)TS	y+w){_&)+	W4910'W	V)^7	|:	%c	w`Z	l%a2	w`Y	b)`Y	XP4P5

!C	V]	}S10Kq2U^`	u+	R.	X&	y

M#1	CzO	~CEM	ZO	Ug[_+	{
3#q?GA+	RD+$	zg3	HQ,$	{4M@5	}^b@[	W	x :	xf9^gS9(Y	fkKV=	TU\	%\F=0
a~
ulqzAG[eog!pu	qGbXSE|	S
$	zw8yOwY@I	#:g	`[	SAOVY1	b*9Z	T$	U=I?&	|%1a)TS	y+w){_&)+	W4910'W	V)^7	|:	%c	w`Z	l%a2	w`Y	b`Y	XP4aP5`
!C	V]	}b`S10Kbq2U^`	u+	R.	X&	yM#1	CzO	~ZO	Ug[_+	{
3#q4GA+	R+$	z,$	{4M@5	}^b@[	W%=	x1:	xf9^9(Y	KV=	TU\	%=0
&8<%!BU#&LIW'#'O
Eu&aC]Z;|+R
3v,wWdnju}(3M-ZbUru%~Ga-3]bil(Uz
+tl?{	GjScu~aO{[V?"ha{1'nW"oS~hu{E	Wgs{Y
n\A%|+p\uDSb 7*7p]	F
_g K--
s _0	qGzP]z%yXSE|	SUuMy:mx
$	zw8yOwY@[6xI	#qw:g	`[	S>Z>w
[:*uPHt99t=I?&	|];vsPIsPIrPJr)TS	y\n)^7	|:	%c	w`Z	l%a2	w[
~gYm`Y	b\`Y	XP4mP5lP5lqk
!C	VP6kP6j]	}P7jS1P7i.i0KKq2U^P8h99h`	u+	R.	X&	y
gNJfe
~gYeM#1	CzO	~<ddL<McZO	UEcR[bg[_+	{:Yb
3#q_GA+	R/a +$	z&kZHQ`,$	{4M@5	}Z^b@[	W	x :	x	\f9^9(Y	
`%\KV=	T9cM^U\	%=0ZN^]P\]/HrP/Hr^O(R
S
Xa
]oAs2q
97,u
13%/a
`a
cW%A
U%sA
{ijk!a
,Z&i
}p%$!u
6]&/E>s9V`U(8A
@`&CC?C\a8U
t %
8inAAe&k
v89k&?CN
a
aua(9
u
y]e
uu);p+
z]Es,?WA
c!%7ewF,;
jc|A
:3w-
n?E
J[`o|23

we}2oG
(?3+>o
S3?-e!
F8S8?
-2KM-2]
sG _9#*	qGXSE|	SDzj
$	zw8yOwY@`[	S:g	qAOVY1	*9Z	T$	UPH99=I?&	|oPIPIPJ)TS	y
xC

X)PK491
Q0'W	VPL
P)^7	|:	
Fz
%c	wEQ-
P`Z	l%a2	wz
O`Y	b%oG
`Y	XP4
NP5
NP5
M
!C	VP6
Mq
LP6
L]	}P7
KS1P7
Kq2U^P8
J99
;`	u+	R.	X4z
:&	y

:M#1	CzO	~&EW
ZO	U
9g[_
+	{
3#q_GA+	R +$	z]FQ-
&k
&-_
,$	{Cj
4M@5	}^b@[	W	x :	xn
f9^9(Y	

KV=	TU\	%7W
=~0
&4D	v.@m]
RM>0ORM>0(R[@
S\B:/\>X\>5'\7N+\2g'r'I(\)8*\)7\	\	)\+,\6.\.,[rO.O[mNO[mO[m	O[l|[l{&O[l+O[kO[kO[j]O[jRO[i%r%H([Z[X%[Qgr%0[Ms/[M"-[M	+[L,[FG[@v*r#eOD^w'dw]!+{0