Google
 
Trailing-Edge - PDP-10 Archives - decuslib10-09 - 43,50466/csmp.exe
There are 2 other files named csmp.exe in the archive. Click here to see a list.
?p 
 ?xGNnKb)E|mdE`INXQF:{A)'[{BE@

!(#y

p-OJY*>	`H!Y|@Y -\!4,4,4-4# $2D++? ";b  "Hb  $ D; $ D+-\Q4l4*+c+?(/' TO CLEAR TYPE "RESTART"'//)    -\Z $ D9 $2D-+C . D9@@- $ D. $ D+-\Q4l4* "Hb +L(' FOR HELP TYPE "HELP"'/)    6b;0b7+M4c4c4c4Q4V4\ "Sb +c+V(/20H ERROR IN PROCESSING/)    "Xb +c+\(/24H RUN TERMINATED BY A "^"/)     "^b +c+c(/33H RUN TERMINATED BY A QUIT ELEMENT/) $ D; "eb +g(2H *$)    : Z,@@h<1:(9h "lB <4( +m(80A1)     $ D/ / =7 .$?(yA# <7 .(?(|A$!*xA
<GG D/@@D : Z, /2Dh3+6b0b	7+{444	444.484=4H4R44%4<4E4I4M4{41:	9w+-\N~+
 $ D9-\2+
 $ D9-\Q494)-\|-\	| $2D9+ "b  $ D.+
+(/27H CONFIGURATION NOT COMPLETE/) -\
4 $3D9+@@.+
 .5d-\9O@. $3D:+&+
 $3D.+"$2$.+$ "!b +
+$(24H PARAMETERS NOT COMPLETE)  $3D:+&-\

2 "+b  $ D9 $ D:"$ D.+
+.(15H MODEL COMPLETE)"$3d.+3 $2D:+3-\Q4l4(-\
 "5b +
+8(19HMODEL NOT COMPLETE) "$2$.+; $2D:+3-\
"$3d.+3-\40"$ D.+
 "Cb +
+H(34H INTEGRATION SPECIFICATIONS NEEDED) "$2D.+M $ Dm-\40@@m-\D40+
 "Ob +
+R(16H MORE WORK TO DO)     "Ub() +[(' OLD INPUT FILE WAS ',A4,':',A5,' REPLACE WITH '$)   +\(15A1)     "[B d4 -\{4d4(4)49 $2D9gO &2F9gO (2H9gOGG4$R "kb)* +q(' OLD OUTPUT FILE WAS ',A4,':',A5,' REPLACE WITH '$)   "[B d4  * D0 l D1-\{4d4)4*4l l2D1gO *2F0gOA4$ 1X@~-\P}41-\Q4l4* $2DlgO &2FlgOG4$i "	b'( +(' OLD MODEL OUTPUT FILE WAS ',A4,':',A5,' REPLACE WITH '$)  "[B d4 -\{4d4'4(4l+
 ""b -\!4,4,4-4$`,% @1 "/b1  "7b,-  $ D- 9 D.-\!)+?+%(/' RESTART IN PROGRESS'/)     "'b +)(//' END OF RUN')   -\!4,4,4-4%`,% @1 "/b1 +4(' TOTAL CPU TIME FOR RUN ',F8.3,' SECONDS')  "7b,- -\Yw+<(' ELAPSED TIME 'I4,' MIN ',I2,' SECONDS')   -\!4,4,4-4$`,% @1 "/b1  "7b,- +
 $ Ds"$3d.+I"$ D.+
 $ Ds"$3d.+M"$ D.+
 $..6b0b7+P4v4q4m4e4a4T+-\!4#4 
 $3D9+X-\Q494)-\|-\	| $2D9+] "b +T-\
4 $3D9+[@@.-\!4#4 
-\9O@.-\!4#4 
 $3D:+e-\

2 "+b  $ D9 $ D:"$ D.-\!4#4 
"$3DD+
P$3D<+q-\#4 
 $3D2+v-\40"$ D.-\!4#4 
"$ D. $ Dm-\40@@m-\D40+
 $3d.+ "~b +(' USE RESTART COMMAND FOR NEW MODEL',/)+
O@D+MO@s"$3d.+"$ D.-\Us4
&@@2@@3+
 $./  Z, +3Dh<+ h<4DL1:(9+L * ,2D<gO <0HgOG4$L $., D/ $3$;+L+n *3D/+c "b +c+!(' COMMAND ERROR- FOR HELP TYPE "HELP"')-\Yw+  +0"_ TRMNL.DAT DSK0 MODELTTY  DSK  INPUTOUTPT     ;    HEL  LOO  CON  PAR  FUN  PUN  INT  OUT  GOE  FIL  RES  EXI  TIM  PRI  PLO  RUN  INP  GRA  

 "Fb +L(1H1,10X,38HWMU CONTINUOUS SYSTEM MODELING PROGRAM//)   5DM $ D : Z`@@h21:9O : Z`@@hm1:E9R : Z` $ Dh81:9T : Z` $ Dhp1:9W+\4 Z] \^+E ] ^-|p"$3DD+c "cb +h(/10X,27HCONFIGURATION SPECIFICATION/)   $3D9+r"$3DD+x "lb +q(40H BLOCK  TYPE   INPUT 1  INPUT 2  INPUT 3)+x "sb +x(39H BLOCK, TYPE, INPUT 1, INPUT 2, INPUT 3/)-\!44	 @	 	4${5ds 	4$s4D{ $%3$	+s@@	@@	@@	-\ 34	4	 @	 : Z	 	3Dh	+

(28HUILLEGALBLOCKTYPEINDBLOCK,I3/)]+z	4$"5dm-\!44	+@	+	4$"5dm-\T04	0`&+m-\!44	 @	 	4$"5dm-\T04	0`&+m-\!44	@		4$"5dm-\T04	0`&+m"$ D	-\34	4	5@m($3$	+*6b	0b7+%4B4=4B4=4B4=4=4=4?4<"$.	-D	$3$	+46b	0b7+/4<4=4=4=4=4=4>4?4>4="$.D	6b	0b7+74=4<4?4>4>4>4B4=4>4BR	5dmT	5dmV	5dmX	4$mZ	4$m-	4$m 	 	 FX 	 	 F} 	 	 F# $2D9gO-\!4	G4 ` $ D	 : Z	 &%$	.	 
@@A@@A@@
 $ D@ $& D : Z
 $h2XD	-\T04	 @
 
4D	H 
 Dh2 $
2D
+	$:A A Z+	/ $2D
+	):A A 
 Fx 
 A FH+	/ $2D
+	- @ 
 F:@+	1 $2D
+	/:
 
"
 F2 : Z
 &%$.
D$-\T04	5 @
 
 21DgO &%2&
gO 
0hgOGG4$	G "	@b

 +	F(6H BLOCK,I3,16H, INPUT TO BLOCK,I3,9H, MISSING/)  $ D
 
1:9	1 
1:%9	 A5d	R "	Lb +	Q(31H AT LEAST 1 INTEGRATOR REQUIRED/)    $ D
+	\ $

2$A+	\ "	Ub +	[(48H THE MAXIMUM OF 25 INTEGRATORS HAS BEEN EXCEEDED/)  $ D
 $

2$A+	f "	_b +	e(48H THE MAXIMUM OF 25 UNIT DELAYS HAS BEEN EXCEEDED/)  $ D
 $2$
+	r "	ib +	p(55H THE MAXIMUM OF 3 FUNCTION GENERATORS HAS BEEN EXCEEDED/)     $ D9+	~ $3D
+	p 
5d	v $ D:@@B+	{ $ D: 
3dB+	z $ D: 
 DB $ D9+	~4 Z
 \
+	 
 
-|p $ D
9 @ Z
:@@h1:&9
"$.@ D= : Z
: h25$
  : Z
; &%$.
:D$
-\T04
 @
; 
;4D
 A4D
 : Z
< 
;3Dh+
3:A9
 : Z
< 
;3Dhx+
3:A9
 : Z
< 
;3Dh+
3:=9
+
  
;1:9

+
0 
:1:%9

 : Z
: h24$
)1:%9
" $3D
9+
' $ D9+
6 $ D9+
6 $ D
9 "
,b
: +
0(22H SORT FAILURE AT BLOCK,I3/)     
:"`2:= = 
: F+

+
64 Z
7 \
8+
 
7 
8-|p"$3DD+
? "
?b +
D(/10X,29HINITIAL CONDITIONS/PARAMETERS/) $3D9+
N"$3DD+
H "
Hb +
M(6H BLOCK,3X,7HIC/PAR1,8X,4HPAR2,10X,4HPAR3) +
S "
Ob +
S(27H BLOCK, IC/PAR1, PAR2, PAR3/)  -\!4<4@ @@ @4$85d2 @4$24D8 $%3$@+2@@A@@A-\ 34<4@ @B @4$
h5d+-\ 34<4@ @A @4$
h5d+-\ 34<4@ @A @4$
h5d+"$ D?-\ 34?4@5@+ @ 2 DB B4$5d
s "
mb +
r(41H NO CORRESPONDING CONFIGURATION STATEMENT/)   + $3$B+
{6bB0b7+
v44

44444

44

 $
3$B+"$.DB6bB0b7+
44

4

4

4

4

4
.DB6bB0b7+4

44

4

4

 B5D+ A5D+ A5D+ @ B F @ A F: @ A F` $2D9gO-\!4=G4 
S $ DC : ZC &%$C.@ o5D >C1:9 "(b@ +
S"$3DD+( "(b@ : ZC $%$.@o3:C9$ ++(3X,I2,1X,3(1X,G13.6))   +
S "-b +1(33H IMPROPER PARAMETER SPECIFICATION/) +7 "3b +7(21H INVALID BLOCK NUMBER/)   O@=+
S@@=+;4 Z= \>+
< = >-|p"$3DD+G "Gb +L(/10X,33HFUNCTION GENERATOR SPECIFICATIONS/) -\!4

54

9 @

9 

94$

15d

 

94$

'4D

1 $ 

93D2gO &%2&

9gOG4$

' : Z

: 

93Dh+c1:9W : Z

: h D

: $ 

:3D2gO 

:0FgOG4$c1:9Z+

' $ D

:-\ 34

54

9 

: @m 

94$d5d

:

: $2$

:+d"$ D

8-\ 34

84

95@

! 

9 

: FH 

: 

9 F : Z

: $$.

: hm F1:9q"$3DD+

 $3D9gO-\!4

6JA5  "b

9 : Z

: m1:9| +

(I3,9X,5(1X,G11.4)/6(1X,G11.4))     

9 2d:+L "

b

9 +

(44H SPECIFY LIMITS FOR FUNCTION GENERATOR BLOCK,I3/)   "

b +

(14H UPPER, LOWER=$)-\ 34

54

9 

9 @ 

95D

-\ 34

54

9 

9 @: 

94$

5d

"$ D

8-\ 34

84

95@

+

 "

b +

 (13H SYNTAX ERROR/) +

0 "

"b +

'(30H TOO MANY INTERCEPTS SPECIFIED/)    +

0 "

)b

9 +

0(6H BLOCK,I3,40H WAS NOT DEFINED AS A FUNCTION GENERATOR/)  O@=+L@@=+

44 Z

6 \

7+D 

6 

7-|p lX@

< "

=b +

>(1H1)+

?(1H) : Z

X.$$D

M>9

D lX@

J "

Ub+

X lX@

N "

Ub.Z

Q +

X(3X,I2,5X,A1,3(6X,I3))    

@ lX@

[ "

>bD : Z

x.$$D

e>9

`+

xD$O &
2FO (
2HOGG5$

n $XD

o "

ub.

q +

x(3X,I2,1X,3(1X,G13.6))    

\ lX@

{ "

>bZO$3D:+

b.11.4)/6(1X,G11.4))     

~ lX@

>b)+lX@

;-N"/)+RVAL/)++3HlgOAA4$@@U!: ZV S DhX1:9
lFX-\R(4W4M1@Q-\R(4U4M@R-\R4U4Q4R	@U3:@92 h=m$H1$@ @W`U2`MgO U1$gOA5  U T FX`W2`MgO W1$gOA5  W h
 FX3:@9

 lX@  "$b!: ZW X3:U9! +'(1H ,G9.3,1X,101A1) +J > m DY > m DY ? m DZ ? m DZ lX@/ "3b : ZW X3:@90 +6(1H ,G11.5,4G13.6)  +J : ZW"$.$P Q. FX"$.$P Q. O. 

h= 
0m J'"$.$P Q. P. 
J'3:@97+J4pZN\NO,p,p,!p,!p+     -    I    +    A    B    C    D     $3Dm+w "b +(/10X,14HOUTPUT CONTROL/) "b +(16H PRINT INTERVAL=$)   -\ 344! @0 !5D"$ D -\ 34 4!5@ 0 D -\T&4  &. F  02$+, "$b ++(56H PRINT INTERVAL CANNOT BE LESS THAN INTEGRATION INTERVAL)    + $3Ds+M+0(18H NOT A LEGAL BLOCK/)  "2b +6(25H MINIMUM, MAXIMUM VALUES=$)    -\ 344! @2 !5D0-\ 344! @" !5D0"$ D -\ 34 4!5@0"2" D1 15dM s0$gO 10FgOA4$M "Hb +M(36H MAXIMUM CANNOT BE LESS THAN MINIMUM/)   +0 "Ob +T(36H BLOCK A, BLOCK B, BLOCK C, BLOCK D=$)   @@@ : Z"-\!44! @h= !4$c5dM $% "2$=gO (3h=gOG4$e:@ "1:9U"$ D -\ 34 4!5@M @4dM+ "-b +M $3DsgO &2F<gOA4$w  D# lX@n "sb : Z"# =3:@9o +v(1H1/5X,5HTIME ,4(5X,A5,I3))  + $.s6b0b7+y44|4g4| $	3DlgO &3FlgO (3HlgOAA4$

 "b2" +

(1H1,4HTIME,2X,G13.6,36X,G13.6/,11X,'+',10('----+'))+lX@"b2"$+(1H1,1X,4HTIME,2X,G13.6,86X,G13.6,/,11X,'+',20('----+'))\Y4$4D<+4 Z$\ ,!p+M L5$> "2b +=(' NOT ENOUGH CORE TO GRAPH, TRY INCREASING THE PRINT',/,	' INTERVAL OR DECREASING THE TOTAL TIME',/)    !$ D;+G M $NXDB M $NXDB-\t4B4B4K+G4 ZJ \J  K,!p+# J J\ K,Ap-|p  D : Z h D   Fm3:=9Q@@@@ : Z hx D  m Dh3:A9V $% DC 0D  F $ D; $ D@@ 0$@ @-\ 2 D 1 D@@  D-\!4{4 	6b;0b7+j4m4}44	4	4	: XDp XDq-\E4p4q44 $ D; : Z h Dh h#Dh3:A9t` @  D" D-\+h $ D; : Z h#h Dh3:A9  D:-\+g 0@ @ 2d+: XD

 XD

-\E4

4

44 $. D $3$;+-\!4{4  5$+r $ D; s1$gO &3FlgOA5$ lX@ "b +(//1H1)    s5$t!$} D	!$} D	@@
@@
 $ D $
 D@@

@@

 $'.D.

.

. D!$  D@@@@ $@ D| : Z: . $XD4 . $XD5-\c444544	4	4
4
4444444 $2D+?@@"$
.D"$./ D| && F}!: Z: . .. 
.
 / F . .. 
.
 / F.} |/Z7 }"4dD XDT XDU $. D-\c4T4U44	4	4
4
4444444 . |/Z7 "4d/-\=>-\A { D "gb : Z $.23:@9c +t(' PRINT SYMBOLS:',/,A1,'"SQUARE" - BLOCK ',I2,A1,' "X" - BLOCK ',I2,A1,' "+" - BLOCK ',I2,A1,' "TRIANGLE" - BLOCK ',I2,/)   +x4 Z} \~  ~, p, p,!p+O } ~\ ,Ap-|p      : Z hx D  h Fm3:A9 @ D

 

  D   D

  : D  } D  # D $&3$gO 1&gOA5$5  m D $&3$gO 1&gOA5$;  m D $&3$gO 1&gOA5$B  m D  2 D $3$+L6b0b7+F4]4l4b4n4g4w4444"$.D $3$+U6b0b7+P4|44$4&4(4*4+4-4145"$.D6b0b7+X4D4I4L4Q4S44f4w4x-\O4444

4 @+{-\O&4444

4 @+{-\O:4444

4 @+{-\T444 @+{ 4D'5ds"

 D 4d'  D+{  H D 

" 

 

5d   D+{@

 @ $2d+   D+{` @

$.  D

"&$.  D



 D+{ 

D+{ 4$-\RS4-@+{ H+D 

2d+! 

3D+{-.4 @+{ 5d4@@+{ 

 D+{ 5$'+4 4d|+ 4$0  D+{  D+{@

 @-\!44 .  D+{"$.;4D'5d? @@H 4$'  & FH"

 +D:!$3D+{+ H4D8 

 FH+| 

 +{  D+{ $"D
-\T.4
3`

+4-\!44D!$H D

+$4$2D;+c +m F:45m"D "m D+l@@+l  D 4Dq5dp"` "mD+q D 4D{5du"` "mD+{ D+{" D+{ 4D  D   Fm 

/=4D5d:

+$ $3D;+@$ D;+ $-D;+4 Z \	++@	-|p30+"b+(/10X,28HOUTPUTINTERROGATION4OPTION/)2"b+(7HUBLOCK=$)-\!4549-@8494$15d$"$2D7-\347495@$484D15d( "&b\+'(5HWHAT)+4$%3$8+$5",b8 8m+1(16H OUTPUTDOF!BLOCK,I3,4HDISA,G15.8)!++44+Z6 \6+ 6 6-|p+;('PLTL')"+<('PLTT'/)+>(1X,I4,1X,I4) +C('X!AXIS$SCALE@IS',G,'PERDIVISION') +G('YvAXIS!SCALEIS',G,'PERDIVISION')`+J(1X,I4,1X,I4,'^')h+M('XAXISmLOGORIGINAT',G)m+Q('YAXIS'LOGORIGIN AT',G)w+V('CAN''T$GRAPH4NEGATIVES4ORZEROON\LOG4SCALE')+Z(7X,'NUMBEROF%CYCLES\IS',I2)+]('XAXIS%MINIMUMIS',G) +`('YAXIS&MINIMUMIS',G/)+f('0IMPROPERVALUEFORGPLOTSUBROUTINEARGUMENT!!'//)u+g(G10.4) +h(I3)&+m('0VERTICALDDATARANGETOOSMALL!!'//)+r('0HORIZONTALDATARANGE TOOSMALLv!!'//)34dU+&$1DgO&(1HgOG4$U-$2D+{-$4D4$2D+~-$4D@@@@O@O@O@O@O@O@O@-\TM44u @5D@@3$2D+O@ &$3D-\TM44u @ $3d+!$ & D" z3$&+!$p& D" {3$&+"!$@& D" {3$&+%!$@& D" "w D"+` 0dgO 1fgOA4$C-\T.4 @-\SZ4 @'-\T44|4' @' @-\T&4 @' 5dA-\T.4 @-\SZ4 @'-\T44|4' @' @-\T&4 @("'.( D-\T04 @!`! v D!+A "Qb +m 0dgO 1fgOA4$C-\T.4 @-\SZ4 @'-\T44|4' @' @-\T&4 @( 5d`-\T.4 @-\SZ4 @'-\T44|4' @' @-\T&4 @)"(.) D-\T04 @#`# v D"+` $2D +vL4$c-\?" $3D+n-\?Q4}4}4}4}-\A4~4~44 5$m-\A4}444+v-\?Q4}44}4}-\A4444 5$v-\A444}4L4$
4-\Q
44}4*4
4}4}`:Z+.3:9+`:TZ+.3:9+$3D+T444, "@,"`,L4$! : Z+ 5D""+ .v  D $2D+) . * D-\T.4 @-\SZ4! @ $2D+. v .  D  .D 5D5", .v" D $2D+= . ) D-\T.4 @-\SZ4" @ $2D+B v ."	 D 	 .D3:9 4DS : Z+ . @ @, . @ @- 2DgOD4$-\@D4,4-44
4 3:9F+  @ @,  @ @- , D- - D. $ D.-\@y4,4-4 4u 3$.+ . Z+`- . @`. . @/-\T.4/ @/"$. D0"$..  Z0!$3$/+s`. . @`- ./ @-\T.4 @1!$2$/+|`- . @`. ./ @-\T.4 @1 12$+"..00d+3:09i +3:9_L4$ . @ @, . @ @--\@y4,4-4 4
+ +. @ @, +. @ @- $.+ D.+*-\Q
44}4*4
4}4}@ : Z+ .3:9 @ : Z+ .3:9 -\P}4-\Us4
-\?/ 5$%   D $2D+%`! @ 5$D " D $2D+*`# @+D@@1 $2D +6 ,/-` 	pv!",Rq @ -/.` 	 v!",Rq @-\RS4 @1 1{$@ @2 ,/-&2 D2 -/.&2 D3 : Z3 2.D- 3.D.-\@y4-4.4 4
3:29=+] , D4 + D4 $2D+K!$ ""D4 4 D4 $3D +Y ";b  $3D+] ">b"  $3D+b "Cb!  "Zb4  "]b4  4$g 4$1 $3D +[+_ "Jb)  "Vb#  $2D+S "Mb*  "Vb! +U $ D2 $2D +j $ D2 $ D, $3D+p"+v @ @- $s3d-+s $s D- $#2$-+u $# D- $2D+x $s D- $2D+z $C D- $2D +} "9b -\@y4,4-4 4u $ &2 D5 $2D+ $j&2 D5 : Z+ 5.D,-\@y4,4-4 4
3:29 $>.- D5"$>.- D6 $ D6 , D7 - D7 $ D, $3D+s : Z+-\@y4,454 4u-\@y4,464 4
 $
.D, $2DgO &2&gOA4$1:9"$.D, $., D-\@y4454 4u"$., D-\@y4464 4
"$., D-\@y4454 4u $., D-\@y4464 4
 $s D- $3D+6",v"	@ @, $3d,+9 $ D,`,3`+; $$: D, $2D+> $ D, $2D+@ $O D,-\@y4,4-4 4u $ D2 $2D +F $ D2 $ &2 D5 : Z+ 5.D--\@y4,4-4 4
3:29H $s D8 $# D8 , D9 $s D- $-., D9"$-., D: $3D+$ : Z+-\@y494-4 4u-\@y4:4-4 4
 $.D-1:9V"$H.D-"$., D &>.- F-\@y444 4u-\@y4,4-4 4
 $., D &>.- F-\@y444 4u-\@y4,4-4 4
"$>.- D-\@y4,44 4
+U # D: $}.- D;"$}.- D; $.:&$ D< $2$<+ :7 .$(( :/ (/ H: $&: D<-\T$4< @= : Z+-\@y4,4;4 4u-\@y4,4;4 4
 $3$<+ $/< D : Z0 Z-\T$4 @-\SZ4= @-\T&4 ,. D=-\@y4=454 4u-\@y4=464 4
.< /Z7 <"4d

 <.D, +3::9-\@y4,4;4 4u-\@y4,4;4 4
 $.D,+  ! D: $Z., D>"$Z., D> $.:&$ D< $2$<+1 :7 .$(( :/ (/ H: $&: D<-\T$4< @= : Z+-\@y4>4-4 4u-\@y4>4-4 4
 $3$<+L $/< D : Z0 Z-\T$4 @-\SZ4= @-\T&4 -. D?-\@y494?4 4u-\@y4:4?4 4
.< /Z7 <"4d= <.D- +3::94-\@y4>4-4 4u-\@y4>4-4 4
 $H.D-+_ 4$\ 4$1 $3D +[ ";b +_-\A-\=>+_L4$_ 4$1+_ $3D +9 $3D+y"$.6 D"&,.7 F-\@y444 4u-\=>-\>04444
4}"$.7 D"&,.7 F-\@y444 4u-\=> $$7 .$( &/`"4 @?-\>04?44
4}+

"$.7 D-\@y4644 4u-\A-\A-\>04u4}-\=e4

-\>04(4}"$.7 D-\@y4744 4u-\A-\A-\>04u4}-\=e4

 #.( D@-\>04@4} $3D+""$.9 D &d.8 F-\@y444 4u-\=>-\>04444
4}"$.9 D"&H.8 F-\@y444 4u-\=>!$	 !4 D?-\>04?44
4} 4$1+["$M.9 D-\@y4484 4u-\A-\A-\>04u4}-\=e4

-\>04'4}"$M.9 D"&,.8 F-\@y444 4u-\A-\A-\>04u4}-\=e4

 !.' D@-\>04@4} 4$1+[ $3D+S  AX@P, "f4 "$,.6 D"&H.7 F-\>4A4

4447 .$( &/`"4 @?  AX@P, "f? "$,.7 D"&H.7 F-\>4A4

444,.6 D"&H.7 F-\>4
u444g(F-\4A4u"$.7 D-\>4A4u4644
u444@AX@P,""g@&-\84A4u"$.7 D-\>4A4u4744

444!4 D?  AX@P, "f? "$.9 D"&d.8 F-\>4A4

4441+Y"$`.6 D-\>4
u4484g'F-\4A4u"$4.6 D &2.8 F-\>4A4u444
u444@ AX@P,@"g@$-\4A4u"$4.6 D"&2.8 F-\>4A4u4442D+> $ D7 $# D8-\@y46484 4u"6.7&2 D@"8.8&2 DA 6 D, 8 D- : Z+ @.D,-\@y4,4-4 4
3:29H : Z+ A.D--\@y4,4-4 4
3:29M : Z+"@.D,-\@y4,4-4 4
3:29S : Z+"A.D--\@y4,4-4 4
3:29X $3D +Y+[ 5$b"$ D-\A=4+m4 Z \  , p, p,!p,!p,!p,!p,!p,!p,!p,!p,!p,!p,!p,!p,!p+9  \ ,Ap,Ap,Ap,Ap/ ,Ap,Ap,Ap,Ap,Ap,Ap,Ap-|p!#?@!Ji6 ~. t. T
\ P
\ 0=8 ^
\ X
\ 8=8 0

$ wg6#SC`2B,tM#<R@}^F-DSK14DATA.TMP   #"_#j"tj 0#R  P   10 $$h Dj : Zj hXDG Zi-\U4G4i4k e2Dk+K3:j9D+c $2Dj+M+c j Zk hXDP Zi-\U4P4i4k hXDU $/j. Di-\U4U4i4k3:j9N $.j/j  Zk hXD\ Zi-\U4\4i4
e3:j9Z+c4 Zf \g  g, p,!p+B f g\ h-|p           $3D

+x $ D

-\T4
4-\T4
4DU$ADAD$A D $A D  D  D+~(1X,A4,A5,/,1X,29I2,/,1X,29I2) $ D

G.	3D+46b0b7+44444$!$xA.	A 
+{L3D+y $3D+:  G D : Z 	3Dh"+@1:9=+@ 2D	gO   0FgOA4$? : Z 3Dh"+N1:9F "Kb +N(' ?BAD DEVICE NAME',/)  +g 2DgO   0FgOG4$\ $2DgO &2FgOG 2FgOA4$H+ @@  & F+s "ab +g(' ?',A4,': MAY BE USED FOR ONLY ONE I/O FUNCTION',/)   "ib	
 +n(' OLD WAS ',A4,':',A5,' REPLACE WITH ',$)    "qB~!	4 +r(15A1)    +x  D	  D
  D+ D1$9D+4 Z \  , p,!p,!p,!p+l  \ 
,Ap,Ap,Ap-|pTTY I	+ 2:$ . KDSK /CDR ILPT JCTY TTY NPTR /PTP ITTY NDTA1DTA2KDTA3LDTA4/DTA5KDTA6DTA7LMTA0/MTA1LMTA2NTTY	 DSK0MDSK1DSK2LDSK3MDSK4JDEV1=DEV2$DEV3=DEV4/DEV5= =4D>5dE3$3D9+93"9b :2Z I+	N1:96+;(1H,40A1,4H****) . "CB$ N4$D+D 9X@A+"C:.X@P-B$	N4$+D(72A1) ,@$+D=4C5dG@@D+H  E D D $$3$=+L+F!=2DN+MO@ D+ 2\ C5$O!$-DD+2=Z=E2DhN+S1:$9P+.=NDIE3DI+,F3DI+ ., C4$x4Df+:.Z IE I3Dh r+x1:9ZIDD:=$$3$=+.=NDIF3DI+.E3DI+,E3DI+'+^@@J@@J@@K@@K@@L@@L@@M:ZII3Dhr+y1:9jG3DI+0    1    2    3    4    5    6    7    8    9     0 P X p t x |!!-\ 34!4! @! !4D!5d!"!!@ @!+!@@!+!!$!@ @! ! D!+!4 D! Z! \!  !,!p,!p+ | ! ! !\ !,Ap,Ap !-|p  p
$+!5B!0F/+!+!0B+0F/+!+!O-|p@-|p
2
&!*+! 	p	d	@	f 
 4H!&/!( Cp/
!(&*t&* Kp Mp0H-|p F!( D!(-|p -|p
?
 &

X@!. "!/b +!3(' INPUT? (TYPE HELP IF NEEDED)--',$)    $2D&

X@!6 "!7b +!<(' OUTPUT? (TYPE HELP IF NEEDED)--',$)   &

X@!? "!A  #"X@P-  #"X@P-B &4 +!C(50A1)     %w2D&gO %w2F&gO %x2H&gO 
%x2J&g
O
 

%y2L&g

O

 %x2N&gO %y2P&gOAA

A
AAA4$#" %w2D&gO %w2F&gO %w2H&gO 
%z2J&g
O
 

%z2L&g

O

 %{2N&gO %x2P&gOAA

A
AAA4$#) %w2D&gO %w2F&gO %w2H&gO 
%{2J&g
O
 

%|2L&g

O

 %z2N&gO %w2P&gOAA

A
AAA5$!{#$.&P}4&G$A&-\W4&54%|4%}4&@@&@@&@@&@@&@@&@@&@@& %w D& %w D& %w D&@@&@@&:& $3$&+"1 %} &2D&+" $ D& %~ &3D&+" %~ &3D&+"# % &3D&+"/+"

 $.& D& $.& D& : Z& h& Dh&2z&="!: Z& &. %w F&1:9" $.D&+"

 $.& D& $.& D& : Z& h& Dh&2z&="' $.& D& & Z& %w Dh&3:&9", $.D&+"

 & D&+"

+&4D">+D&0X@P,A"!A4$.& D&3&.& 3Z&+&3:&9"7 &0X@P,g""=b&&+">(2O) &5D"H $.& D& &.&4 Z& %w2Dh&+"F2z&="B $ D& & %} F&  &X@P, "!A $.& D& &.&  Z&  &3:&9"M  &4D"V  &X@P, "!A : Z& &1:9"S  &4D"c  &0X@P, "!A $.& D&	 &.&  Z&  &3:&	9"\   &0X@P, ""bb& +"c(I)   %w2D&+"q %w3D&+"h % D&+"q"$3D&
&4&-\U<4&4&4&&$3D&+#&$.D&+#&& D&5 & D&5 %w2D&+# $A&

X@#-"#b\+#(' FILE DOES NOT EXIST'/)"$2D&
4&4&4&4

&4&4&+%s $2D&+#%-\P}4& $2D&+#)-\W4&54%|4%}4&-\Yw &X@#*+%s &

X@#- "#.b +$)('-THIS ANSWER DEFINES WHERE THE PROGRAM IS TO FIND THE INPUT DATA.  IT'/' USUALLY CONSISTS OF A DEVICE, POSSIBLY A FILENAME WITH OR WITHOUT AN'/' EXTENSION, AND A PROJECT-PROGRAMMER NUMBER.'//' POSSIBLE DEVICES ARE:'//6X,'DEVICES',3X, 'DESCRIPTION'/6X,7('-'),3X,11('-')/6X,'TTY:',6X,'TERMINAL'/ 6X,'DSK:',6X,'DISK (FILENAME AND EXTENSION, PROJECT-PROGRAMMER NUMBER'/22X,'MAY BE USED)'/6X,'CDR:',6X,'CARD READER  (THIS DEVICE IS NOT APPLICABLE ON TERMINAL'/30X,'JOBS)'/6X,'DTA#:',5X, 'DECTAPE UNIT (USER''S DECTAPE SHOULD ALREADY BE MOUNTED)'/6X, 'MTA#:',5X,'MAGTAPE UNIT (USER''S MAGTAPE SHOULD ALREADY BE MOUNTED'/30X,'AND POSITIONED)'///' DEFAULTS:'//' (1)  IF NO INPUT DEVICE IS SPECIFIED BUT A FILENAME IS GIVEN, THE'/6X,'DEFAULT DEVICE WILL BE DSK:'//' (2)  IF A DEVICE WHICH REQUIRES A FILENAME AND EXTENSION IS SPECIFIED,'/6X,'BUT NO FILENAME IS GIVEN, THE DEFAULT NAME WILL BE INPUT.DAT'//' (3)  IF NO RESPONSE IS GIVEN, I.E. A CARRIAGE RETURN <CR> IS ENTERED,'/6X,'THE DEFAULT DEVICE IS TTY: ON JOBS RUN FROM TERMINALS; AND'/28X,'CDR: ON BATCH JOBS'//' (4)  IF DSK: IS SPECIFIED AS THE INPUT DEVICE AND NO PROJECT-PROGRAMMER'/6X,'NUMBER IS GIVEN, THE USER''S PROJECT-PROGRAMMER NUMBER WILL BE'/6X,'ASSUMED.'///)     &

X@$* "$,b&& +$j(' EXAMPLES:    DATA.DAT'/14X,'TEST.DAT',A1,'420,420',A1/ 14X,'MTA0:'/14X,'DTA2:FILE1'//' NOTE:  THE FOLLOWING RESPONSES ARE VALID AFTER THE FIRST "INPUT?"'//' (1)  SAME COMMAND.  IF THE DATA FILE TO BE USED IS THE SAME AS THE'/6X,'PRECEEDING ONE, THE USER MAY SIMPLY ENTER "SAME"'//' (2)  FINISH COMMAND.  THE USER MUST ENTER "FINISH" TO EXIT FROM THE'/6X,'PROGRAM.  THIS ENSURES THAT OUTPUT ASSIGNED TO LPT: WILL BE'/6X,'PRINTED.  FAILURE TO USE THE "FINISH" COMMAND MAY RESULT IN'/6X,'LOSING THE ENTIRE OUTPUT FILE.'//' (3)  A ^Z (CONTROL Z) WILL RESULT IN THE SAME ACTION AS THE "FINISH"'/6X,'COMMAND.'///)-\P}4&

6$.&7+$m4!+4!3 &

X@$p "$qb +%l('-THE ANSWER DEFINES WHERE THE OUTPUT FROM THE PROGRAM IS TO BE PLACED.'/' IT USUALLY CONSISTS OF A DEVICE AND POSSIBLY A FILENAME WITH OR WITH-'/' OUT AN EXTENSION.'//' POSSIBLE DEVICES ARE:'//6X,'DEVICE',3X,'DESCRIPTION'/6X,6('-'),3X, 11('-')/6X,'TTY:',5X,'TERMINAL'/6X,'DSK:',5X,'DISK (FILENAME AND EXTENSION MAY BE USED)'/6X,'LPT:',5X,'LINEPRINTER  (MULTIPLE COPIES MAY BE REQUESTED BY USE OF'/29X,'THE "/COPIES" COMMAND)'/ 6X,'DTA#:',4X,'DECTAPE UNIT (USER''S DECTAPE SHOULD ALREADY BE MOUNTED;'/29X,'FILENAME AND EXTENSION MAY BE USED.)'/ 6X,'MTA#:',4X,'MAGTAPE UNIT (USER''S MAGTAPE SHOULD ALREADY BE MOUNTED'/29X,'AND POSITIONED)'///' DEFAULTS:'//' (1)  IF NO OUTPUT DEVICE IS SPECIFIED BUT A FILENAME IS GIVEN, THE'/6X, 'DEFAULT DEVICE WILL BE DSK:'//' (2)  IF A DEVICE WHICH REQUIRES A FILENAME AND EXTENSION IS SPECIFIED,'/6X,'BUT NO FILENAME IS GIVEN, THE DEFAULT NAME WILL BE OUTPT.DAT'//' (3)  IF NO RESPONSE IS GIVEN, I.E. A CARRIAGE RETURN <CR> IS ENTERED,'/6X,'THE DEFAULT DEVICE IS TTY: ON JOBS RUN FROM TERMINALS; AND'/28X,'LPT: ON BATCH JOBS'//' (4)  IF LPT: IS LISTED AS THE OUTPUT DEVICE, THE NUMBER OF COPIES WILL'/6X,'DEFAULT TO 1.'/// ' EXAMPLES:    LPT:/2'/14X,'RPT.DAT'/14X,'DTA0:NAME.DAT'///)    +$j+%s4 Z&	 \&
  &
,!p,!p,!p,!p,!p,!p+!+ &	 &
\ &,Ap,Ap,Ap-|p     H    S    I    N    F    E    M    A    P    L    .    :    [    /    DSK  TTY  CDR  LPT  DTA0 DTA9 OUTAAA.AAADSK  INPUTOUTPT.DAT [    ]     +w5D&8 ,# D+x +x D,# $A+t5D&; ,$ D+x $A+t &2F+&? ,$ D+x $.+t6b0b7+&A4&D4&L4&K4&S ,"X@&E "&Fb +&K(' INPUT? (TYPE HELP IF NEEDED)--',$)    ,# D+y+&T ,"X@&N "&Ob +&S(' OUTPUT? (TYPE HELP IF NEEDED)--',$)   ,# D+y ,"X@&W "&Y  (hX@P-B ,4 +&Z(50A1)     +\2D,gO +\2F,gO +]2H,gO 
+]2J,g
O
 

+^2L,g

O

 +]2N,gO +^2P,gOAA

A
AAA4$(h +\2D,gO +\2F,gO +\2H,gO 
+_2J,g
O
 

+_2L,g

O

 +`2N,gO +]2P,gOAA

A
AAA4$(o +`2D,gO +^2F,gO +]2H,gO 
+a2J,g
O
 

+^2L,g

O

 +a2N,gO +b2P,gOAA

A
AAA5$'++Z +\2D,gO +\2F,gO +\2H,gO 
+b2J,g
O
 

+c2L,g

O

 +_2N,gO +\2P,gOAA

A
AAA5$'% $.+t6b0b7+'#4)4*Y@@+y-\P}4+y,$A+t+&3FgO+(3H+zgOG4&'/-\W4,!4+c4+d4,)@@+z@@,%@@+z@@+{@@+{@@+|@@+|@@+}(+\+D+u++\D+u+\+D+x@@+}@@+~:+}$3$+}+'[++d+}2D,+'<+$+D+~+e+}3D,+'B)+e++}3D,+'N++f+}3D,+'Z+'7T$.+} D+{ $.+} D+o : Z+~ h, Dh,2z+o='F!: Z+~ +}. +\ F,1:9'I $.D+}+'7 $.+} D+{ $.+} D+p : Z+~ h+~ Dh,2z+p='R $.+} D+p +} Z+~ +\ Dh,3:+p9'V $.D+}+'7 +} D+|+'7 +{4D'i  ,X@P, "&Y $.+{ D+q &.+{  Z+~  ,3:+q9'a   ,X@P, "'hb+|+} +'i(2O)  +~5D'r $.+{ D+q &.+{  Z+~ +\2Dh,+'q2z+q='m $ D+~ +~ +d F,  +uX@P, "&Y $.+{ D+r &.+{  Z+~  ,3:+r9'w  +{4D(  +xX@P, "&Y : Z+~ ,1:9'~  +|4D(  ,X@P, "&Y $.+| D+r &.+|  Z+~  ,3:+r9(   ,X@P, "(
+j4+y-\U<4+y4+u4+ $3D++(5 $.D+u+(0 +u D,! +u D,!@@,%  +uX@P, "&Yb : Z, ,1:9(:  : Z, +\2Dh,+(A0z=(> +k ,2D,gO +^2H,gO 
+l2J,g
O
AA5$(J $ D,% +\2D+u+(R $A+t5D(N +l D+u $A+t &2F+(Q +m D+u +m D+u $A+t &3F+(a-\U<4+y4+u4+4+|4+} +4D(a ,"X@(Z "([b +(^(' FILE DOES NOT EXIST'/)"$2D,%+(`-\Yw+&?@@, $2D,%+(d $? D,-\Q
4+y4,4+z4

+u4+|4+}+(% $2D+z+(j-\P}4+ $2D+z+(n-\W4,!4+c4+d4,)-\Yw $3D+y+) $A+t5D(s +yX@(s+) $2d,)+) $3D,+(x-\T4
+j4,) $ D, $3D+y+) $ D+y-\P}4,)@@, $2D,%+) $? D,-\Q
4,)4,4,4
+n4+k4+k+$A+t+D,,$3D,+)+u D,& +u D,&+) +u D,' +u D,' +x D,$ $ D+w++Z ,)X@) ,) D+y+) ,"X@) ")b +*('-THIS ANSWER DEFINES WHERE THE PROGRAM IS TO FIND THE INPUT DATA.  IT'/' USUALLY CONSISTS OF A DEVICE, POSSIBLY A FILENAME WITH OR WITHOUT AN'/' EXTENSION, AND A PROJECT-PROGRAMMER NUMBER.'//' POSSIBLE DEVICES ARE:'//6X,'DEVICES',3X, 'DESCRIPTION'/6X,7('-'),3X,11('-')/6X,'TTY:',6X,'TERMINAL'/ 6X,'DSK:',6X,'DISK (FILENAME AND EXTENSION, PROJECT-PROGRAMMER NUMBER'/22X,'MAY BE USED)'/6X,'CDR:',6X,'CARD READER  (THIS DEVICE IS NOT APPLICABLE ON TERMINAL'/30X,'JOBS)'/6X,'DTA#:',5X, 'DECTAPE UNIT (USER''S DECTAPE SHOULD ALREADY BE MOUNTED)'/6X, 'MTA#:',5X,'MAGTAPE UNIT (USER''S MAGTAPE SHOULD ALREADY BE MOUNTED'/30X,'AND POSITIONED)'///' DEFAULTS:'//' (1)  IF NO INPUT DEVICE IS SPECIFIED BUT A FILENAME IS GIVEN, THE'/6X,'DEFAULT DEVICE WILL BE DSK:'//' (2)  IF A DEVICE WHICH REQUIRES A FILENAME AND EXTENSION IS SPECIFIED,'/6X,'BUT NO FILENAME IS GIVEN, THE DEFAULT NAME WILL BE INPUT.DAT'//' (3)  IF NO RESPONSE IS GIVEN, I.E. A CARRIAGE RETURN <CR> IS ENTERED,'/6X,'THE DEFAULT DEVICE IS TTY: ON JOBS RUN FROM TERMINALS; AND'/28X,'CDR: ON BATCH JOBS'//' (4)  IF DSK: IS SPECIFIED AS THE INPUT DEVICE AND NO PROJECT-PROGRAMMER'/6X,'NUMBER IS GIVEN, THE USER''S PROJECT-PROGRAMMER NUMBER WILL BE'/6X,'ASSUMED.'///)     ,"X@* "*b+v+w +*S(' EXAMPLES:    DATA.DAT'/14X,'TEST.DAT',A1,'420,420',A1/ 14X,'MTA0:'/14X,'DTA2:FILE1'//' NOTE:  THE FOLLOWING RESPONSES ARE VALID AFTER THE FIRST "INPUT?"'//' (1)  SAME COMMAND.  IF THE DATA FILE TO BE USED IS THE SAME AS THE'/6X,'PRECEEDING ONE, THE USER MAY SIMPLY ENTER "SAME"'//' (2)  FINISH COMMAND.  THE USER MUST ENTER "FINISH" TO EXIT FROM THE'/6X,'PROGRAM.  THIS ENSURES THAT OUTPUT ASSIGNED TO LPT: WILL BE'/6X,'PRINTED.  FAILURE TO USE THE "FINISH" COMMAND MAY RESULT IN'/6X,'LOSING THE ENTIRE OUTPUT FILE.'//' (3)  A ^Z (CONTROL Z) WILL RESULT IN THE SAME ACTION AS THE "FINISH"'/6X,'COMMAND.'///)-\P}4," $.+t6b0b7+*V4&D4&L4&D4&L ,"X@*Z "*[b ++V('-THE ANSWER DEFINES WHERE THE OUTPUT FROM THE PROGRAM IS TO BE PLACED.'/' IT USUALLY CONSISTS OF A DEVICE AND POSSIBLY A FILENAME WITH OR WITH-'/' OUT AN EXTENSION.'//' POSSIBLE DEVICES ARE:'//6X,'DEVICE',3X,'DESCRIPTION'/6X,6('-'),3X, 11('-')/6X,'TTY:',5X,'TERMINAL'/6X,'DSK:',5X,'DISK (FILENAME AND EXTENSION MAY BE USED)'/6X,'LPT:',5X,'LINEPRINTER  (MULTIPLE COPIES MAY BE REQUESTED BY USE OF'/29X,'THE "/COPIES" COMMAND)'/ 6X,'DTA#:',4X,'DECTAPE UNIT (USER''S DECTAPE SHOULD ALREADY BE MOUNTED;'/29X,'FILENAME AND EXTENSION MAY BE USED.)'/ 6X,'MTA#:',4X,'MAGTAPE UNIT (USER''S MAGTAPE SHOULD ALREADY BE MOUNTED'/29X,'AND POSITIONED)'///' DEFAULTS:'//' (1)  IF NO OUTPUT DEVICE IS SPECIFIED BUT A FILENAME IS GIVEN, THE'/6X, 'DEFAULT DEVICE WILL BE DSK:'//' (2)  IF A DEVICE WHICH REQUIRES A FILENAME AND EXTENSION IS SPECIFIED,'/6X,'BUT NO FILENAME IS GIVEN, THE DEFAULT NAME WILL BE OUTPT.DAT'//' (3)  IF NO RESPONSE IS GIVEN, I.E. A CARRIAGE RETURN <CR> IS ENTERED,'/6X,'THE DEFAULT DEVICE IS TTY: ON JOBS RUN FROM TERMINALS; AND'/28X,'LPT: ON BATCH JOBS'//' (4)  IF LPT: IS LISTED AS THE OUTPUT DEVICE, THE NUMBER OF COPIES WILL'/6X,'DEFAULT TO 1.'/// ' EXAMPLES:    LPT:/2'/14X,'RPT.DAT'/14X,'DTA0:NAME.DAT'///)    +*S++Z4 Z+s \+s  +t,!p+&6 +s +s-|p     H    S    I    N    F    E    M    A    U    T    O    C    P    L    .    :    [    /    DSK  TTY  CDR  LPT  DTA0 DTA9 OUTAAA.AAADSK  K    B    INPUTOUTPT.DAT TTYDAT.TMP[    ]    @@-@@-@@- $( D-@@- -5D,.-\Yw $2D-+,2 -X@,1 ",2b +,4(' FORMAT'/)    $3$-+,9 -X@,7 ",9b --A +,=(' FORMAT: (',A1,'-TYPE ONLY)'/)    -X@,? ",CB : Z- -1:(9,@ +,D(80A1)     $3D-+,S -2D-gO -2F-gO -2H-gOAA5$,N+-

 : Z- .- - F3:-9,O $ D- $3d-+,V $$- D- : Z- -2Dh-+,[3:-9,V $ D-+-

 - -2D-+,Y $ D- -X@,a -.-  X@P, ",e : Z- -3:-9,b +,g(80A1)     : Z- -2Dh-+,j:- -2Dh-+,l>-3:-9,h $3d-+,o+-

 $.D- $.-3d-+,t $.-/-$$ D- $2d-+,| -X@,w ",CB : Z- -1:(9,x +,^ $2D-+,~-\Yw -X@, "-b +-(' ERROR IN FORMAT, TRY AGAIN.'/)   $ D-+,*+-

44Z-.\-4$-,!p,!p,p,!p,!p,!p+,*:- -\d-/,Ap-|pM".AD0}S@P--\.(@P-)BIb1-FbA@@1)41$4D1)@@1'@@1*@@1&@@1*+$( D1+ 1&4D.QX$2D1&+-M,"X@-L "-Mb@+-O('FORMAT')b$3$1&+-TW,"X@-RL"-Tb 1&1>"+-X('FORMAT:X(',A1,'-TYPEONLY)').^($3$1&+-\g,"X@-[ "-\b+-`('TYPE"HELP"FOR1EXPLANATION',/)) ,"X@-c ".b0}X@P-+.X@P-B 1@4( +: Z1+ : Z1, h1@ &$.1+2D1f+-o1:9-g6b1+0b7+-m4-y4-w4.'X1+1:9-f$3D1*+-{T:YZ1+O13Dh1@+-vR12Dh1@+.+-y3:1+9-r $ D1&+1+1X$D1, $ D1* 1+X@-1,.1#9X@P,+".): Z1+ 1@3:1+9.+.(80A1)/1:9Z1+ 12Dh1@+.:1* 12Dh1@+.	>1*3:1+9.+1*4$.31*5D. 1 D1- : Z1+ 1 .1$2D+/ 1 D1-+/3:1%9/ ,"X@/ "/b1- +/4(' ENTER SPECIFICATIONS FOR FIELDS IN THE FOLLOWING'	' FORM - A,B,C',A2,/,' WHERE:',/,'  A IS THE CARD OR RECORD',	' CONTAINING THE FIELD',/,'  B IS THE STARTING COLUMN OF THE',	' FIELD',/,'  C IS THE LAST COLUMN OF THE FIELD')    13D1-+/8 ,"X@/7 "/8b +/?('  D IS THE NUMBER OF DIGITS FOLLOWING THE DECIMAL',	' POINT',/) ,"X@/@ "/Ab +/F(' ENTER SPECIFICATIONS IN ORDER.',/)    : Z1+ .1#@@3:1$9/G@@1. $ D1$ $ D1.@@1/@@1/ $ D10 1. 1 F14@@1) $.1. D10 1%3$10+03 ,"X@/T "/Vb10 +/X(1X,I4,':',$)   ,"X@/[ "/^  0}X@P-  0nX@P-B11111212 +/(4I) :1. 114D0q $.1//10.112d1$+1 102d11+0q"$/1/.110ds+0q 112d12+0q $/11.12 1..1% D 1 1..1$2DgO &/11.122&12gOA4$0q 103D11+0 1./10.11 D1! &.1.  Z1+ 1 Dh143:1!9/y $.1./10.11 D1. 11 D10 1. 1 F14@@1/ 114D03 1/2$11+0q"$/1/.11 D13 134D0
41141241541.+0":1.O1.R1..1$+'6F14+$/11.124D134$13$13+0q-\2+41541.413,1,1..1$2D+0":1.,1.,1/F14-\2+41541.412!1.X@0%)1/.1#,DX@P,,"0)A:.Z1+4143:1.90&+0+(50A1)`1/1@1'`1.11'@1(@1(@1/$D1.1.1F1412D1/+/O@@1),"X@05"06b+0;('HOWMANYCARDSPEROBSERVATION?',$),"X@0>"/^0}X@P-0AX@P-B14103d14+0G$3D1)+.$D1),"X@0E".hb+04F103D14+0Q1./10.14D1!&.1.Z1+1Dh143:1!90L$.1./10.14D1.1.1F141.X@0V1/.1#X@P,"0):Z1+143:1.90W,"X@0["0\b+0('OK?(YESORNO)',$),"X@0c"0d0}X@P-0}X@P-B14+0e(A3)12D14+0g+1,%5D.,"X@0j"0kb+0n('STARTFROMBEGINNING')+.Q$3D1)+.S$SD1)H,"X@0rT".hbD,"X@0u"0vb+0|('SPECIFICATIONSMUSTNOTOVERLAPORBE-OUT+OFORDER',/)2>1.+/P.,"X@0"1b+1('ENDFOFFILEORNONRECOVERABLE2INPUTERROR')2+1+2U24D2:2Z2.2W29F:2W2.22ZF\2XD2-\2+424242Z$.2\2[D2+24\Z2[\22,!p,!p,+p,!p+1m[2X2\+2,Ap-|pA 455$4,@@425D26}$tSD26@@27U26&26D27275D2!	275D2!$3D26+2!+2%$D27:2424.242728F$2D26+2'+2/26$27/D26"`26326&$AD26+2+2/4DZ22D\23D23, p,!p,!p+2g22E23\-25/4,Ap-|p0O1A24$53 540D5g6O7 580&9g-\Yw42B+2@4AZ2B\2C+2=2B?2C-|p@@3 $22$3gO 30fgOG4$3!$

 5A0$gO!&`2&5CgOA4$5

 5C5D D5E 5E D5C!$ D5F!$D5F 5E D5F 5C5D5F D5C 5CD5E 5E3D5F+5+5!$5E D5B 5A4d5!$5E D5B+57!$ D5G@@5G!$@5D D5F 5D D5H 5C D5H"5>5F5D D5I 5C5F D5I 5H5H D5J 5I5I D5F 5A4$5"5>D5J"`5J"5>D5F"`5F!$D5F"5?D5G 5GD5G 5G5H 5F5I D5E 5I D5H 5E D5I 5G5H 5F5I D5E 5I D5H 5E D5I 5J D5E 5F D5J 5I5I D5F 5A4d5."5>D5F"`5F 5F3D5J+51 5E2D5F+5 5F D5B+57!$ D5B+57!$ D5B+57@@5B+57+5;4 Z5@ \5@  5A,!p,!p+4\ 5@ 5@\ 5B,Ap,Ap-|pyD& 0 RGW!+5U45K  7-Q * 72 Z73 \73  73,!p $A741DgO !87-X8*8 73 73-|p+5^45U  74Q * 79 Z7: \7:  7:,!p-\5K47;J!874X8*8 7: 7:-|p 7A D7C 7A4D6Y $3D7@+5a 7A D7C $t2$7A+5e $t D7A $/7@ 7@7 .&((. D7D $/7A 7A7 .&((. D7D 7A5D5p "5pb +5u(' % FISHER: ZERO DEGREES OF FREEDOM WITHIN')-\T$47A @7B-\T$47@7A7B @7E!$7E!& F7E-\5K47@4 6-\5K47A4 6 7E7E D7F 7E7E D7F+6-\RS47E @7F 7ED7F D7F"7(D7F"`7F+6-\5K47A4 6 7E7E D7B-\RS47B @7F 7FD7E7E D7F+6-\RS47E @7F 7) D7G 7E7G7F D7F 7GD-\R847F @7F 7ED7E D7G $.7D2d7A+6@-\5U47@4 6+ $.7D  Z7G"$. D7B-\T$47B @7B-\T$47D7B 7F7E @7F"$. D7B-\T$47B 7F7GF7F.:3z7A+6+6@@@7H"$.7A` @7B-\SZ47E7B@3 7)+65"$.7A7 .$( 7E 
,S H7H-\T$47D 7F7H @7B-\T$47A7B @7F 7F7H"7(7E"7(7H 
7E
7E D7F 7E7E D7G!$D7E"$.7A D7D $.7D2d7@+6U $.7D  Z7H 7D. D7G"$. D7B-\T$47B 7F7G @7B-\T$47G7B @7F-\T$47G 7E7FD7F"`7F.:3z7@+6H!$7F D7C 7C5$6X@@7C+6Z!$ D7C 7C D7A $t3$7A+6]+7# 7A5$6_ "6_b +6c(' % FISHER: NEGATIVE F-VALUE')    -\RS47A @7B-\7d47B @"@7I`7A!$z!&7I7C D7C+7#@@7I 7@ D7J 7A D7J 7A D7K!$3d7K+6v $ D7I 7J D7K 7J D7J 7K D7J!$D7K $$7J D7B-\T$47B!& F7L $$7J D7B-\T$47B!& F7L"7(7L 7K 
7*,Rk!&7LWD7B-\T.47B@7E7K7*,Rn7L7LD7B-\RS47B7EF7E$3d7J+7-\T$47J@7B7B7E7+$7ED7E7+7E7,7E7,7E7-7E$D7E!$7ED7C$2D7I+7"7(D7C"`7C+7#47;Q*7?Z7?\7@7@,!p,!p,!p+5J!27;X2*277?77@\7A,Ap,Ap,Ap77C-|p70t/L7m 7t7t7n 7t7n 7t7t7o D7u 7sD"D7s-\S<47s7o @7u 7u7u D7t 7s4d7d"7pD7t"`7t+7h4 D7p F7q Z7q \7r  7r,!p+7M 7p 7q 7q 7r\ 7s,Ap 7t-|p]S=t80&vh|9 <@;b =w* 5$3,yD 0 8787 D89!$89 D8:-\Sa48: @88-\RS488 @8: 8.8:8.8:8/ D8; 8/8:808:808:$ D8; 8;8;8:"D8< 8<8< D8<!$8<8<D D8=!$ 8<$8<$@8<81 D8=!$@8<$8<$8<$	p8<81 D8>!$8<$B8<828<$p8<828<83 D8>!$X8<$)8<$h8<838<848<848<85 D8?`88!$ D8; 8;8?8>8;8>8;8=8;8=8;8< D89+8+4 D85 Z86 \86  87,!p,!p+7v 85 86 86 89-|pU6 X> TqlvNvX}n 6v,c!x"8"w"]D$6@"{l"Wt#qD0$v@`9c!$`9d!& D9e`9c!$`9d!& D9f 9c9c D9f!$9f D9g-\Sa49g @9d-\RS49d @9g 9N9g9N9g9O D9h 9O9g9P9g9P9g$ D9h 9h9h D9i 9g9i D9i 9i9i D9j 9eD D9d-\RS49d9i @9j!$9j9f9Q D9k!$@9j9i9e9Q!&9e!(	09j9i 
9f
 9eF F9d-\RS49d @9k!$	9j9j$	 9e9f9R!&J9e!(@9j(`9j( 
9f

9fD9l!$ 9j9j$	p9i 9e9R!(
9f
9S9S!(	9j(9j9T9i 
9f

 9eF F9d-\RS49d @9l 9jD"9T9j&19j&@ 9e 
9f
9U$J9j$j9j$p 
9f

9f9U9V!&	@9j9V9j9W9j&  
9f


9f D9m!$`9j9j$`9j$R9i 9e9e9W 9X9j9X9j9Y9j9Y9i 
9e

9f9Z 9Z9e!*n
9j
9[
9j
9[
9j
9\
9i 

9f





9\ 9]9j9]9j9^9j9^9i 
9f

9f
 9eF F9d-\RS49d @9m 9j9k9k9l9l9m9m D9n 9nD D9n-\S<49n @9e+9J4  9_Q * 9a Z9b \9b  9b,!p,!p,!p+8?!.9_X.*. 9b 9b 9e-|pU6 X> Tqlu7	IX}n 6v,c x!8!~"~#@$R~].!9#sX$6%8u0"P"Z$#u"Y#TC`#}8p$2%r:@&Tah#1M@$4T[nU'qBC`#)$8$vB%2By` $3D:9gO :91FgOA4$:$ $2d::+:& $22$::gO &3f::gOG4$:' :92D;T+9} ::3D;U+: $3D;U+:

 $ D;U-\T4
:24:3-\Q
4:34:44:<4
:44:64:6 $< DP.O@P.@$:p42  $y DP.O@P.@$;"42 -\R(4:74:: @:< $<$:9 :<. F:= := DP.O@P.@$:>42  $<3$::+: :: :> D:9+:! :: :p D:= $2D:9+: :: ;" D:=":= :::>$p D:>-\T$4:: :>:= D:9 :9 D;T :: D;U@@:;+:( $ D:;+:( $ D:;+:( $ D:;+:.4 Z:7 \:8  :8,!p,!p,!p,!p,!p+9o :7 :8\ :;,Ap/ ,Ap/ ,Ap-|pDSK  2STUDR.DAT < $3D<JgO <J1FgOA4$<7 $2d<K+<8 $22$<KgO &3f<KgOG4$<:@@<O $2D<J+;d $ D<O <N3D<K+;x $3D<O+;m $ D<O-\T4
<D4<E-\Q
4<E4<E4<P4
<F4<G4<H :

 Z<P <K2$h=+;q0z=;n $.<P D<Q <P DP.O@P.@ : Z<Q <U1:#9;u @@<R <K <P3D=+< $# D<R $.<P DP.O@P.@ :# Z<Q <U1:F9;~  : Z<R <K2$h=(+<0z=< <R D<S@@<S <K <R3D=(+<
 $.<R D<S <R3D<S+< <R"=( <S. =( D<L-\T$4<L <K/=( @<M`<M @<S <O.<R"<U <O.<S <U<S<U D<T <O.<R <R." <U 
<S.
(<U<S <U D<T@@<S $<2d<KgO <K <P/ =1FgOA5$<%`<K @<L`<K p<L @<S $<3d<KgO <K <P/ =1FgOA5$<2 <P"= <Q. = D<L-\T$4<L <K/= @<M`<M @<S"<T<T<S<T D<J <K D<U <K D<N@@<L+<; $ D<L $ D<L+<; $ D<L+<@4 Z<H \<I  <I,!p,!p,!p,!p,!p+;V <H <I\ <L,Ap/ ,Ap-|pDSK  $DUNCAN.DAT		


<		


#(-2-\=e4=B@@=F =U3d=F+=> =F D=U+=@4 Z=B \=C+=: =B =C-|pO
,l 
.
  Ap
,d 
.-|p
;p-|p	`+=i(' PLTL')+=k(' PLTT')-\?`4>4>!>>!5D=n+>>$2D>!+=q>"=hb">>=D>!>>D>">$$>D>":>Z>#>XD=w>Z>-\U4=w4>4>#>3d>#gO>>#1&gOA4$>-\Ed4>#4>!4>"4>4>!$@D>$!$" 0!PdT=8) 	pd[p@pd~5D>=[pd~5D?

 p080x+?

0X1X
">'7 
">%#",-6>0X1X
">'-|p[pd~5D?

 p080x+?

0X1X
">'[pd~5D?

 p4r?

7 
">%#`5H>I
">%0X1X
">'-|p[pd~5D?

 p44?

3(Fr:)Hr2FS*)H)?3(>(1T?3(>(1T?3(?1T?3(?1T?3(?1T?3(?1T?1T?3(?>3(>(>4P>a3(>(+>a>(:  (Frd"~/&M(B &$6@h$Xh&6H? (Hrd$~/(M(D .>)d -6>4T>q2,+>q
">& -6>~4t>q
">%=>p5P>t0X1X
">'-|p
">&7`
">%#d@

-6>0X1X
">'-|p>(>3(?+>y+>Q>(:2(>(+>|+>QlZ(>)&".$0$0d+?

,(a@+?0B+>75B>,H:0l "
"a@+?2,@?`+X`h+?+X
&?0X1X
">'-|p%B\5<c\k|Sc=tt|-1!yZ8]" P1:#SD4=8)$85Lf3@9Lf3(RPd@0******@=F4D?-\=>-\=e4?*-\=e4?*-\C<4?&@=I4D?-\Ay4=I4=F-\=>+?"@@=T@=F@D=U+?$4@Z?&@\?'+?@?&@?'-|p+?14@Z?3@\?3+?/@?3@?3-|p@?E@D?I@:@Z?J@Z?H-\U4?G4?H4?J@Z?H-\U4?I4?H4?J1:9?6-\T4?I4?H+?B4@Z?F@\?F@y?G,!p,!p+?5@?F@?F\y?H,Ap,Ap-|p@N-\@?X@D=Z@?Y@D=[@?X?Y@D=[@?Y?Z@D=\@@=E+?U4@Z?W=\?W@>?X,!p,!p,!p,!p+?K,?W ?W-|p-\E4?h4?j?jD?i$2D?j+?`?$@D?i+?d4Z?g\?g?h,!p,!p+?[*?g?g\?i,Ap,Ap-|p!$+@[(1X,I4,1X,I4)  +@^(1X,I4,1X,I4,'^')    $2$AgO A0fgOG5$@c+@} A5D@e+@} $3DA+@n $3DA+@k "@[bAA +@} "@YbAA +@}`A @A`A @A $3DA+@u $3DA+@w-\Al4A4A+@}-\AO4A4A+@}-\A^4A4A+@}4 Z@ \@  A,!p,!p,!p,!p+@Y @ @-|p-\Ay4=I4=F-\=>+A4 ZA
 \A
+A A
 A
-|p =F4DA $.D=T+A4 ZA \A+A

 A A-|p A% D=X A& D=Y A%.A& D=Y A&.A' D=Z@@=E+A"4 ZA$ \A$  A%,!p,!p,!p,!p+A A$ A$-|p+A/(' NAME OF THE FILE TO BE'/  ' WRITTEN (5 CHARACTERS OR LESS) - '$)   +A0(1A5) AD4$A84DA< AB2DAF+A7 "A(b  "A/B~AF O@AF+A@"$ DAE-\B(4AF4AB4AB4AE AB DAF@@AF+A@4 ZAC \AC  AD,!p+A( AC AC-|p          -\Io $2D=F+AK $3D=U+AK+AM-\Ia-\IO4=T4=U-\J&4AV4AX4AX+AS4 ZAV \AW  AW,!p,!p+AG AV AW\ AX,Ap,Ap-|p-\Io $3D=F+A\-\Iz-\J&4Ae4Ag4Ag+Ab4 ZAe \Af  Af,!p,!p+AY Ae Af\ Ag,Ap,Ap-|p-\Io-\Ia-\J&4Ar4At4Au+Ao4 ZAs \As  At,!p,!p+Ah As As\ Au,Ap,Ap-|p-\Ia-\I4B4B@@=E+A|4 ZA \B  B,!p,!p+Av A B\ B,Ap,Ap-|p B53DB3+B-\Q4B/4B3 B3 DB5 $ DB6 =Z DBu =[ DBv =[ DBv =\ DBw`=X @Bw`=Y @Bx`=Y @Bx`=Z @By`

$Bu4?  B44$B B3( B4. B4("*.
$ 
B6 F(B6:B6 $?3$B6+B+B, $ DB6`

 B64? +B, B6"B0 FB6`

 B64? 

-\P}4B/ B0 DB5 $ DB6 B3 DC4-\Ux4B14C4+B,4 ZB1 \B2  B2,!p,!p,!p,!p+B B1 B2\ B4/ ,Ap-|p

n5J     6                =D4dC; =D$CB&$ DCC : ZCD-\=e4C@3:CC9C9+C?4 ZCA \CA  CB,!p+C5 CA CA-|p+CG(' TERMINAL TYPE - '$)   +CL(' TERMINAL TYPES USED ARE:'//1X,14A5//)+CM(10A1)    +CP(' MODEL NUMBER - '$)    +CQ(4A1)+CV(' ARE YOU USING THE HP PLOTTER ? '$)   +CW(3A1)+C[(' BAUD RATE (110 OR 300) - '$)    +C\(I)  +C](1A4) E4$Ds@@E-\UA4
E
4E E5DCvO@E-\??4
E4E

-\Q4E

4
EJZ4E4E-\U'4E-\TP4

E@EEE

E ?(4$?.4 -\P}4E

-\?/E3DE2FE+Cv@E2DE+Cv+E2DE+Cv E2DE+CvO@E+Ds@@EO@E+"CDbD "CLB~$E!4ED?(?(X@P,"CVE!E"E"1:9ZEL?(3DhE+D1:9DLE4$D@"CGb$E4D@@E+Cw "CQb -\JO4E $.E7D.$( DE E E DE7E.D?((E D?)"$.E DEED?) $D=D+Dd$3DE+D $3DE+DD+DC $ D=D-\I<4E4E-\I+4E-\I44E $3DE+DV $

 D?* $ D?* $ D?+ $ D?, $ D?+ $ D?, $ D?- $ D?- $| D=Z $| DE $r D=F $ D=I E D?. E D?.O@E-\??4
E4E

-\Q4E

4
EE4$Dl-\JZ4E4E-\U'4E-\TP4

E`EEE

E ?(4$?.4 -\P}4E

-\?/ ?( DE ?) DE+E $ DE E E DE E D?( E D?) E E D?) "CWb  "C[B~E  E&$ (. HE-\I+4E+Dd+E4 ZE \E  E,!p,!p+CD E E\ E,Ap,Ap-|pTRMNL.DAT DSK33TRMNL     !ZsL"yLf!kB!X7TTY  HP   TEK  4010 TEK  4002 TI   700  -\J4Es-\?`4Et4Et $$$$$$$$$$$ Eo&"$. DEu Eu5$E1 $?.DEu Eu5DE3+Ei Eu Ez DEu Eu5DE6+Ei : ZEv Eu. Ez DEv Ev5DE;1:9E6+Ei"$/Eu.Ev DEw $ DEw Eu.Ew DEm Eu ZEv hF5$EC $ DEw+Eb!$@ DEx Ev $FXDEF-\T$4EFEp @Ex Ev $FXDEJ-\T$4EJEp @Ey-\S~4EqEx @Eq`EoEq @Er-\T4EqEyExEr"@Er@Er @Ey-\T4EqExEx @Eq`EpEq @Er-\S~4EqEyEr @Er@Er @Ez $2DEw+E_-\@y4Ey4Ez4Et4El@@Ew+Eb-\@y4Ey4Ez4Et4El Ev.:3zEm+E@+Ei4 ZEm \En  En,!p,!p,!p,!p,!p+E& Em En\ Eq,Ap-|p#%(+38>@EGLQW]agmqx~	#*17=CIMSV[_ejpw}
!%-

















}





































@@I( $2D=U+Hb $ DI( $2D=F+He $ DI( AF5$Hh-\B(4AF4I'4I&4I( I' D=U I& D=T-\TM4I&4I$ $ . DI) I&7 .$(} DI'-\TM4I'4I$ &. FI)-\TM4I'4I$ $0. DI* I'7 .$(} DI'-\TM4I'4I$ &. FI* $3D?)+H $2D=F+H-\=e4I$ I*2D=V+I I*2D=V+I I)3D=W+I

+I I* D=V-\=e4I* I* D=V-\=e4I* I)3D=W+I I) D=W-\=e4I)+I I)2D=W+I $3D=F+I $3D=U+I I+4DI+I I) D=W-\=e4I) $2D=F+I $3D?)+I-\=e4I)+I $3D=U+I $ DI++I@@I+@@=U+I!4 ZI% \I%  I&,!p,!p+H_ I% I%\ I',Ap,Ap-|p,IE " BIGZp BIH II	b'-|p-|p,IE " BIGZph+I.,IE "+I2,IE "
 BIG II	b'@ Cp-|p,IE "+I7,IE " BIGZp BIH II	b'+  "	 BIGZp BIH II	b'+ -|p	b

	b&,~ BIH,~IG"$.=F5DIM-\LJ4IW4IW+IN-\I4IW4IW+IR4 ZIU \IV  IV,!p,!p+II IU IV\ IW,Ap,Ap-|p $3D=F+I^-\=e4Id : ZIgO@h=U1:9I\ $ D=F-\=e4Ie $ D=U+Ic4 ZIe \If+IX Ie If-|p =E5DIn-\L}4=T4=U4=\4=] =\ D=] =] D=^ $ D=E+Iq4 ZIr \Is+Ih Ir Is-|p-\=e4I~ : ZJO@h=U1:9Iv-\=e4?+ $ D=F+I|4 ZI~ \I+It I~ I-|p@@J	+J4 ZJ \J  J,!p+J J J\ J	,Ap-|p J. DJ0 J. DJ0 J-4DJ =] DJ/ =^ DJ/-\K@4J/4J1 $3D=E+J$ J12D=]gO J12F=\gOA4$J  =F DJ3-\Ia-\Kb4J14J1 J3 D=F+J -\Ku4J04J0 $3D=E+J$ J0 DJ2 J0 DJ2-\Kb4J24J2 J2 D=\ J2 D=] J. D=] J. D=^+J*4 ZJ, \J,  J-,!p,!p,!p+J
 J, J,-|p+J5(A3) +J9('0***PLEASE ANSWER YES OR NO!***'/)    +J;(1X,'?',$)@@JYO@JX "J4B~JZ  JU2DJZgO JU2FJZgOG4$JM JV2DJZgO JV2FJZgOG4$JN JY5dJO:JY "J5b  "J9b +J< $ DJX+JR@@JX+JR4 ZJW \JW  JX,!p+J4 JW JW\ JX,Ap-|pY    YES  N    NO   	b
[CpZCp-|p KG/+DKI KG2+DKI KG3+DKJ KG  DKJ KI2$=Z+Jf KJ2$=Z+Jj+K?KI3d=[+Jj/KJ3d=[+Jj+K?2KI2$=[+Jm@KJ2$=[+Jq+K?+KI3d=\+Jq"KJ3d=\+Jq+K?KI2DKJ+Jx3KI+DKK-KI2DKK-\M4KI4KJ4=[4=\4KL4KL+K8+KI2DKJ+K+KI DKL3KI+DKL-\M4KI4KJ4=Z4=[4KK4KK+K8"KIKJ"DKM"KIKJDKMKI3$=Z+K\3$KL+K3 =[2dKL+K14KN DKK+K8=[5DKN+K4=\ DKN"KIKNKMKMKIDKK KN DKL5KH-KK-F4KH KL-F4KH KK-F4KH4KL"F@@=E+K@+$ D=E+KD4-ZKF-\KF4KG,p,p+J] KF KF\KH-|p =[=Z\DKj,=\=[-DKk =Y/=X`@Kk=Z/=Y`@Kl"=ZKhKkKj-\T$4=X@Ki@Ki@Kl"=[KiKlKk-\T$4=Y@Ki@Ki@Km-\IO4Kl4Km+Ke4 ZKg \Kg  Kh,!p,!p+KO Kg Kg-|p@@=E K|3$=Z+Kt K|2d=[+Kt K|3$=[+Kt K|3d=\+Ku $ D=E+Ky4 ZKz \K{  K{,!p,!p+Km Kz K{-|p =X4$LF4DLG LU/=X4DL =X DLV : ZLV LV4DL

!^l!7^G!X^' =Y/=X` @M	 =[=Z DM	"=X.M DM-\T$4MM	M	=Z @M =Z/=Y` @M
 =\=[ DM
"=Y.M DM-\T$4MM
M
=[ @M-\Ku4M4M+M4 ZM \M  M,!p,!p,!p,!p+Lk M M\ M,Ap,Ap-|p M$3$M%+M M$2dM&+M M$ DM&"M%M%5$M+M M% DM& M&2$M%+M M& DM'+M M% DM'+M M& DM& M%3dM%+M M% DM'+M 4 ZM# \M#  M$,!p,!p,!p,!p,!p,!p+M M# M#\ M',Ap,Ap-|p "Mfb -\!4O5 M++O "Mqb -\!4O5 M/+O "Mzb -\!4O5 M2+O "Nb -\!4O5 M6+O "Nb -\!4O5 M9+O "Nb -\!4O5 M=+O "N*b -\!4O5 M@+O "N4b -\!4O5 MD+O "N?b -\!4O5 MG+O "MIb +M](/,'       TTY IS THE ONLY DEVICE WHICH MAY BE USED',/,	' FOR MORE THAN ONE OF THE THREE I/O FUNCTIONS(INPUT,',/,	' OUTPUT,OR MODEL OUTPUT)AT ONE TIME. IT MAY BE USED',/,	' FOR ANY 1, 2, OR 3.',/)     "M_b +Me(' EXIT IS THE ONLY WAY TO SAVE OUTPUT OR PUNCH FILES',/)   +O+Mq(//'   TO STOP PRINTING TYPE A RIGHT ARROW'/'   TO STOP EXECUTION TYPE ''^'''//,T4,'COMMAND',T26,'ACTION'/)   +Mz(1H ,T5,'HELP',T21,'TYPES THIS LISTING',/,T5,'LOOK',T21,'INTERROGATES BLOCK OUTPUTS')+N(1H ,T5,'CONFIGURATION',T21,'ALLOWS CHANGES OR ADDITIONS TO MODEL',/,T5,'PARAMETERS',T21,'ALLOWS THE ENTRY OF PARAMETERS')   +N(1H ,T5,'FUNCTION',T21,'ALLOWS FUNCTIONS TO BE DEFINED',/T5,'PUNCH',T21,'OUTPUTS MODEL TO DESIGNATED DEVICE') +N(1H ,T5,'INTEGRATION',T21,'ALLOWS ENTRY OF INTEGRATION PARAMETERS'/,T5,'OUTPUT',T21,'DETERMINES OUPUT PARAMETERS') +N*(1H ,T5,'GOES',T21,'STARTS RUN OF MODEL'/,T5,'FILES',T21,'ALLOWS I/O DEVICES AND FILES TO BE CHANGED')   +N4(1H ,T5,'RESTART',T21,'CLEARS MODEL AND STARTS AGAIN'/,T5,'EXIT',T21,'RETURNS CONTROL TO MONITOR')  +N?(1H ,T5,'TIME',T21,'GIVES RUN AND ELAPSED TIME'/,T5,'PRINT',T21,'CAUSES OUTPUT TO BE PRINTED IN TABLES') +Nl(1X,T5,'PLOT(DEFAULT)',T21,'CAUSES OUTPUT TO BE PLOTTED',' FOR TERMINAL',/,T21,'OR LINE PRINTER'/,T5,'GRAPH',T21,'SIMILAR TO "PLOT", BUT OUTPUTS TO GRAPHICS',/,'TERMINALS AND PLOTTERS',/, T5,'RUN',T21,'DOES ALL OF THE ABOVE NECSSARY TO DO A GOES'/,T5,'INPUT',T21,'READS IN THE SPECIFIED MODEL WITHOUT ECHOING',//T5,'ALL COMMANDS MAY BE SHORTENED TO 3 CHARACTERS',/,T5,'FILE NAMES ARE FIVE CHARACTERS IN LENGTH WITH "DAT"',' AS THE EXTENSION',/) +N~(1H ,T5,'WARNING!!!  USE RELEASE AT YOUR OWN RISK',/T5,'IT CLOSES ALL FILES SO THAT AN OUTPUT FILE ON',/T5,'DSK MIGHT BE WRITTEN OVER IF THE NAME ISN''T CHANGED',///)    +O4 ZO \O+M( O O-|p O4dO-\Sa4O @O! "+O "O	b +O(/,' ATTEMPT TO TAKE LOG OF NON-POSITIVE NUMBER',/)     "+O4 DO ZO \O  O,!p,!p,!p,!p,!p,!p+O BO O O O\ O!/ ,Ap O!7`O-|p.O-}w O7O4O3 DO6-\T4O6 @O6 "+O,4 DO1 ZO1 \O2  O2,!p,!p,!p,!p,!p,!p+O" BO2 O1 O1 O2 O67`O2-|p.O2-}w Y~j-\S<4OF @OI "+O?4 ZOE \OE  OF,!p,!p,!p,!p,!p,!p+O7 BOF OE OE\ OI/ ,Ap OI7`OF-|p.OF-}w \P/ @P/<P70<0|+1\+OX,>pOIZpOI+p@hO{@pO{@(P@0P@xP@P@8P @(P@PP@PP@hO{@O`@ O`@Oz@Oz
XP(/<0"`S<pX<07p3@P8+O^*|OZ-<PDZ`OJ+Pv,&.<7@p+Osp,Ov"P9 P'.< p`P9 w,&,&5 Oe.< pdP::." Q,& p,&>`9Op.<9Of@@,^,^,^+O{d @@& 0b.".")B}5@Ow,~m<!<P\P+<P8 p[pl<0@X+PZp.</ pQ \P,+P@@P,!<P\P+7@P.+P <P. \P,@@P.!<P\P+XX\P+ P:7@P-D<7@P-A< \P+ <P+[`x P/,x,^x P/+OJ OJQ< \P+:OJ  \P,<P; pP'|P; < \P+@@P,+P@@P+ Q< \P+<P; pP'|P<+P7P= P? \P+ @PXQ< \P+ P? \P,+P[`x P/,x+P%Z \P+@@P+@@P,<P8 \P,+P7P- P-X\OJ@@P-@@P-+P
&P@U`eB+P6@)@G 
"+P2
&PD+QM6$1,>Yy.@

p.46$
@P$.

.4P,.P+SEQIN@P<SEQOUT@P>@P
%5 Source level error at user's loc	
	`Z(X^. >[.~(3~+PI	~+PTZ. \x <x*<x .->Thez+PP!"	b+  "PQ	b+Z. h+ggM?Th
&PV	b+PD,
?NO CORE AVAILABLE - CAN NOT PROCEED
!*Pz**,^,~*x,> <Pz*<P|  pZ@Pp@@Pp@@Pq Q1`|+PdPw,~ "p h a`~+Pih  ``~+Pj$Q1!PkdQ2/"+PdP,~@@@ @@0@x@@@`edX91,>Yy,>Zp @Pp\`Po <Pp,,^,~SMI 1,>Yy,P] Q3 BPp+Q_MI 1,>Yy,P] Q5 BPp+QI5R1,>Yy,P] Q6 BPp*\Q7ApX"Q7 BPp/& pd"~l" BPp*\Q/& pd"~l"$ BPp*\Q/& pd"~l"

 BPp*\QSp*\Q/&Xp BPy@@Py Q8 BPp*\Q/& pd"~l" BPpRFPo <Pp,+P[EV4i91,>Yy+Q,S,i@1,>Yy+Q,_,i@1,>Yy+Q,K>21,>Yy+Q,K>401,>Yy+Q,[<I71,>Yy
&Q8 w @)@. 
"5BQ-
&Q>,~`.

.4SEQIN^Q2SEQOUT^Q4RANDOM^Q5SEQINOUTPy
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS: 
a.3@1,>YyO@Q}+QCgR~@1,>Yy@@Q},>,>@6 w+QP"Q}0B+QK!"A`X#p5@QH/#p!"X#p+QP\p+QPa.9'1,>Yy,>,>O@Q}+QP,>
6+ _4`QX"`Q@,> <Q~,,^,> <R,
,^*bQU+Qc,> <R,,^7@Q}+Q^,> <R,
,^+Q`,> <R,
,^Z5"Qc,> <R	,
,^,7@Q},

,> <R
,,^,,>,<R
,^(@qd1@,,

1@#+Qq0@*+Qc,>R<R,,^+Qc,^,^,^,~('eTypeGtohContinue,Xto Exit,TTotrace.'/2H*,$)(A1)(1H@14A5/)(1HA5,1X,O6)PAUSESTOP.pXQypXQzpQ|pjQ|pyXQsX~QypxC61,>Yy,R,~[B1,>Yy,R,~[B1,>Yy,R@,~C61,>Yy,R`,~,>e|Pw+R 3!p p*|Ra|+R$ ph" ab~+R,^,~C6Md 1,>Yy,R0,~[&r1,>Yy,R0,~[&r1,>Yy,R0@,~C6Md1,>Yy,R0`,~,>e|Pw+R22ap p*|R2a|+R6 ph" ab~+R2,^,~CR

Ra#p+RU  ,~>attempt to take SQRT of negative argKc3@ p p+RqKc3K  ,Rq 

,~Kc3J  ,Rq ,~Kc3I  ,Rq ,~Kc3H4BS5@Rt5"S+DPV0
RsU ,~,>,># $)D/$@,>4dR~X $(F) + R~5FR~5"R|"` ,S+S#  ,> <S,Sa,^@,> <S	,S<,^5&S",^,^,^,~! ,~xxKc#@ p p+SKc#K  ,S @,~Kc#J  ,S @,~Kc#I  ,S @,~Kc#H4BS95@S5"S#+DPV0
SU ,~ DS8!$ @S7 BS85"S #`+ S5,S !"B,~+ S#(BdB+ S#5BS  S8,~ +7`S8+S,`d +DPV0S'+DPV0
S'U `d @6 S7+S" S8`B"`+S"/S:id +S.+DPV0S'#S7,> <S;,Sa,^ @`S8@,> <S;,S<,^+S)U",S S7+ S#+S! ,~xKc1,>Yy p3"SW+SA3bSW+SC+DPV0
S@U ,~+DPV0SB  ,~ DSX FSY@@SX%"j"%SV)/;`:XDSR5fSJaF+SJ.&@(|h&fSX STSU SU SXSTDSV@ SX SY,~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,>Yy p4@Sq @S`,> <Sy,Sa,^S_,~{e^bC2|p1,>Yy p5`Se4@Sq+PPV0Sz#p3@St+Ss)r. !@Sx! n@Sx(|h"St Su BSx SuSvSvSxSxSw,~+DPV0
Sr Sw,~  ,~ 0_i/X3 6P'M 5( bB W
R `@xS`ATTEMPT TO TAKE LOG OF NEGATIVE ARGG?@1,>Yy pT!T!+ +T
g&t@1,>Yy pT!+ +T
G?1,>Yy pT"+T
g&p1,>YyphBT#`3bT+T"DT"T"3bT#+T%"(D?d$"@($)BT"T 7T" T ,~k*}43"aLmLsm=i!v@!\Rw 9~j 0M2|1,>Yy p+T+S; 1,>Yy+T)SO1,>Yy p+T,M3!d`,~SAd@,~C1,>Yy#p,~S01,>Yy#p+"T3,~U ,~g&=`1,>Yy#p7!p"`,~SNL{@1,>Yy pFp4 T; p,~"p+"T=,~U ,~C6|@1,>Yy DTK p p#@+ TH#`2"TL+TITLTL7 "` TK,~ +`b +TG+DPV0
TJ@+TG&p[> 1,>Yy p&p ,~I$P1,>Yy #p D F	b&".$&$7@"$  (@. &"* Tb)@
(@ $ &$.$.&(D(F..  #p**,~.$D.&-Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-!$hX$h@@h*% "To BhL " BhM+xeX2GiSHYC aSiSHINXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@GiSHI4:1,>YyZ.@6kp2j8M+U !pQ A` U	\$}

4LU/,L8$U.
8L F(,~H?FRSDVC - ILLEGAL DEVICE NUMBER IN CALL TO DEVCHG

&U	 <U,

O$:1,>Yy U" Ap,U `,~aW$:1,>Yy,U `,~ p4dU /$&$.U.%p 'pQ&Q`,~:,
&U",^,~     
Non-positive byte number is illegal!
U>m61,>Yy	`

 Ap,~[E:1,>Yy p p<dU/ #p83  =dU- Ap,~[&u:1,>Yy p p<dU6 #p82` =dU4 Ap,~44U84UdKbN=1,>YyO@Ue p4BU@,Va4@U@9UD9UCKbN=1,>Yy@@Ue!$Lu 	`@Ap``a`+Uba`+Ud DU;A (`UI/"#BU:@@U; !pX@U7,> <U7,VD,^7@Ud+UOOAp+Uc #pQ"A` $1@+UT0`=dUQ! H: @U9@@U:a|+UZ[pd0@ +U_[pd0@ +U_+U]_w6@Ue_w#`1 +U_SpXp @U:
U:+Ua@U8+Ub+Uc
&Ue+Uc   Ap ,~ ERROR ON OPEN!
h44V&4V5X4V64V644V64V6X4V64V744V64X4V64V7444V6Id]1,>Yy !pX@Uk,> <Uj,V,^,~aJ~I51,>Yy !pX@Uo !pX@Un,> <Um+Vet21,>Yy !pX@Uq !pX@Uq,> <Up,V,^,~et91,>Yy p4BV,Va5@V!$Lu 	` DV/A (`V	/"#`XBV/ ^V5@@V( p4xV%0x+V%,`V+V%VVVVV$V$ #p1 #pXBUh,V1,V/@V&,~@@V&@@V'@@V( V&+ ,~ #pXBUh,V1,V/@V&+V+@@V(1x+V  pXBUh,>V',V1,^X@V' & 5BV" p`V8 V&+V*,~,V+V V5 ,~
&V8+V%
&V:+V%
&V=+V%RV'5@V.! H: @V'+V
&V?+V% +V),~,> <Uh,VD,^7@V5,~+V(6$V'ILLEGAL FILENAME. DEVICE NOT AVAILABLE.
RENAME ERROR!
NO SUCH FILE.
HHVCHVCG.t21,>Yy@@Ap! A`.!p @VA VA @VB@@VC@@VC & "VA<1D+VP-V[=bVKVA<0D+VXO " VB @VBVA<-V[=bVR7@VCOAp !p<, VC, VC,~<&VTVA1D+VW   Ap+VT1D+VW1$+VT1d+V`0$ 0d-+VT $DVB+V["V},W
0@+Vy p4BV|Lad+Vx`b+Vy $0d"+V|&$$&(&}Z.GV~.&$.$ 7F+Vo  ,~ A$&$(DG$1$((D(D

 	`5@V{ .2bM+Vw L.&7D!$Lu+Vz2"V~+Vt &p,W 	`,~
&V <W,

.p M}ILLEGAL DEVICE NUMBER!
"W	,W
 'Q&A` W
@1x,~180.8X=`W,~.H  a|+W0"0b/ ,~0B1B,~0B/ ,~aJMm1,>Yy,XY+W.@,X,XU+W.Z"6Ep " B` "bW6 $7cp $1B $dW7,W0,X!+W/6cp0b "bW7$Wc ({."XB`&$@6@.$.$
a|+W'[pdp0B +W++W)_w#`1"+W+6cp 0d $QD`,Wl+ ,X` ,~
&W8+W,
&W:+W,@b -p .Q,A` 
W<4PW61P+W=/0P=nW2,~`

``
CANNOT INIT DISK!

FILE NOT FOUND!
HH . 
W=+W2YC GaSa3 S;YC&<G<aS<a3&<E$;w|xWD PW? B`1T!"L	b@XB`O@W_ Xq W^@,X`
+Xi!,2,XJ@!.~,X``+Xq""1T""QBW],X`	f+ 1$9W}+XX 8WD@`WD Xs*(W\ Xt	n@`N+Xy 6`
 Xz1T Xz B` " B`\"

	b@ B`\"{	b!"Z(BrbX{	b

 BW_	b
+"`B`!"2	b`b`b+X!"2	b!`2B`+X!$2	d!$Lu+XD X|	b@X|,X}	d!$Lu BW^ DW^,~@@Wa X}*(Wh BWb DWb BX B` DXZW`(D}	d ` DWa DX "2D`bX~d  "bX~,X`@Wa+X Wh BX@@Wh Y	b$+X1!"WiX"X*"X!"`
+XD!,2,XJB,X`"X

Wb Wc,X` +XD JX,X` +XX
&Y "bX~a`+XB+X+a`+XB,X` Wa+ +XB 	x HXR	h	&(2 
PW? Y.W_ &..0P`bp+XNd

@ W^,X`+XR`L+XL W^+XX (!*Lu@

,X`
,~:x,~ " BXpO@W`O@W`g "?$Xp+Xh	d5DX\ Xp(D DW`+XX,> e`p+Xd7 W`+Xgl!W`+Xe7 W`+Xgl!W`:+@>,^+XX
&Y	,~ "
&Y,~ "
&Y,~,Xo
&Y
& ,Xo	b (Y+Xl
&Y,~@;`W_+Wp+Xj
x@WD0CMQ Cannot do MPB QUEUE on GALAXY system. (Xt+Xl`` `P$` h
|Wb

XHXa`,~!"GB`+XB@Wh6$Wc
% Cannot do DISPOSE:RENAME. DISPOSE:DELETE assumed.
0NO FREE CHANNELS!

% CANNOT OPEN QUEUE DEVICE!
% PLEASE NOTIFY OPERATOR!

% CANNOT ENTER QUEUE REQUEST IN QUE UFD!
% PLEASE NOTIFY OPERATOR!
?QMRCNC Can't CONTINUE -- try REENTER
C2d;y1,>Yy6#p0b+Yh@Ap Yp $	b2+YV "6@&Z&." p4DYK.$(B{(D{0d+Yh BYo DYo ( & Q&	f2+Y-4&Y-1(~9Y) HYn3HYo+Y92(Yo+YA.(3(Yo Yo HYn@@Yp@@YMS"xZHYN:YM.(3hYo*bY3!$6@YpGDYN Yq	d2+Y;3hYo+Y2 Yo(F+Yf6@Yp+Y=O@Yp+Y5OApZYN3bYn+Yh/"*Yn BYo+YA@Ap Yo:!&@@YM!"x HYN:YMGFYN.(3hYn*bYD Yq	d2+ 3hYn+YC6Ap+Yh+Y9Z	b+ @gp+Yg6@&+Y[Z.$1$ $!	d+Yh $QD&,Yj pZaD $ Yq	fQ&[[&.&."`b+Yh!."!`aB	b:p	d+Yh/'p.& Gp,~OAp,~G3]x1,>Yy@	`+Ym,~
&Yr	` YMp 
Cannot write-enable high segment data area.
KbN@1,>Yy,

,~YzY\Y{Q<X\Y|*+