Trailing-Edge
-
PDP-10 Archives
-
decuslib10-09
-
43,50466/bmd07m.sav
There are no other files named bmd07m.sav in the archive.
h 'V0n u3- pSh -V(u &p /+ M('1BMD07M - STEPWISE DISCRIMINANT ANALYSIS - REVISED ','MAY 16, 1969'/41H HEALTH SCIENCES COMPUTING FACILITY, UCLA//20H0PROBLEM CODE A6/20H0NUMBER OF VARIABLES I6/20H0NUMBER OF GROUPS I6/30H0NUMBER OF CASES IN EACH GROUP16I6/(30X,16I6)) $ D XR $ D XR-\ ok4
p { D { D XQ $ D -\ u"4
q4 r-\ r4 r4 s4 4
s4 q4 q-\ r4 u4 s4 4
u4 q4 q D @@ V~ XRX@ ^ XRX@ ` " kB
T T
Q
+ n(2A6,6I2,5A3,I1,A2,2I1,A3) @@ R XQ2D
+ qO@ R1: 9Z r |3D 2F 7 + }3D 2F 7 + " zb + |(10H0PROBLM OR) }
+ (1H0A6,1X,58HCARD EXPECTED, THE FIRST SIX COLUMNS OF THE CARD READ WERE,2A6) + $ "
b + (40H0FINISH CARD ENCOUNTERED, JOB TERMINATED)+ $ $ (/ T $ T 4d * $ (/ T $ T 4d 6 $ / $ 4$ > XQ2D
+ " " B
: Z T 9 " + (A6,11F6.5/(6X,11F6.5))
: VZ T 9 $\ + *(A6,11I6/(6X,11I6))0+ J" ,b T + 1(1H ,I6,1X,20HVARIABLES IS ILLEGAL /) " 2b + 6(1H ,10X,14HJOB TERMINATED )+ $ " 8b T + <(1H ,I6,1X,17HGROUPS IS ILLEGAL /) " 2b + $ " @b + I(1H 23X71HNUMBER OF VARIABLE FORMAT CARDS INCORRECTLY SPECIFIED,ASSUMED TO BE 1. ) $ D ~
T T T: Z " [B
: YZ Yu3: T 9 WD + ^(A6,22A3/(6X,22A3))
: Z ($ . 18F4.4/(6X,18F4.4)) z 4$ }." B .: $Z $ 5D '." b b + $(5H0TAPEI4,43HIMAYUNOTRBEAUSEDSASOAN ALTERNATEbINPUT TAPE)UP$ 3D + 'J X@ & -\ u"$ . 4D ," 4D ,E X@ + R / 4D 09$ 3D + 0D X@ 0 @@ (" 5b I: $Z M.LOGICALTAPEI3)D y-$ 2D Q+ j$" Ob $ 2D Q+ m " Xb $ 2D Q+ o $ D Q $ 2D Q+ r " rb + |('0STEPPING CRITERION IS MAXIMUM MINIMUM F'/22X,' VAR. PAIRS'/22X,' OF GPS') : Z
3 9 XRX@ XRX@ XQ2D + ' " b + (87H0MEANS (THE LAST COLUMN CONTAINS THE GRAND MEANS OVER THE GROUPS USED IN THE ANALYSIS)) U[ FYL U[ FYu-\ nX4 : 4 T 4 U[4 u4 >4 D4 YM XQ2D + 1 " *b + -(20H0STANDARD DEVIATIONS)-\ nX4 K4 T 4 T 4 u4 >4 D4 YM XQ2D + < " 4b + 8(32H0WITHIN GROUPS COVARIANCE MATRIX) -\ nX4 R4 T 4 T 4 q4 >4 @4 YM XQ2D
+ W : 5Z D $ ($ .
() F(b"3: + S(33H0WITHIN GROUPS CORRELATION MATRIX) -\ nX4 K4 T 4 T 4 q4 >4 @4 YM : Z " aB
V~ TJ TJ W( XQ: ,Z 3F6.6,2A3,19I2) TJ@@ TI5: Z x D TJ
" B
: SZ T 9 : + (A6,66I1/(6X,66I1))
$
"D . 3Z ($ 9 J TJ W(O: .Z l4 XRXI8/22H F-LEVEL FORINCLUSIONF8.4/22H F-LEVEL FOR DELETION F8.4/22H TOLERANCE LEVEL F8.4/22H CONTROL VALUES 92I1///) TJ TJ5$ 9 " 2b + 8(51H0F FOR INCLUSION MUST BE AS LARGE AS F FOR DELETION) + l"$ . 4d Q XRX@ ;@ : Z : Z
3: 9 X+ \-\ u+ + 0BMD07M DSK FOR02.DAT FOR01.DAT 0 z8] T=8( 4=8(~pyALPHA NO YES PROBLM FINISH SAMSIZ GPLABL SUBPRO CONDEL COVAR x ~`>(9H VARI ABLE ) (1H0 ,10X ,8HV ARIA BLE/ (1X, 9I14 )) (1H0 ,11X ,5HG ROUP /(4X ,9(8 X,2A 3))) ahZo : Z \f : Z \g \f ( ($ \f. \f
\b.
/W F\k $ ($ . \f \c. @@ W3: \d9 Zq $ ($ \f. \f \c. !( H W \f. \e@@ \f3: \d9 Zp $ D \g \g Z \f . \e ( ($ \g.
\b.
/W F $ ($ \g. \b. @@ W3: \d9 [ \g. \e D \h : Z \f . \e ( ($ . \g
\b.
\/W\F\$ ($ . \g\ \b. @@ W3: \g9 [ \g D \i : Z \f . \e \h D \i : Z \g \i . \e & ($ \f.
\b.
D/W"`/W3: \f9 [ \f. \e 5D \ \f/ \g5d [S & ($ \g \f.
\c.
/WD
\i. \g
\c.
7W \i * ($
\f.
\f
\c.
7W"D \j : Z \g" \f. 4D [Q5d [A \i & ($ \g. \g \c. 'W ( ($ \f
\g.
\c.
D7W"`7W+ [Q \g/ \g5$ [J \i & ($ \g. \g \c. 'W ( ($ \g
\f.
\c.
D7W"`7W+ [Q \i & ($ \g \g.
\c.
/W
\f.
\c.
D7W"`7W \g3: \d9 [6+ [{ & ($ \f \g.
\c.
/WD
\i , ($
\g.
\g \c.
?W \i. \f
\c.
/W"D \j : Z \g / \g5d [i \i & ($ \g. \g \c. 'W ( ($ \f
\g.
\c.
D7W"`7W+ [z" \f. \g4D [z5d [s \i & ($ \g. \g \c. 'W ( ($ \f
\g.
\c.
D7W"`7W+ [z \i & ($ \g \g.
\c.
/W
\f.
\c.
D7W"`7W \g3: \d9 [_ $ ($ \f. \f \c. \j H W : Z \g \i & ($ \g. \c. 'W ( ($ \f
.
\c.
D7W"`7W3: \d9 \ & ($ \f. \f \b. 'W \f \k \h4d \ & ($ \f. \f \b. 'W \f \k D \h \f D \j \f3: \d9 [ & ($ \g. \g \c. 'W \h D \j-\ sB4 \h @ \h : Z \f & ($ \g .
\c.
/W \h D/W3: \g9 \" \d. \g5$ \( \i Z \f & ($ \g.
\c.
/W \h D/W3: \d9 \# $ ($ \g. \g \c. \j H W : Z \f & ($ \g .
\c.
/W \h D/W3: \d9 \- \j D \g \h \d5d [ : Z \f $ . D \k . \e 5d \J : Z \g $ ($ \f. \c. @@ W3: \f9 \: \f/ \d5$ \J \k Z \g $ ($ . \f \c. @@ W3: \d9 \A : Z \g $ ($ \f. \c. @@ W3: \d9 \F : Z \g $ ($ . \f \b. * ($
\f.
\c.
7W H W $ ($ \f . \b.
\c.
7W J'W3: \f9 \K \f3: \d9 \5+ \ 4 Z \a \ \a \b,p ,Wp ,+p ,!p ,!p ,(p ,+p + Zo \a \a-|p 0 ]@@ @@ @@ ! $ XD ]-\ tu4 ]@ @ D": Z :" & ($ . d . $'WXD ] -\ tu4 ] @@ " . ! @@"$ . D # : ]Z # & ($ . " A . $'WXD ](-\ tu4 ](a@ :$ Z$D $" $ ". @ 4d ]0 ". : T $ FT $". D a #XFa @#3: @#9 ]#" !Z `". @ 4d ]7b :". Z a bD @!W :"TD $ @"3: : 9 ]a $ D ` a@ d% "D %aD d" $. D a aD :%T $ D &a& ($ %. D%a . V'W D @%a& ($ Z%. &S d . 'WaD &a& ($ &. & . a'WaD $" D$ %D d! \! !a &F & aD -\ sB4 !@ $& @ D' ' '$ VD D -\ sB4 D @ ! ' !VD D'!$ !aD $( ( D(aD (a D' 'aD :)T ' \(D aD )@@ D*@@ *@@ !: T: aZ &"T / %4D ^5d ^% & ($ b". % . H'WVD I+B& ($ A". F&C N . R'W)D +a $' +a d( + WD d, $ ($ ". %a . a D,aH W-\ tu4 Z, *4` ]u-\ tu4 , @ * " D # ' + ( + D , $ ($ ". & . , H W "/ %4d ^" % ". . 5D ^ ". " F"$ . " D - : Z # & ($ . " . $'WXD ^-\ tu4 ^ ". 4` ^ ". # F & ($ #. " . $'WXD ^-\ tu4 ^ ". @ #3: -9 ^-\ tu4 , *4` ^t-\ tu4 , @ * " D -+ ^t % ) & ) $ ( & ($ ". % . D'W ". * F ". # F+ ^t "/ &4D ^<5d ^K & ($ %. " . 'W D + & ($ ". & . 'W D + ' + ( + D , $ ($ %. " . , H W-\ tu4 , ". 4` ]u ". % F-\ tu4 , ". @+ ]u % ( & ) $ ) & ($ ". & . D'W $ ($ %. " . @@ W ". * F ". - F+ ^t & ($ %. " . 'W D + & ($ &. " . 'W D + ' + ( + D , ' + ( + D , $ ($ %. " . , H W $ ($ &. " . , H W" & ". . " %. $ 4D ^ -\ tu4 , @ -\ tu4 , @ -\ s 4 4 @ . . ". 4d ^t ". . F-\ tu4 , @ -\ tu4 , 4 ^r ". % F+ ^t ". & F" ! ". 4$ ^z ". D ! " D $ 4d
& ($ as. as ) as V W(4$ `
as T D ax $ 2D Q+ ` as"V D ax $ 2D Q+ ` as V D ax aw ax5d `
ax D aw as D TI+ `
: b~ b~ as FbV as3: T 9 _x ao aw4d _t+ `V av TJ5d `> TI" ao D V~+ `W" ao3D awg O TJ ax2& T g O A 4$ `U " `b + ` (45H0F LEVEL INSUFFICIENT FOR FURTHER COMPUTATION) au D XQ-\ fu4 ap " `#b + `:(14H1SUMMARY TABLE// 92H0 STEP VARIABLE F VALUE TO NUMBER OF U-STATISTIC / 94H NUMBER ENTERED REMOVED ENTER OR REMOVE VARIABLES INCLUDED //) @@ at V XS D ay : Z as hTJ5d `I> at as"TJ D au " `Db as as a| au atXS + `I(1X,I4,9X,I9,F16.4,10X,I8,F19.4,F12.4) + `S: at " `Nb as as a|TJ atXS + `S(1X,I4,I9,9X,F16.4,10X,I8,F19.4,F12.4) as3: V9 `<+ am ax D TI: TI!$ D V~ T 4d `_ : Z as TI/hT4D `\3: T 9 `Y+ `_-\ fu4 ap XRX@ `^ : Z as & ($ . TI ) DhU[ & ($ TI. R DhV $ ($ . TI@@) $ ($ TI. @@R3: TI9 `` TI U[ D ay TI"`Sl TI V D az at ay az D at TI Z as & ($ TI. ) DhU[ & ($ . TI R DhV $ ($ TI. @@) $ ($ . TI@@R3: T 9 `q : Z as & ($ . TI " DhV, $ ($ . TI@@ "3: U[9 `| : Z as : Z at hV, as V, ay & ($ as. D ,v3: as9 a as3: T 9 a TI V~ FV TI V~ FU[ : Z as hU[ ay D az hV az D a{ : Z at az hV, & ($ as. D ""` "3: U[9 a : Z at az hU[ & ($ as. D )"` ) a{ hV & ($ as . D R"` R3: as9 a as3: T 9 a $ / Zo/ TI. V}` @ aw $ . TI` " Zo. V} @ ar` " ao aw ar H a{" ao D aw ao D av@@ b~ : Z as hSl4$ aO4D a^ as@@T & ($ as. as )4D a;" ao aw ( ($ as
as.
(R() () aug asgDT g Q4d a@-\ o>4 as4 T 4 VU4 Q4 a{g asg@V astT VD ax $ 2D Q+ aDg as"VD ax $ 2D Q+ aGT asgVD axg& ($ as. as ) as V W(4$ a\ aw ax5d a^ ax D aw as D ax+ a^ & ($ as as. " R ) R aw au as D T $ as.Sl5D a^ av asT 4$ a^ as T D av as D a|+ a^: b~ b~ as FbV as3: T 9 a/: V TI $T XD ab-\ t|4 ab4 V~ V @TJ V TI Fa| V at FXS-\ fu4 ap a| D TI V/ V~5$ ` + q+ am4 Z aq \ aq+ . aq aq-|p 0uWG/ 0 @Hb~ : Z f~ $hVTXD c-\ tx4 c hVT. 7 .$ ( @ f|` @hU[3: T 9 b"$ . Zo D f~" Zo. V} D f f/ TI D f $ . f D g f|5d e " cb + c(1H0,100(1H*)) V5d c " cb V + cK V~4$ c " cb V TI + c (17H0STEP NUMBER I4/17H VARIABLE ENTERED I4) + c' " c!b V TI + c'(17H0STEP NUMBER I4/17H VARIABLE REMOVED I4) " c)b f~ g + c0(56H0VARIABLES INCLUDED AND F TO REMOVE - DEGREES OF FREEDOM2I5/)@@ g : Z f~ hSl5$ c7: g g f~ Fg? g f~ T FV, f~3: T 9 c1 $ . g &$ D g : Z g " cDb g Z f~ g? V,. g g /Z 7 g" 4d c= g 3: g9 c;+ cK(I4,F9.4,I10,F9.4,I10,F9.4,I10,F9.4,I10,F9.4,I10,F9.4,I10,F9.4) @@ g : Z f~ hSl4d cX b~4d cR : Z g f~3DhbV+ cX3: b~9 cO: g g f~ Fg? g f~ V FV g f~ T FV, f~3: T 9 cL g 4d d $ . g &$ D g " cb f~ f + cg(59H0VARIABLES NOT INCLUDED AND F TO ENTER - DEGREES OF FREEDOM2I5/) : Z g " cDb g Z f~ g? V,. g g /Z 7 g" 4d ci g 3: g9 cg Q4D d " csb + cy('0VARIABLES NOT INCLUDED AND ACTUAL ENTRY CRITERIA'/) : Z g " cDb g Z f~ g? V. g g /Z 7 g" 4d c| g 3: g9 cz V4d ft` TI @ g` f~ @ g g g D g g g D g" fy g g5D d
, s^ H g-\ tq4 g!$ g g g D g b~4d d( " d(b : Z g bV3: b~9 d% + d/(57H0THE FOLLOWING VARIABLES DID NOT PASS THE TOLERANCE TEST ,20I3) b~4d d2 " d2b + d6(' THEY WILL NO LONGER BE PRINTED') " d<b VXS TI f~ f g g g + dG(12H0U-STATISTICF17.5,5X,18HDEGREES OF FREEDOM3I5/14H APPROXIMATE F F15.5,5X,18HDEGREES OF FREEDOMI5,F8.2) " dJb TI g + dN(30H0F MATRIX - DEGREES OF FREEDOM2I5) -\ tq4 f @ f|-\ tq4 TI f| @ f}-\ tq4 g f} @ g@@ g"$ . Zo D g $ . g D g $ . g D f|-\ s24 f|4 g @ g " d`b g Z g Z ZF3: g9 d\ + dd(1H012X,5HGROUP/5X,10(6X,2A3)) " deb + dg(6H GROUP) g D g $ . g D g
g
Z f~ hY$ D g
g Z g hY$ D g @@ g : Z g
hSl5$ dw & ($ g
g
. 9s * ($
g
g
.
09s "0 " D g g
3: T 9 dn g g U[D g
g
U[ g U[
g
g
U[
U[
g JV, g 3: g 9 dl " eb f~Z f~ZF g Z g V,3: g 9 e + e
(1H ,2A3,10F12.5) f~@$ . g 9D f|-\ s24 f|4 g @ g f~3: Zo9 dj g/ g5$ ft+ dV@@ g9$ . g+D g ($ . g D f|-\ s24 f|4 Zo7@ g2" e b g Z f~ Z ZF3: g9 e, + e (1H010X,8HFUNCTION/4X,9(8X,2A3)) es " e"b + e$(9H VARIABLE) : Z f~ hSl5$ e3 g Z g hY$ D g & ($ g . f~ " DhV,3: g9 e' " e0b f~ g Z g V,3: g9 e- + e3(I4,9F14.5/(4X,9F14.5)) f~3: T 9 e$ g Z g hY$ D g @@hV : Z f~ hSl5$ e= & ($ g f~. " 9s g D V f~3: T 9 e8!$ g DV"`V g 3: g9 e5 " eGb g Z g V3: g9 eD + eJ(10H0CONSTANT /(4X,9F14.5)) " Zo. g4$ e XQ2D XQ+ e[ " eOb + e[(1H05X,10HGROUP WITH10X,37HSQUARE OF DISTANCE FROM AND POSTERIOR/5X,13HLARGEST PROB.15X,23HPROBABILITY FOR GROUP -) $ D g
9& ($ g. f~XA", f~ V,. gDU[7 f~3: T 9 f, g, gU[5d f6 gHU[3D g3 gFD gF g3: Zo9 f. g: g?, XQ2D XQ+ f:@@ g: Z f~@@ g hSl5$ f#3: 9Z ghSl5$ f 3 g9V, & ($ g. f~ ) D g gD g g3: f~9 f gD g1 f~ V,D g"` gS f~3: T 9 fT: OZ f~/hU[,Dhg" ghU[ D f|-\ t/4 f| @hU[XhU[D g3: Zo9 f%: +Z f~(hU[RD g ghgD "DhU[2 g g7Dhg3: Zo9 f,X" f;b g gZ gZF9: Z TI U[ g3: Zo9 f6: g 3: g g?3: Zo9 fn f~3: T 9 fb XRX@ ft + fx4 Z fz \ f{ f{,!p + b fz f{-|p t 0uWG/2pgl@@ TI : Z l\ & ($ . ) DhmY hSl5$ h: TI TI ( ($ U[. l\ 9s FU[ TI l\ FW( : Z l] hW( D TI & ($ l\. TI R & ($ TI. l\) & ($ TI. DR $ ($ . TI ( ($ TI. l\ ) F)3: TI9 gx l\3: T 9 gn TI5D h+ lP $ 3$ TI+ h { R D V, V, D V!$ D R@@ {!$ V,!& F l] $ D l^+ h?-\ \Y4 R4 {4 K4 TI4 lQ4 Sl4 V,-\ 4 R4 K4 TI4 lR4 l^4 lR4 Sl4 V, : Z l\ & ($ . ) DhV, ZhSl3: TI9 h!$ D l]@@ l TI D l^ : Z l\ Z l] hV, l\V,4d h. l] V, D l l] l\ V, FV, l\ l FV, l\ Sl D l` l\ l] Sl FSl l] l` FSl l]3: TI9 h"!$ l\V, l] F l] l\ V,D l l\ l FV l\ Sl D l` : Z l] $ ($ l\. ( ($ l`. " F)3: TI9 h8 l\3: TI9 h! " hCb : Z l\ V,3: l^9 h@ + hG(1H06X,11HEIGENVALUES//(4X,9F14.5)) : Z la hV l DhV!$ hV, hV, F la-\ tu4 la @ lb-\ sB4 lb @hV,3: l^9 hH " hUb : Z la V3: l^9 hR + h\(1H06X,41HCUMULATIVE PROPORTION OF TOTAL DISPERSION// (4X,9F14.5)) " hab : Z la V,3: l^9 h^ + hf(1H0,5X,23H CANONICAL CORRELATIONS//(4X,9F14.5)) @@ lb $ . lb D lc $ . lb D lY-\ s24 lY4 l^ @ lb " hpb lc Z l\ 3: lb9 hm + hw(39H0COEFFICIENTS FOR CANONICAL VARIABLE - /9H0ORIGINALI6,8I14) " hxb + hz(9H VARIABLE) : Z l\ " i~b hW( lc Z l] $ ($ . l\)3: lb9 h} l\ 3: TI9 h{ lc Z l] : Z l\ $ ($ l]. @@ " : Z TI hW( D l` & ($ l\. l` 9shU[ & ($ l] . ) l\. D "3: TI9 i l\3: T 9 i l]3: lb9 i " ib + i (6H0GROUP 10X,44HCANONICAL VARIABLES EVALUATED AT GROUP MEANS) : Z l\ " i~b l\ lc Z l] $ ($ . l\ "3: lb9 i l\ 3: T 9 i " l^. lb4$ hg : Z l\ h# Dhm0 hR DhV hz DhV3: TI9 i' " i-b l] + i1(27H0CHECK ON FINAL U-STATISTICF15.5) @@ lc@@ ld@@ ld : Z l` hU[ hm0D ld hV hU[D lc hU[ hVD ld3: TI9 i4" lS D le" lS D le lS D lf lS D lf@@ lg : Z l\" lc DhT $hVTXD iA-\ tx4 iA.@ lg" ld DhTJ" ld DhmE : Z l] hW( D l` & ($ l\. l` 9s D lg lg hm0 l\DmE lg hV l\DT lg hV l\DTJ3: TI9 iE l\ $T XD iR-\ s/4 lf4 iR @ lf l\ $TJXD iV-\ s/4 lf4 iV @ lf l\ $T XD iY-\ s 4 le4 iY @ le l\ $TJXD i]-\ s 4 le4 i] @ le l\3: T 9 i> : Z l\ hmE Dhm 3: T 9 i` : Z l\U$ D lh Z l] $hm XD ig-\ s/4 lh4 ig @ lh lh2Dhm + ij Z TI3: T 9 ie TI l\ m Fm l\ lh Fm l\3: T 9 ic : Z l\ hm hmD Dhm 3: T 9 iq" lS D m L R5$ iw lS D m T lS Fm -\ s/4 lf4 lf @ @ lf-\ s 4 le4 le @ @ le+ j (1X,I3,9F14.5) lf D lf le lf D lh lh D li lh lT D li lf D lg lY5d j lX4d j9 $ D lj lXX@ j
: Z l] : Z l\: lj"$ . lj4d j XRX@ j@ $ WQ4 $ D lj l\ lj WQ FV, l\3: T 9 j
: Z l\@@hXS : Z TI hW( D l`"hU[ l`V, & ($ l\. ) l\DXS3: TI9 j l\3: TI9 j lX4d j, lXX@ j# lXQ" b : Z l\ XS3: TI9 j$ l]3: lg9 j lXX@ j* lXX@ j+ lY4d j9 : Z l\ lYX@ j0 lXQ" b : Z TI $ ($ l\. )3: TI9 j1 l\ 3: TI9 j- lYX@ j7 lYX@ j9 : Z l\ lg Dhn liD lg1: 9 j: $ D lj R5$ j@ T D lj : Z lk XRX@ jB $ D lj@@ lb $ . lb D lc R5$ jI " jIb lk + jO('1STRATIFICATION',I3,' ON THIRD CANONICAL VARIABLE') $ D lk R5$ jQ@@ lk " jSb lk + jg(I1,'POINTS PLOTTED ON THE FOLLWING GRAPH'//5X,29HX = FIRST CANONICAL VARIABLE /5X,30HY = SECOND CANONICAL VARIABLE /5X,62HCASE NUMBER FOLLOWED BY * INDICATES THE POINT IS OFF THE GRAPH) : Z l\ : Z l] $ -$ . l\ l[ F 1: 9 ji l\1: -9 jg lb. lW D lY-\ s24 lY4 T @ lb : Z ll $ D ll l[2DhYL+ jv $ D ll & ($ ll. $Y$XD jy-\ n{4 jy4 lm ll lm Fls ll3: T 9 jr lc Z lm@@ ln@@ ln $hVTXD k -\ tx4 k @ lo"$ . lo&$ D lY-\ s24 lY4 lT @ lo " k
b hYLhYuhT hTJr: rZ l] l[3: lo9 k r lmO + k(7H0GROUPl,2A3,18H kMEAN COORDINATES2F8.3//6(A1,21H+ CASE$ -$X lr. lYP))lZ: Z l]d: -Z l\: lj"$ . lj4d k XRX@ k@ $ WQ4 3 o$ D ljn l\z lj\DWQsFV,2 l\3: T 9 k" lc D lp" ldtD lp" ldsD lqs: \Z l\hW($D l` l`V, hm0D lp l`[V, hVD lpm l`sV, hVD lq3: TI9 k#3 lp5 lk3dm g O [ lp2hm g O G 4$ kd: ln"$ . ln4$ kDf" k=b h: 4Z TI@ TIqZ l\q Y$f ni Z 3 U[.: 1z + k5H TI1: 9 k4, + kC(1H0,I4,A1,2F8.3,5(I5,A1,2F8.3)/6(I5,A1,2F8.3)) lj9$ D ln ln lp FZ 3 ln9 lq+FU[4 ln l] FY$ ln, l[,Fn" lf lp lh $4$@-D lq@ lq@ lr" lf lq li $ ![ `lZ$ * 0 x@n%@@ ng $ . ng D nh $ . ng D nf-\ s24 nf4 nd @ ng nd4d n9 ng D nh " n3b nh Z ni . nf . nf (3: ng9 n. + n7(1H0,11X,5HGROUP,/4X,9(8X,2A3)) $ D ni+ nC nh D nh " n>b nh Z ni 3: ng9 n; + nB(1H0,11X,9HVARIABLES/4X,9(8X,I4,2X)) nh D ni " nEb + nG(9H VARIABLE) ni Z ni " nOb ni nh Z nj $ ($ . ni nc. W3: nh9 nJ ni + nQ(1X,I3,9F14.5) $ . nh D nf-\ s24 nf4 ng @ nh ni3: nc9 nG ng/ nd4$ n&+ n^4 Z na \ nb nb, p ,!p ,!p ,!p , p , p , p + n% na nb\ nf/ ,Ap -|p }nj o D o o4D nx!$x A o D o!$ 2D o+ ny!$ A o D oU$ A o D o $ $ $$ $ $$ $D o o4D nx!$ G o D o+ nk o D o o D o+ n~4 Z o \ o o,!p ,!p + nj o o\ o,Ap -|p wPo@@ oSU$ D oT $ 2D oP+ o @@ oT : Z oT . oP 4$ o8 & ($ oO. " ( ($ oO. oO ). ,v DhoV"$ . D oU oU4D o8 : Z oU . oP 4$ o7 & ($ . oT -
D oS hoV oToV ( ($ oT. oO " ( ($
oO.
( " * ($
oO.
oO (). oT ,vF D oV $ 2D oP+ o+!$ oV ( ($ . oT -
F F oT $ 2D oP+ o7 oT. oP . oP.'` @ oQ
` oV @ oR '` oR oQ oQ @ oR-\ s/4 oT4 oR @ oT3: oU9 o oT3: oO9 o $ 2D oP+ o= oT oS D oT oT D oS+ oE4 oHQ * oM Z oN \ oN oN,!p ,!p , p ,!p ,!p + o!8 oHX8 *8 oN oN oS-|p {`oj 4 O@ pR+ om4 @@ pRO "$ D pR $ : INX + p
p 6@ pR J p
p
J p + pJ p
z@ + p #p & >
3Lp+ p7@p /& 5f oz7 + p@@ p: p L p
PLp+ pR d. Rpd$ 2N + o|: p: kN
y1kN
yxCB` xp p
0B + p d
:` pR+ p+ out(pR4 \ q8 @ q9< q@0< 0| + 1\ + pa,>ppRZ ppR+ p @ hq@ pq@(q @0q(@ xq @ q @8q*@(q@ Pq"@ Pq#@ hq@pi@ pi@q@qpq[ (/< 0"` S<p X< 0 p 3@ qA+ ph*| pd-< qN Z` pS+ q! @w+ pe< qB p 7 p + q,> ,> ,> &w p , p,& .< 7@p + p} p , p" qB q0.< p ` qC w,& ,& 5 po.< p d qC: ." Q ,& p ,& >` 9 pz.< 9 po@@ ,^ ,^ ,^ + qd @ @ & 0b ." ." )B}5@ q ,~ m< !< P\ q4< qB p [ p l< 0@X + q
Z p .< /\p Q +\ q5+ q8 \ q6@@ q7!< P\ q4X X\ q4 qD7@ q6D<7@ q7A< \ q5 < q4[`x q9, x ,^x q8+ pS pSQ< \ q4: pS \ q5< qD pq0| qE < \ q5@@ q6+ q@@ q5 Q< \ q4< qD pq0| qE+ q7 qG qH \ q5 @ q'X Q< \ q4 qI \ q5+ q [`x q9, x + q/Z \ q4@@ q5@@ q5< qB \ q6+ q7 q7 q6X\ pS@@ q7@@ q6+ qPq1 {Xq9>x ! Z @
& qIU` eB + q?@ )@ G
" + q<
& qM+ rW6$ 1 ,> u. @
p .4 6$ Xq..
.4 q5. q4SEQIN @ qFSEQOUT @ qG@ q'
%5 Source level error at user's loc
` Z (X^ . > S.~ (3~ + qR ~ + q^Z . \x <x *<x .-> u ez+ qY!" b + " q[ b + Z . h + gg M?}|Hq]
& q` b + qN,
?NO CORE AVAILABLE - CAN NOT PROCEED
!* r** ,^ ,~ * x ,> J r * r** r p Z@ qz@@ qz@@ q{ r;`|+ qnP w,~ "p h a`~ + qsh ``~ + qt$ r;!qud r</"+ qnP ,~ @ @ @ @ @0 @x @@ @` o`redX91 ,> u,> Zp @ qz\` qy < qz, ,^ ,~ SMI 1 ,> u, qf r= Bqz+ r _MI 1 ,> u, qf r? Bqz+ r I5R1 ,> u, qf r@ Bqz*\ r(7Ap X" rA Bqz/& p d"~ l" Bqz*\ r(/& p d"~ l" $ Bqz*\ r(/& p d"~ l"
Bqz*\ r(Sp *\ r(/&Xp B r@@ r rB Bqz*\ r(/& p d"~ l" BqzRF qy < qz, + qdEV4i91 ,> u+ r6S ,i@1 ,> u+ r6_ ,i@1 ,> u+ r6K>2 1 ,> u+ r6K>40 1 ,> u+ r6[<I71 ,> u
& rB w @ )@ .
" 5B r7
& rH,~ ` .
.4 SEQIN ^ r<SEQOUT ^ r>RANDOM ^ r?SEQINOUT r
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS:
a.3@1 ,> uO@ s+ rMgR~@1 ,> u@@ s,> ,> @ 6 w+ rZ" s0B + rU!"A`X#p 5@ rR/#p !" X#p + rZ\p + rZa.9'1 ,> u,> ,> O@ s+ rZ,>
6 + _ 4` rb"` Q@ ,> < s, ,^ ,> < s ,
,^ *b r+ rm,> ,< s < s,
,^ + rj,> < s,
,^ Z 5" rm,> < s,
,^ , 7@ s,
,> < s, ,^ , ,> < s, ,^ ,> < s,
,^ (@qd 1@ ,,
1@ #+ r{0@ *+ rm,> < s , ,^ + rm,^ ,^ ,^ ,~ (' Type G to Continue, X to Exit, T To trace.'/2H *,$) (A1) (1H 14A5/)(1H A5,1X,O6) PAUSESTOP .p X Hs s p X s s p s p s p X `s r} X ~mhs s p x C6 1 ,> u, s',~ [B 1 ,> u, s',~ [B 1 ,> u, s'@ ,~ C6 1 ,> u, s'` ,~ ,> e|P w+ s*3!p p *| s)a|+ s. p h" ab~ + s),^ ,~ C6Md 1 ,> u, s:,~ [&r 1 ,> u, s:,~ [&r 1 ,> u, s:@ ,~ C6Md 1 ,> u, s:` ,~ ,> e|P w+ s<2ap p *| s<a|+ s@ p h" ab~ + s<,^ ,~ gG@ 1 ,> u7cp + sP )@ / @( X@ sM(B{4 sNB ? B sT "P" sT B sT @ ,~ B @ B sT ""X+ sI4B sS+P q_0
sT#p + sD ,~ attempt to take SQRT of negative arg Kc3@ p p + sdKc3K , sd
,~ Kc3J , sd ,~ Kc3I , sd ,~ Kc3H4B sz5@ sg5" sy+D q_0
sfU ,~ ,> ,> # $ )D /$ @,> 4d sqX $ (F) + sq5F sq5" so"` , t+ sx# ,> < s{, tT,^ @ ,> < s|, t/,^ 5& sx" ,^ ,^ ,^ ,~ ! ,~ x x Kc#@ p p + tKc#K , t @ ,~ Kc#J , t @ ,~ Kc#I , t @ ,~ Kc#H4B t,5@ t
5" t+D q_0
t U ,~ D t+!$ @ t* B t+5" t#` + t(, t!" B ,~ + t(BdB + t5B t t+,~ +7` t++ t `d +D q_0t+D q_0
tU `d @ 6 t*+ t t+`B "` + t/ t-id + t!+D q_0t# t*,> < t., tT,^ @ ` t+ @ ,> < t., t/,^ + t U", t t*+ t+ t|t+! ,~ x Kc 1 ,> u p 3" tJ+ t43b tJ+ t6+D q_0
t3U ,~ +D q_0t5 ,~ D tK F tL@@ tK%" j" % tI)/;` : XD tE5f t=aF + t=.& @(|h& f tK tG tH tH tK tG D tI@ tK tL,~ !t0 _' "S'qf!um. .#Y% !v yO^ RX|tLC2|t(1 ,> u p 4@ td @ tS,> < tl, tT,^ tR,~ {e^b C2|p 1 ,> u p 5` tX4@ td+P q_0tm#p 3@ tg+ tf) r. !@ tk! n@ tk(|h" tg th B tk th ti ti tk tk tj,~ +D q_0
te tj,~ ,~ 0 _i/X3 6P'M 5( bB W
R `@ wtkx tSATTEMPT TO TAKE LOG OF NEGATIVE ARG M2| 1 ,> u p + ttM3!d ` ,~ C 1 ,> u#p ,~ S0 1 ,> u#p +" tz,~ U ,~ g&=` 1 ,> u#p 7!p "` ,~ SNL{@1 ,> u p Fp 4 u p ,~ "p +" u,~ U ,~ KbN@ 1 ,> u,
,~ uY\ u
Q< X\ u
* + !$h X$h @@h *% " u Bh L " Bh M+ x eX2G iSH YC aS iSH INX G YC GSH iSH aS aS I' IR
IR
IR
0 IR
@ IR
P IR
` IR
p [R
[R
[R
M?L@INX INX INX INX INX I2 I2 I20 I2@ G iSH I4:1 ,> uZ .@ 6kp 2j8 M+ u2 !p Q A` u,\$}
4L u*/, L 8$ u(.
8 L F( ,~ H ?FRSDVC - ILLEGAL DEVICE NUMBER IN CALL TO DEVCHG
& u,,
+ n