Trailing-Edge
-
PDP-10 Archives
-
decuslib10-09
-
43,50466/bmd09d.sav
There are no other files named bmd09d.sav in the archive.
h 'DX B- >%x - PCx . P /+ =('1BMD09D - CROSS TABULATION, INCOMPLETE DATA', ' - REVISED MAY 10, 1968' /41H HEALTH SCIENCES COMPUTING FACILITY, UCLA ) $ 8 D
!$ $ D !$ $ D " B
7 3D 2F 7 + V 3D 2F 7 + } " Sb
+ } " 0b ] 3D + [-\ < O 1f g O A 4$ d5" Jb $ D . D $ $D " Db " 9b "$ 2. $ 5$ v"$ 2. $ 5$ v $ h/ & / $ 5d x"$ 2. $ 5$ z : Z !$ Dh213: 9 v 5d D d @ $
: Z Dh2c $ Dh6W3: 9 + : Z " :B
h6W : Z $ 2$ . 211: 9
+ }3: 9
/" )B +: Z $ 1%3: 9 \ 4" !b 4: 4Z 1%3: 9 " + &(' VARIABLE FORMAT CARD(S)'/1X,18A4) : Z h6W5d ) @@1+ 7 6W D : Z & 2$ . 215D 5 & 2$ . $21XD 2-\ A4 4 25 5 F1+ 7 @@1 3: 9 + 3: 9 & : Z X@ < " 1&Q" ZB : Z 0s3: 9 = @@ : Z " . 4D X: 6W D 0s D 1 D $ D -\ 7 4 4 4 4 4 $ D 6b 0b 7 +O4 R4 P 21 D0s" . $ . D 0s F1+ Z 0s@ @) 3: 9 A 3: 9 9 : Z Zh0s1: 29 ^ 4d r" 5$ jZ 1B d+ d1B g+ g $
3: 9 n+ F : Z " *B
! : Z 1: 9 x
3D 2F 7 + " 2b
+ $ . D ! $ . D "" . 5d
-\ 8|4 4 4 4 4 4 "4 L4 $ " . F # : Z # h D $" . $5d -\ 8|4 $4 4 4 4 4 $4 44 ' $ $" . F % : Z : Z $
$ . @@3: "9 3: !9 @@ % : Z @@h0i1: 9 : Z 3DhL+ % 2D4+ ': % %` @4+ : L@ @ & 4@ @ & $
$ & &. : . # D ' . % D ' ' 1D 0i ' 1D 0j ' 1 D 0j ' 1 D 0k ' 1 ' 1D 0k 3: 9 ! / %` @ ( ( 0k 0i 0j D 0l ( 0k 0j ( 0j 0i D 0l-\ @%4 0l @ 0l 0l 0l D 0m : Z : Z &
$ . &
$ " . .D 3: 9 L 3: 9 J : Z : Z &
$ . !. .D 3: 9 U 3: 9 S : Z &
$ " . !. .D 3: 9 \ " 0b " Db " Gb # " Ub $ (4D " \b 7 7 " ab 7
7
" fb 7
7
" jb 72b 0m ( : Z &
$ ". 4d } D ) 3: 9 y : Z &
$ . ! 4d D ) 3: 9 $ . ) D * $ . ) D * : Z $
$ *. (
$ ". F3: )9 : Z $
$ *. . ! H3: )9 $
$ *. * (
$ ". ! F6b $0b 7 +4 4 4 $ " qb : Z 0s3: )9 + ) " b : Z &3: )9 ! + ) " b : Z &3: )9 & -\ = 4 )4
y4
4
14
4 "4 4 *4 *4 +4 0t4 4 0i4 4 4 4 )4 )6b "0b 7 +44 64 A4 A " ob " b " $b : Z &" . * D " 'b 0s 3: )9 ;6b $0b 7 +B4 D4 O4 O " ob " b " $b : Z &" . * D " 'b 0s& 3: )9 J " ob %4d " b " |b $ y F z G { H | : Z @@ + h4@ @ &" . & $ . D ," . & $ $. D , , 15D i , $1XD g-\ A_4 4 g5 i I }+ m J }: + + , 1 F& K ~ , 15D t , $1XD r-\ A_4 4 r5 t I + x J : + + , 1 F&
+5d } " yQ" b & + " yQ" b & : Z &3: +9 3: %9 Z+
" b + " b +
+" Jb $ #3: !9 9 rA 74d F@@ +/: 5Z " h215D : +4 +` 4@L+ 5( $ " . 4F ,4: 4Z X . ,"D ,. ,(1.D -F 6WD ( 1D -\ 7 4 4 4 -4 4 6b 0b 7 +$4 (4 &. ,-14 214D14 3: 9 @@1" N 215d 2" 215$ 5!$ 2$ D21 > 1+ +5 21 9D21+ : 1+ +2 3: 9 0 +4d o2: ,Z -2hL@ (@ 9 $ " . ZF , @@4I: EZ E . ,ID ,A ,I1Y 2c4D I) ,+$1XD E-\ AY4 E(@ ." .0 45$ I, ) .+F4( 3: 9 >R -3: +9 8+: (Z -EhL@ E@ @@ A ,44d Z" I 45$ W" . 45$ Z!$ I2 D4> + Q2 84 TD4: + QT N 1F1) -3: +9 MN: )Z -+hL@ P@ E $ " . (F ,S T1"D .!$ I+ ., @iVD /B: UZ , . , D ,I ,I1O 2c4D lP /E , D1T 3: 9 fE -3: +9 ^D" b 9 A" BLEI4,3X,5H(ROW)26X,8HVARIABLEI4,3X,8H(COLUMN))) + a(8H MAXIMUM9X,F15.5,15X,7HMAXIMUM9X,F15.5) + f(8HMINIMUM9X,F15.5,15X,7HMINIMUM9X,F15.5) + j(6H RANGE11X,F15.5,15X,5HRANGE11X,F15.5)+ o(9H INTERVAL8X,F15.5,15X,8HINTERVAL8X,F15.5) + q(1H0//)LEC+ s(1H06X,21I5) + |(15H0BASE VARIABLE,,I4,62H, INCORRECT. PROGRAM PROCEEDS TO NEXT SELECTION CARD (IF ANY).)T+ (1H06X,8HITEM NO.9X,8HVARIABLEI4,1X,5H(ROW)10X,8HVARIABLEI4,1X,8H(COLUMN)),+ (1H08X,I4,12X,F15.5,13X,F15.5)+ (18H0NO MISSINGIVALUES) + 15X, F15.5, 13X, }7 7'4d 7 : Z 7*" . 7)5D 7 7(5D 7-\ A4 7%4 7(5 7+ 7 7( & 2$ 7*. 7(214D 7 7*3: 7'9 7 $ D 7)+ 7 $ D 7)+ 7"4 Z 7& \ 7& 7',!p ,!p ,!p ,!p ,!p + 7 7& 7&\ 7)/ ,Ap ,Ap -|p ! uP7* 85d 7F " 7ab 7 Z 8 0s3: 8 9 7- " 7fb 7 Z 8 13: 8 9 72 " 7ib : Z 8@@ 8 7 Z 8 8/ 8 $ 8 . D 8: 8 8 8 1 F83: 8 9 79 " 7jb 8 : Z 8 83: 89 7A 83: 8 9 77+ 7w " 7lb 7 Z 8 0s3: 8 9 7H " 7rb 7 Z 8 13: 8 9 7L " 7ib : Z 8@@ 8 7 Z 8 8/ 8 $ 8 . D 8: 8 8 8 1 F83: 8 9 7S " 7ub 8 8 ) : Z 8 83: 89 7] 83: 8 9 7Q+ 7f(5H0ITEM3X,1H*/7H NUMBER1X,1H*,I7,12I8) + 7i(1H05X,5HSCALEI5,12I8) + 7j(1H0)+ 7l(1H I4,5X,13F8.0) + 7r(5H0ITEM3X,8HI.D. * /4H NO.4X,8HNO. * 12I8) + 7u(1H013X,5HSCALEI5,11I8) + 7w(1H I4,I7,4X,12F8.0)+ 7|4 Z 7~ \ 7~ 7,!p ,!p ,!p ,!p + 7+ 7~ 7~-|p p8
$ D 9" 9 D 9!$ $ D 9" 9 D 9 9
$ 9 F 9 9
9 F7
9
9 F7 : Z 9 9. D 9 9 1 D 9" 9 9
215D 8 " 9 94D 81+ 8( 9
6W D 9 9
1 D 9-\ 7 4 94 9
4 94 94 96b 90b 7 +8'4 814 8( 9
7
915$ 8- 9
9 1 F7
9
7 914d 81 9
9 9 1 F7 93: 9
7
7 D7 " 9 9
215D 8; 9
9 F2c 9
& F6W 9
@@1 9
9
+ 8H-\ AU4 9 9
7 D 9" 9 95D 8E 9
!& F7
+ 8H-\ ;j4 94 9 9
9 F7
9 9
7 F : Z 9 . 9 9
7
D 3: 99 8K 9
7 4$ 8[" 9 9
7
5$ 8[" 9 9
7
4$ 8V $ D 9+ 8[" 9 9
7
5$ 8[" 9
9
7
4$ 8[ $ D 9 : Z 9 9. D 9" 9 9
215D 8b" 9 914D 8l+ 8o 9 1 D 9 9
6W D 9 9
1 D 9-\ 7 4 94 9
4 94 94 96b 90b 7 +8k4 8l4 8o 9. 9 9 F+ 8z : Z 9 9 1 . 9 5$ 8v"$ . 9 9. 9` @ + 8z 93: 99 8o 9. 9` 9 @ 93: 9
\ 9 9 ,!p ,!p ,!p ,!p ,!p ,!p , p , p + 8 9
9 \ 9/ ,Ap ,Ap / ,Ap ,Ap -|p "_ !x` 0 "_ !y 9Lbx9* \p9+ 9%4 9 ;1Q * ;6 Z ;7 \ ;7 ;7,!p ;8 $ "D ;<-\ @%4 ;< ;8 F ;<-\ @
4 ;<!8 ;1X8 *8 ;7 ;7-|p $ P D ;@ $ 8 D ;@" ;/ D ;A` ;: @ ;A " ;b " :pb @@ ;; : Z ;B " :nB
;B ;C ;D ;D ;E Z ;E ;?3D ;B2F ;C+ :b " ; b ;C ;D ;D ;E @@ ;F ;:$ ;C" ;:. F ;F $ / ;: ;:$ ;D. D ;G"$ . ;:. ;G D ;G 74D 9J" ;@. ;G4d 9L " 9Eb ;G -\ Ai+ 9J(35H DATA SIZE N(P+Q) EXCEEDED, SIZE = I6) " ;@. ;G5d 9C@ ;E @ ;H ;:$ ;H" ;:. F ;H ;G Z ;I: ;F: ;H h1 D ;I" ;0 ;D215D 9V" ;A ;I4D :T+ 9_ ;D 6W D ;J ;D 1 D ;J-\ 7 4 ;J4 ;D4 ;I4 ;K4 ;J6b ;K0b 7 +9^4 :T4 9_ $ / ;D$ ;D5d 9k " 9cb ;; + 9k(' ILLEGAL TRANSGENERATION CODE ENCOUNTERED ON TRNGEN CARD NO.',I4) -\ Ai $ 2d ;D+ 9{ ;H 1 D ;K" ;0 ;H215D 9r" ;A ;K4D :T+ 9{ ;H 6W D ;J ;H 1 D ;J-\ 7 4 ;J4 ;H4 ;K4 ;K4 ;J6b ;K0b 7 +9z4 :T4 9{6b ;D0b 7 +9}4 :4 :
4 :4 :4 :4 :#4 :<4 :@4 :B4 :E4 :I4 :K4 :N4 :P ;I4$ :V5d :+ ;F@@1+ :]-\ @%4 ;I ;F @1+ :]- ;I4$ :V5d :F @1+ :]" ;I4D :5d :V" ;0 ;I4D :!5d :V-\ @%4 ;I @ ;=-\ 94 ;= ;F @1+ :] ;F ;1 F1+ :]!$ ;A ;I F ;L!$ ;A!& ;L F ;L ;L4$ :V5d :/" ;L4D :5d :V-\ @%4 ;L @ ;=-\ 94 ;= ;F @1+ :] ;L4$ :V5d :5-\ @%4 ;L @ ;=-\ 94 ;= ;F @1+ :]-\ @%4 ;L @ ;=-\ 94 ;= @ ;=-\ @%4 ;L @ ;>-\ 94 ;> ;= ;F @1+ :] ;I4D :V!$ ;I ;F D1+ :] ;E ;I ;F D1+ :] ;E ;I ;F D1+ :] ;I4D : ;I ;E, @D ;F D1+ :] ;I ;K ;F D1+ :] ;I ;K ;F D1+ :] ;I ;K ;F D1+ :] ;K4D :V ;I ;K ;F D1+ :] ;F ;A F1+ :] ;F4$ :["$ s D ;F"$ s D ;; " ;b ;B " ; b ;I ;I3: ;G9 9P ;C!&F F21 ;B3: ;;9 9-+ :k " ; b ;E
;B "$ s D ;;" ;;. ;E5$ :l: ;E ;E Z ;M " :nB
;B 3: ;;9 :h ;;5$ ;' " :{b + :p(A6,I3,I2,I3,F6.0) + :{(46H0CARD NEW TRANS ORIG. ORIG. VAR(B)/45H NO. VARIABLE CODE VAR(A) OR CONSTANT)+ ; (42H0PROGRAM CANNOT CONTINUE FOR THIS PROBLEM.) + ;(2H I2,I8,2I9,4X,F10.5) + ;(1H06X,23HTRANSGENERATION CARD(S)) + ; (55H0THE INSTRUCTIONS INDICATED ON TRANSGENERATION CARD NO.I2,1X,3HRE-/60H SULTED IN THE VIOLATION OF A RESTRICTION FOR THIS TRANSFOR-/59H MATION. THE VIOLATION OCCURRED FOR THE ITEMS LISTED BELOW.) + ; (10H ITEM NO. I5) + ;'(30H0ERROR ON TRANSGENERATION CARDI4,' PROGRAM READ IN',1X,A6,' INSTEAD OF TRNGEN') + ;,4 Z ;8 \ ;9 ;9,!p ,!p ,!p ,!p + 9 ;8 ;9\ ;;/ ,Ap -|p "_ !x` 0 9~jp;>TRNGEN {H;M" ;p ;r5$ ;VO@ ;t : Z ;t ;t$ D ;u!$ ;u, @i D ;u ;r ;u5$ ;`1: 9 ;P : Z ;t"$ . D ;u!$ ;u, @i D ;u ;r ;u5$ ;^ ;u ;p D ;u+ ;` ;t1: 9 ;W : Z ;u ;u h;u Dh;w1: 9 ;a : Z ;u ;rh;w5$ ;h ;u ;w D ;s+ ;i ;u1: 9 ;d+ ;m4 Z ;q \ ;q ;r,!p ,!p + ;M ;q ;q\ ;s,Ap -|p 0 ! `;u 0 P t ! |h;y <4$ <5d ;| $ D < </ <4D < $ 3D <+ < <X@ < "$ . <4D <"$ . <4D < <X@ < < D <+ < " < b -\ Ai+ <
(25H ERROR ON TAPE ASSIGNMENT)+ <4 Z < \ < <,!p ,!p + ;z < <\ <,Ap ,Ap -|p lh< =2 =2 =2 =3 : Z =< $ . D =: =:( =2.
=30 3: =19 <: =: =:( =2.
=30 : =: =:( =2.
=30 : =: =:( =2. =4 =2Q" b @@ =7 =2 =2 =2 =3 : =7 $ / =7. =; D =9+ <: =2 =3
+ =26 =3 7 +<;4 <=4 <B4 <F =2 =3 =2 =3 + <J =2 =3 =2 =3 + <J =2 =3 =2 =3 : Z =9 $ . D =: &
$ . =9 =5. 'u5d <T =:( =2.
=30 + <X =:( =2.
=30 =93: =19 <K: =: &
$ =6. =9 =5. 'u5d <a =:( =2.
=30 + <e =:( =2.
=30 : =: =:( =2. =4 @@ =: : Z =9 &
$ . =9 =5. 'u4d <r: =: =:. =8 (
$ =9. =9
=5.
=/u F =93: =69 <i =9/ =65$ = =:5d =6b =50b 7 +<x4 <z4 <~4 <~ =2Q" b =9. =7 + = =2Q" b =9. =8 + =6b =50b 7 +=4 =4 = Z =9 . =8 3: =:9 = + =+4 Z =0 \ =0 =1,!p , p ,!p Zp , , p ,!p Zp , ,!p , p ,!p ,!p ,!p , p , p , p ,!p ,!p ,!p ,!p ,!p + < =0 =0\ =;/ ,Ap ,Ap ,Ap / ,Ap -|p =< 4 O@ >$+ =?4 @@ >$O "$ D >$ $ : INX |H=B+ =W
=]6@ >$ J =]
=\ J =Z =]+ =W J =z =]+ >
z@ + =W #p & >
3L=`+ =S7@=` /& 5f =L7 + =W@@ =`: =` L =`
PL=`+ =VR d. R=`d$ 2N + =N: =`: kN
y1kN
y CB` x=_x =`H> Z =^0B + =W d
:` >$+ =W+ =Gx>$4 }X>% \ ?
@ ? < ?0< 0| + 1\ + >3,>p>$Z p>$+ p @ h>V@ p>V@(>p@0>z@ x>]@ >]@8>|@(>j@ P>t@ P>u@ h>V@>;@ >;@>V@>Vm>i[ (/< 0"` S<p X< 0 p 3@ ?+ >:*| >6-< ? wx>8Z` >%+ >i! @w+ >7< ? p 7 p + >V,> ,> ,> &w p , >Q,& .< 7@p + >O p , >Q" ? ?.< p ` ? w,& ,& 5 >A.< p d ?: ." Q ,& p ,& >` 9 >L.< 9 >A@@ ,^ ,^ ,^ + >Vd @ @ & 0b ." ." )B}5@ >R,~ m< !< P\ ?< ? p [ p l< 0@X + >\Z p .< / p Q \ ?+ >_@@ ?!< P\ ?7@ ? + >b < ?
\ ?@@ ? !< P\ ?X X\ ? ?7@ ?D<7@ ? A< \ ? < ?[`x ? , x ,^x ?
+ >% >%Q< \ ?: >% \ ?< ? p?| ? < \ ?@@ ?+ >f@@ ? Q< \ ?< ? p?| ?+ >f7 ? ? \ ? @ >yX Q< \ ? ? \ ?+ >f~x>y[`x ? , x + ?Z \ ?@@ ?@@ ?< ? \ ?+ >f7 ? ?X\ >%@@ ? @@ ?+ >hP? ~0? >x ! Z @
& ?U` eB + ?@ )@ G
" + ?
& ? + ?D6$ 1 ,> Ak. @
p .4 6$ ox? .
.4 ?. ?SEQIN}0? @ ?SEQOUT @ ?@ >y
%5 Source level error at user's loc
` Z (X^ . > S.~ (3~ + ?$ ~ + ?0Z . \x <x *<x .-> Anez+ ?+!" b + " ?- b + Z . h + gg M?} ?/
& ?2 b + ? ,
?NO CORE AVAILABLE - CAN NOT PROCEED
x ?6a.3@1 ,> AkO@ ?t+ ?;gR~@1 ,> Ak@@ ?t,> ,> @ 6 w+ ?G" ?u0B + ?C!"A`X#p 5@ ?@/#p !" X#p + ?G\p + ?Ga.9'1 ,> Ak,> ,> O@ ?t+ ?G,>
6 + _ 4` ?P"` Q@ ,> < ?v, ,^ ,> < ?y,
,^ *b ?M+ ?Z,> < ?z, ,^ 7@ ?t+ ?U,> < ?},
,^ + ?W,> < ?,
,^ Z 5" ?Z,> < @ ,
,^ , 7@ ?t,
,> < @, ,^ , ,> < @, ,^ ,> < @,
,^ (@qd 1@ ,,
1@ #+ ?i0@ *+ ?[,> @< @ , ,^ + ?[,^ ,^ ,^ ,~ ('eType G tohContinue, X to Exit,T To trace.'/2H *,$) (A1) (1H@14A5/)(1HA5,1X,O6) PAUSESTOP h?t.p X `?w ?q p p?yX `?{ ?r p 0 ?sp?~p j ?tp?p k p@X `@ ?k X ~P@ ?p p x |p@ CR @7 @ ,~ B @ B @7 ""X+ @-4B @6+P ?10
@8#p + @' ,~ u @7attempt to take SQRT of negative arg Kc3@ p p + @GKc3K , @G
,~ Kc3J , @G ,~ Kc3I , @G ,~ Kc3H4B @]5@ @K5" @]+D ?10
@JU ,~ ,> ,> # $ )D /$ @,> 4d @TX $ (F) + @T5F @T5" @S"` , @l+ @[# ,> < @_, A7,^ @ ,> < @`, A,^ 5& @[" ,^ ,^ ,^ ,~ ! ,~ x x Kc#@ p p + @lKc#K , @l @ ,~ Kc#J , @l @ ,~ Kc#I , @l @ ,~ Kc#H4B A5@ @o5" @y+D ?10
@nU ,~ D A!$ @ A B A5" @v#` + A , @v!" B ,~ + @z(BdB + @z5B @u A,~ +7` A+ A`d +D ?10@~+D ?10
@~U `d @ 6 A+ @y A`B "` + @y/ Aid + A+D ?10@~# A,> < A, A7,^ @ ` A @ ,> < A, A,^ + @U", @v A+ @z+ @s|A! ,~ x Kc 1 ,> Ak p 3" A.+ A3b A-+ A+D ?10
AU ,~ +D ?10A ,~ D A. F A/@@ A/%" j" % A,)/;` : XD A(5f A!aF + A!.& @(|h& f A/ A+ A, A+ A/ A* D A-@ A. A/,~ !t0 _' "S'qf!um. .#Y% !v yO^ RXA/C2|t(1 ,> Ak p 4@ AG @ A6,> < AP, A7,^ A6,~ {e^b}A6C2|p 1 ,> Ak p 5` A;4@ AG+P ?10AP#p 3@ AJ+ AI) r. !@ AN! n@ AN(|h" AK AK B AO AL AL AM AO AN AM,~ +D ?10
AH AN,~ ,~ 0 _i/X3 6P'M 5( bB W
R `@ 8AOx A6ATTEMPT TO TAKE LOG OF NEGATIVE ARG{hATM2| 1 ,> Ak p + AWM3!d ` ,~ C 1 ,> Ak#p ,~ S0 1 ,> Ak#p +" A^,~ U ,~ g&=` 1 ,> Ak#p 7!p "` ,~ SNL{@1 ,> Ak p Fp 4 Af p ,~ "p +" Ah,~ U ,~ KbN@ 1 ,> Ak,
,~ AlY\ AmQ< X\ An* + !$h X$h @@h *% " Av Bh L " Bh M+ x eX2G iSH YC aS iSH ~AvINX 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 xBiSH +