PDP-10 Archive: 43,50466/item.exe from decuslib10-09

Trailing-Edge - PDP-10 Archives - decuslib10-09 - 43,50466/item.exe

There are 2 other files named item.exe in the archive. Click here to see a list.

?p?xSR-PKb)E|lDE`INXQF:{A)'[{BE@2u(#(%	;E TEST'/7X,'2    FOR CORRECTED TEST DATA CONSISTING OF 1''S AND 2''S'/12X,'WHERE 1= CORRECT ITEM RESPONSE'/18X,'2= INCORRECT ITEM RESPONSE'///' THERE ARE 4 TYPES OF SUBJECT ID ENTRY:'//5X,' CODE  DESCRIPTION'/7X,'1    SUBJECTS ARE NOT IDENTIFIED'/7X,'2    SUBJECTS ID ARE TO BE ENTERED SEPARATELY'/7X,'3    SUBJECTS ID ARE IN FIELDS BEFORE THE RESPONSES'/7X,'4    SUBJECTS ID ARE IN FIELDS AFTER THE RESPONSES'/'-SUBJECT ID LENGTH IS BETWEEN 1 AND 15.'/)('-ERROR:  SUBJECT ID ENTRY TYPE',I3,' DOES NOT EXIST, TRY AGAIN'/)('-ERROR:  SUBJECT ID FIELD LENGTH',I3,' OUTSIDE RANGE.'/9X,'IT SHOULD BE BETWEEN 1 AND 15.  TRY AGAIN'/)('(',I2,'A1')(A5,2A4)(A5,A4,2A5)('(',I2,'I,1X,')(I2,'A1)')(A5,A3,A5)('(',I2,'(20I/),')(I2,'A1)')(16A5)(I2,'I,',I2,'A1)')(3A5,A4)('-NUMBER OF SUBJECTS--',$)('-ERROR:  NOT ENOUGH ROOM, TRY AGAIN'/)('-')E    H    ,1X, 20I/(20I) (20I)L    H`h20I))P         + -<09Od"& F & F & FOf
 82Du+ 92Dt+ 92Dx+ :3D{+) <K, <N,
6d#+" <Q, <T,
+' $0$0d+%++ <V, <Y,
6 + <0,8 <Z,,+' %0$0d+-+0 <], <`,
+' %1D+9 %0d0d+4+6 <b, <e,
+' $.%&$ D&+: $ D& 0D+u"$.%4D?5dS w D+u <f, <j,
 u D9 #0d
+J w D9 <k, z_D1ZD[ [ <o,
:[; 1+G, v D9 z D: <p, y_D1ZD[ [ <t,
:[; 1+O,+u #0d
+_ <u, <y,
 <z, <~,
 <, z_D0ZD[ [ <,
:[; 0+[,+u #&$
 D4 <, <,
 #&$
, D45dm <	, <
 <, z_D0ZD[ [ <,
:[; 0+i,+u <, <,
 <, y_D/ZD[ [ <,
:[; /+r, (0D+z <,, <!, <$,
 (1D+} (0D+" # D-$$ D, $ D] #.( #.&$7 .&( F7$& D3 $ D, $2D$+	 & F,., D8 #( F5 $( H. 
#$
8 J... F8(.8.5 D9 5.$ D9.( H: y 83f.+ 8 F.*d -.,.].7.3.. D- <4,797D2+ <%,,+' 8.d-.d,.d].d7.D3 8 $6 Dp - $6 Dq , $6 Dq ] $6 Dr 7 $6 Dr 3 $6 Ds <1,  <(,,+ <0,

P	p	q	q	r	r	s`-287hsv@s]6d$#$$$%$%Xd$#Xl$$XrVXH$%XO
$%PZ8$%P[$8P	\$8P^8$#P`9$%Pa$8Pb8$4Pd9$%Pe$8Pf9$4$%P	h$8XiXd$$XlXp('(A',I1,')')('(',I1,'A5)')('(',I1,'A5,')('A',I1,')')(A5,A3,A5)('-ENTER SUBJECT ID, ONE PER LINE'/)(I5)('1'/'3',29X,'WESTERN  MICHIGAN  UNIVERSITY'///30X,'ITEM ANALYSIS PROGRAM'//30X,'CALLING NAME:  ITEM'/30X,'DATE RUN    :  ',2A5///30X,'TITLE  :  ',16A5/30X,'FORMAT :  ',16A5/'-',29X,'NUMBER OF ITEMS TO BE USED.........',I4/30X,'NUMBER OF SUBJECTS TO BE READ IN...',I4)(' ENTER KEY TO EACH OF THE',I5,' ITEMS'/' MAXIMUM OF 20 NUMBERS PER LINE SEPARATED BY COMMAS'/)(20I)('-ERROR:',I5,' FOR ITEM',I5,' IS INVALID, TRY AGAIN'/)(' ENTER DATA BY SUBJECTS'/)('+MAXIMUM OF 20 ITEMS PER LINE (SUBJECT) SEPARATED BY COMMAS'/)(' PLEASE WAIT, YOUR DATA IS BEING PROCESSED'/)(15A1)TTY  HX`p     [Mk \ !p @P !p @5 !p @> !p @P !p @? !p @= <y,4% $$& D= (0F+l"= $ .? 
 J'.$8&, %&$  DS6b%0b+5+24Y454l4l   FJ*d5 &0d+; <z, <~,
+J6dS+> <, <	,
+J"$.& DJ <	, <	,
,<		, <	
 <	, _DCZDO O <	,
:O; C+F, <	,, &/=&&/& $ &$ H; <	,"*.
/
;  JB H? ?.? <	,
:?; B+S,.&8&N+l"$ $ FA DO   F-*d[ O.? <	, <	,
 O.? <	 ,	 <	#,
 -2D+h  - F-*de  D/+c O.? <	&, <	),
:O; A+[ )0D+s <[,.  3D+s <x,2] <	,, <	/,
6b$0b+v+u4{4v"# $ .P * J'.$8&w+: )0D+: 3D+6b%0b++4444 <	5, <	8,
 <	:,"# $ FM DO O.P <	=,
:O; M+,++ <	>,"# $ FM DO O.P <	A,
:O; M+,++ <	C,"% $ FL D? ? <	F,
:?; L+"# $ FL D8 8.P <	G,
:8; L+,++ <	I,"# $ FJ D8 8.P <	L,
:8; J+""% $ FH D? ? <	M,
:?; H+(,"# $ FH DO.P 0f+1 0&+8 <	O, O.P <	R,
6$:+6 <[,8 3D+ <[,8:O; H+- 2D+@ <	T,, 0D+B <	W,,+B <	Z,,@dU %0&+S D<"$ $ DO $.< D> O$# D< <	],"</(.> > HT D? ?.5 <	`,
:?; T+M,:U:O8&F+"$ $ FT DO/$$&.$ D; O/$$#.$ D@ O$# DC6b%0b+_+\444_4l <	a,"% $ FS D? ? <	d,
:?; S+b"&.@/C @ FR D8 8.5 <	f,
:8; R+h,+y <	g,"&.@/C @ FR D8 8.5 <	j,
:8; R+p"% $ FQ D? ? <	l,
:?; Q+v, ;.? <	m,"% $ FQ D? ? <	q,
:?; Q+},:U:O; T+U U2D$ D$ $1D+( $ D:@d<"$$# $ .5 ' HN0(0h+
.
5@l/:
<+ N2h: H:.$8&	 <	r,"# $ F9 DO O.P <	t,
:O; 9+,"$ $"(.$#.( HO <	v,"#$/(. 
O H7 J? ?.5 <	x,
:
?; 7+!,.$8& <	y, <w,0r <s," *0D++ <q, E0D+. <p,Y E0D+0 <o,a F0D+3 <k,[ F0D+5 <h,l7DG+> F1D+9 <e,E+<!$X2D,+<!$X3D,+= <d,6 <c,l G0D+D6DF+C6DG+C <`,E <_,!F &1D+Z <], ZDO O &0F+L6b$0b+L+K4M4V*dG+Z <	|,"# $ F6 DO O.P <	~,
:O; 6+P, <\,0r+Z"# $ .P * J'.$8&W ,~xp&p	>	=`	>5?	=x	=p5	=`	>5?	=P:P5	>	=?P#$5	>	=Px	Pp?	>pE@P5	>	P?	=:<xxIx:PUK$%PWK$&PX-$JPZ.$SP[K$-X\XK$'P`$OP@-P@-Xa@I@@$#$$X|
$#X$X$X$-$X$$-X$$OX

XXX$X$-$X$$-P%$-h$h$'`h$*****('1ITEM ANALYSIS SUMMARY'/1X,16A5/'-NUMBER OF ITEMS    =',I8/' NUMBER OF SUBJECTS =',I8/)('-NOTE:  THERE IS 1 ENTRY OUTSIDE THE ALLOWABLE RANGE OF 0 AND 9.'/8X,'PROGRAM CONVERTS IT TO MISSING DATA SYMBOL 0.'/)('-NOTE:  THERE ARE ',I4,' ENTRIES OUTSIDE THE ALLOWABLE RANGE OF 0 AND 9.'/8X,'PROGRAM CONVERTS THEM TO MISSING DATA SYMBOL 0.'/)('-',4X,'*',3X,'P O S S I B L E',4X,'R E S P O N S E S'/' ITEM*',16A5)('  NO * MISSING',9(I7,1X))(' ',17A5)(1X,I4,'*',11F8.0)('  NO *',10(I7,1X))(5X,'*')('-')('-',4X,'*',30X,'PROPORTION'/5X,'*',34X,'OF'/' ITEM*',3X,'RIGHT',4X,'WRONG',3X,'MISSING',5X,'CORRECT',4X,'CORR  W/'/2X,'NO *',3(2X,'ANSWERS'),5X,'ANSWERS',6X,'TOTAL'/1X,'*',11A5/5X,'*')(1X,I4,'*',3F9.0,F12.3,2X,F8.3)(//'-NOTE:  THE FOLLOWING KUDER-RICHARDSON FORMULA ARE BASED ON ',I5,' ITEMS.')('-RELIABILITY:  KUDER-RICHARDSON #20 =',F12.4/15X,'KUDER-RICHARDSON #21 =',F12.4/15X,'CORRELATION OF ODD-EVEN ITEMS       =',F12.4/15X,'SPEARMAN-BROWN ODD-EVEN RELIABILITY =',F12.4/'-',24X,'M E A N',6X,'ST.  DEV'/5X,'NUMBER CORRECT ',2(F12.3,2X)/' ODD  ITEMS CORRECT ',2(F12.3,2X)/' EVEN ITEMS CORRECT ',2(F12.3,2X))_PTTY  .5}_s(CW%p \ !p @
& !p @
 !p @
 !p @
' !p @	 !p @
 p @

 p @
 <p, <s,
 $0d+

-4`40@+1 <w,,1`+4 <z, <},
 $.

$# D
"
 $ .
@j'.$8&7 #$$ D
"
.&&#/& $ F
 D
$ # F
#/$ D
"# $:
.
6J+F .
!*J+J 
.
 .
# F
.
!*J 

.F
#.$8(A #.d
$; 
+> $ D

 & F
 3F +R & F
 
3&

+U 

 F
.
(.$&$ D
# <~,"
# $ F
 D
$ <,
:
$; 
+Z, <,

/&/

 F
 D
$ <,
:
$; 
+a, <,"
#/& $ F
 D
$ <
,
:
$; 
+h, <

,,

.# D
"

.
 D
"# $"(.$

.
 H
!.
 H
 <, .
 <,
 

!/*/

 
! J
 H
 
.
 <,
:
; 
+z,.$8&p 
3D

+

-.d

F
"

.&.
(.&&& F
# <,"
# $ H
! D
$ <,
:
$; 
!+

, <,

/&/

 F
  D
$ <,
:
$; 
 +

, <,"
#/& $ F
  D
$ <!,
:
$; 
 +

, <#,,

.# D
"

.
 D
"# $"(.$

.
 H
!.
 H
 <&, <),
 

!/*/

 
! J
 H
 
.
 <*,
:
; 
+

',.$8&

 <,,,"$ $ .
@j'.$8&

. # D
.
 D
+ #.
+ D
 #.$.
 D
 #.$.
 D
"
 $ .
@j'.$8&

9"$ $ F
 D
$/$$# D
"# $ .
 H
.
6J'+

H .
!*J' 
.
 * J'+

W .
& 

.

 
/2J'+

R 
$.
!*J' .
+ H
.
J' 
.
 * J'+

W .
 H
.
!*J' 
.
 * J' .
 H
) 
.

 J
*.


l7L'.

 
.
 '$hH/.$8&

@:
$; 
+

>"$ $ 
.
 
.

 
/J' 
.
 
.

 
/
J'.$8&

d 
.
  
.
h$ H
@d
# $.#$#7 .$( D
 D
"# $ F
, D
$.
.
  F
 
$.
.
  D
"

d$
 D
"
$ $ H
+ D
@f

.
.
  F
 
.
.
  D
	"

d$
	 D
"$ $"&.$# F

.
$ F

.

 J
".

.

/lL

.$8(
# 

 F
&.
'   H4F
#.
'"



h$

 <o,2 H:
; 
++

"$ $"&.$#.
$ F
 
.

.
l

/L

.$8(
 

 F
&.
'   H4F
.
' 
.
 
'

"$h

 <n,2 H:
$; 
,+

w 
.
'!& F"$.$$$ D
h$ 

.

 / F+d 
 F <m,2 @+ </, !_D
(ZD
$ <2,
:
$; 
(+ 
 D
#"# $ .
 H
l$ .
+.
 
?
 J
:


# <3, .
+.
 .
.
 .
.


' <6,
.
 J'.$8&
 D
+.$ D
.$ D
 
+.& F
$"
/&.
$ 
$ .
@j'.$8&
 D
' D
 D
 D

"$ $ F
 D
$/$$# D
# 
$.
+ D
 
$.
 D
" &/#7 .&(/& $ 
#..
 '0H+
.
!*J'.$8&(/& $ 
#..
 '0H+
".
!*J'.$8&
$; 
+$ $ .
+.
 ' H
 
.

.

 
/ J
H

H
J
'

J
 

H

.$8&
 D
%f$ 
' D
"

d$
 D
"
'
'f$
 F
%
% D
&   H
4D"


'j$



 <l,2
 J
l
 


 J <k,2 @
l
 F <j,2 @
% H
 
3F+ & 
H H
@f
 F
 F
 F
 F
@f
# &/# $ F
 D
$
/
7 .$(.
 D
.
'!&3&+E:
# 
.
.
  D

 F

 D

D
 
D
F
 
.$ D
#"&/#.
# 
# $/7 .((.
 H
.
'!*3*'+D .
.
 ' H
'

'

 H <i,2 
.
'

'L

 L
L
.$8&5:
; 
+% #$#/#7 .$(.# D
.
'!&2F+R:
# 
+.
  D

 F
D
F

D
 

 D
f
# 
 D
h
# 
 F
"&.
#f
 F
   H
 H

4Ffh
#

 H
h
#"


 D

 
#3D#+f <:, <=,
 <?, <B,
 ,~xxxx
&xx
&x
&X
-	@$#$$X
6

X
B$
X
O(
"X
V$
$X
Y(
"X
^X
Z$('('X
O(
"X
\$
$X
Y(
"X
^X
Z$('X
_X
_(
"X
r$(?(G(O(
(7X
u$
#X
} (
(

(
(
(+(+(
%(
(
(
%*****('1THE ITEM CORRELATION MATRIX'/1X,16A5/'-NUMBER OF ITEMS    =',I7/' NUMBER OF SUBJECTS =',I7)('-ITEM ',17I7)(5X,'*',25A5)(1X,I4,'*',17F7.3)TTY  G?H  \_ !p @P <, <,
 $ DJ 3D`+h $ DJ J/$ DO.#&J DH"H $ FN DP/$$J.$ DH P$J FI3&#+s # HI <!, H/&/I H FN DL <$,
:L; N+w,"H.$.I$$.$&$ DK <%,"K $ FM DL <(,
:L; M+,OdK"&/#.H H:K3(J+ 
O JK $/7 .((.H HK 
K.
K JJ <*, <-,
/(/J 
K HL JI I.P <.,
:
I; L+,.$8&:P; N+m _,~XQ	@$#$$XZ$LX\(OX]$('SUBJ CORR SPBN ITEM DIFD FREQ  OPTION   COMMAND   FINI DATA FORM PARA SUBJ HEAD KEY  OPTS ('-'A7,'S?--TYPE HELP IF NEEDED--'/)(80A1)(' ERROR:  ',A7,'  CODE ',5A1,' TOO LONG, TRY AGAIN'/)(' ERROR:  ',A7,' CODE ',A4,' DOES NOT EXIST, TRY AGAIN'/)('-ASIDE FROM THE ITEM ANALYSIS SUMMARY, THE FOLLOWING ARE ADDITIONAL'/' OPTIONS AVAILABLE.  ENTER THE SELECTED OPTION CODES SEPARATED BY COMMAS:'/6X,'CODE    DESCRIPTION'/6X,4('-'),4X,11('-')/6X,'NONE    DO NOT WANT ANY OF THE OPTIONS'/6X,'ALL     ALL THE OPTIONS MENTIONED BELOW'/6X,'SUBJ    INDIVIDUAL SUBJECT TEST TOTALS'/6X,'CORR    ITEM CORRELATION MATRIX'/6X,'SPBN    USER SPECIFIED SPEARMAN-BROWN BREAKDOWN'/6X,'ITEM    INDIVIDUAL ITEM ANALYSIS'/6X,'DIFD    DIFFICULTY AND DISCRIMINATION MATRIX'/6X,'FREQ    FREQUENCIES,Z-SCORES,T-SCORES,PERCENTILE AND HISTOGRAM'/)('-AT PRESENT, ANALYSIS ON ONE DATA SET IS DONE.  THE PROGRAM IS WAITING'/' FOR USER''S INSTRUCTION(S) ON WHAT IS TO TO BE PERFORMED NEXT.'//' 8 COMMAND CODES ARE AVAILABLE, ENTER THE SELECTED CODES SEPARATED BY'/' COMMAS:'//6X,'CODE    DESCRIPTION'/6X,4('-'),4X,11('-')/6X,'FINI    TO TERMINATE THE PROGRAM'/6X,'ALL     ALL THE COMMANDS LISTED BELOW'/6X,'DATA    CHANGE INPUT DATA FILE'/6X,'FORM    CHANGE FORMAT STATEMENT'/6X,'PARA    CHANGE PARAMETER STATEMENT'/6X,'SUBJ    CHANGE SUBJECT STATEMENT'/6X,'HEAD    CHANGE HEADER STATEMENT'/6X,'KEY     CHANGE THE KEY'/6X,'OPTS    CHANGE OPTION STATEMENT'/'-NOTE:  IF OUTPUT IS ASSIGNED TO THE LPT:, IT IS NECESSARY TO USE'/8X,'THE FINI COMMAND AT THE END OF ALL ANALYSIS.  FAILURE TO DO'/8X,'SO MIGHT RESULT IN LOSING THE ENTIRE OUTPUT FILE.'/)E    H    N    F    I    L    O    A    ,    H@P     P    G>m| \ !p @: p @0 <,4% $ D0 00D+ $ D0 <, 0( <,
 <, <,
+@2D+#+@2D+#4A2D	+# A2D:@j'.$8&$6b00b+*+(4*40 @2D+0 @2D
+0 A2D+0 A3D+ @2D
+4>@2D	+4@A3D	+~ @2D+: @2D	+::A2D+: A3D	+"&( $((Dh h,?2D
6D1+,<,8,
6b00b+Q+P4X4Q

ZD1 1 h2H;+W.: ( H@f2+b*dR+^

ZD1 1 42H;+].: ( H@f2+b*dX <*, 0( <-,
6D1++J:3;9+B7D2+ 
6b00b+k+i4r4k"& $ F7 D1 h2F;+p.: & F+:1; 7+m+y"& $ F4 D1 42F;+x.: & F+:1; 4+t <5, 0( <8,
6 1++J"&/0.0 0 .: * J'.$8&+ : & F  &.:@h*d+ <:,, <,0r+ <=,, <,0r+ ,~xxx1Xl0:Xp@(@Xq0:@=$2Pp;@=Xw0:$;Pp;@=Xw0:$;X}9X6O('1INDIVIDUAL SUBJECT TEST TOTALS'/1X,16A5/'-NUMBER OF ITEMS    =',I7/' NUMBER OF SUBJECTS =',I7//5X,'TOTAL',5X,'PROPORTION'/4X,'CORRECT',5X,'CORRECT',4X,'SUBJECT ID')(1X,F10.0,F12.3,6X,3A5)gV  \W !p @A !p @@ <q, <t,
"$ $"(.$&.( HCl# .@ 
?
 J@ <w, 
.
@ <z,
"&$/(. 
C HB JA A.A <|,
:
A;B+j,.$8&^W,~XD@$#$$XU(/(@$'('-'/'-USER SPECIFIED SPEARMAN-BROWN BREAKDOWN'/' NUMBER OF ITEMS IN THE FIRST GROUP--',$)(20I)('-ERROR:  IMPOSSIBLE TO FORM GROUPS WITH ',I5,' ITEMS.'/)(' SPECIFY THE',I4,' ITEMS BELONGING TO THE FIRST GROUP'/' MAXIMUM OF 20 NUMBERS PER LINE, SEPARATED BY COMMAS'/)('-ERROR:  ITEM',I4,' DOES NOT EXIST, TRY AGAIN'/)('-ERROR:  ITEM',I4,' APPEARED MORE THAN ONCE'/)('1USER SPECIFIED SPEARMAN-BROWN BREAKDOWN'/1X,16A5/'-NUMBER OF ITEMS    =',I7/' NUMBER OF SUBJECTS =',I7/'-GRP',3X,'M E A N',3X,'ST. DEV',4X,'ITEMS IN THE GROUP'/'  1 ',2F10.3,4X,10I4/(28X,10I4))('  2 ',2F10.3,4X,10I4/(28X,10I4))(///' CORRELATION OF GROUP 1 AND 2 ITEM TOTALS =',F12.3/' WITH SPEARMAN-BROWN FORMULA =',F12.3)P.5}sgBl,@ \X p @ p @ !p @~ !p @ !p @ !p @ <,4%  D. D. D
 0d2$+r+v <, <,
6 +l <{,8 <

, <,
 <," $ F
 D . <,
:; 
+{," $ D .  D..!( H 0d2d++ <, <,
6 +v+u:8& $2$+% &/ $ F	 D.$ D"&/.  D . . '/4("5h <, . <,
6 +v+u .  D . 
.
 
/ J' . D':8&:; 	+@d D D D D" $ F D/$$ D" $ . '. H.~ 
'0J+2 .!*J'.$8&, .  D

 .. ."


' J ..  FD

DF

D D:; +) d D f F D~ Z H4DP"

j

 <~,2
 Jl 

 Jl 

 J"*.
$
 J

 LX <},2 @l

3FX+<|,2 @H H
" $ F D . <&,
:; +e,@d

" $ ..!*3J'+o:

. D'.$8&j <', <*,
"

 $ F D . <,,
:; +t, <., <1,
X,~xXxXx~xX	X$X$X!$X$X-$X2$X7@$$(($XK(($XN	((ER THE CODE ASSOCIATING WITH THE METHOD DESIRED'/'-',5X,'CODE  DESCRIPTION'/8X,'1   UPPER GROUP CONSISTS OF THE UPPER 27%,'/12X,'LOWER GROUP CONSISTS OF THE LOWER 27%'/8X,'2   UPPER GROUPS CONSISTS OF THE UPPER 50%'/12X,'LOWER GROUP CONSISTS OF THE LOWER 50%'/8X,'3   OTHER METHOD TO BE SPECIFIED BY USER'/)(I)('-ERROR:  METHOD',I3,' DOES NOT EXIST'/)(' ENTER % OF UPPER AND LOWER GROUPS, SEPARATED BY COMMA--',$)(2F)('-ERROR:  INCORRECT CHOICES OF UPPER AND LOWER GROUPS, TRY AGAIN'/)('1INDIVIDUAL ITEM ANALYSIS'/1X,16A5/'-NUMBER OF ITEMS    =',I7/' NUMBER OF SUBJECTS =',I7/'-GROUP * PERCENT * # OF SUBJECTS'/1X,32('*')/3(1X,A6,'*',F7.2,'% *',I6/))('-'/'-ITEM ANALYSIS FOR QUESTION',I4,' OF',I5/' THE CORRECT ANSWER IS',I3/'-',6X,'* MISS-'/' GROUP *   ING',9I6)(' *',14A5)(7X,'*'/1X,A6,'*',10F6.0)(3X,'%   *',10F6.2)(7X,'*'/' TOTAL *',10F6.0)('1')('-'/'-ITEM ANALYSIS ON CORRECTED SCORES')('-',4X,2('* ',A6,F7.2,'%'),'* T  O  T  A  L *'/5X,49('*')/' ITEM*',3('CORRECT  INCORR*')/1X,53('*')/5X,'*',3(15X,'*'))('-',4X,3('*',A6,1X,F6.2,'% '),'* T  O  T  A  L *'/5X,65('*')/' ITEM*',4('CORRECT  INCORR*')/1X,69('*')/5X,'*',4(15X,'*'))(1X,I4,'*',4(F7.0,1X,F7.0,'*'))(5X,'*',4(F6.2,'% ',F6.2,'%*'))(5X,'*',3(15X,'*'))(5X,'*',4(15X,'*'))!yHELP hSR

 <n,"# $ FF DP P.S <p,
:P; F+z,"$ $"(.$#.( HO <q,"#$/(. 
O HE JB B.9 <s,
:
B; E+,.$8& <l,0r <i,E <u,, <x, <{,
 @,2Dk+ <|,,6 >+
 ?1d1d++ <, <,
+"$.?4$)5d!!$ <, <,
 ,,3dj+) <,,6 >+!+d$,$HD D2f$,&HF F3"2.$/3 F3!(H,, H@1H1F+7j$
,*H*J J3@j3 <, <,
 # D4.4 D4 $1F+Y.= D5.= D5.= D6.$ D6.= D8"# $ FE DP <g, <, P.S <!,
"= $ FD DB <$,
:B; D+J, $.=$$.$&$ D: <%,": $ FD DB <(,
:B; D+S, $ D?.4 DW 5 D> 2 D;+d7D3+` & F? &.5 FW 5 F> D;+d $ D? $.5 DW 6 D> 3 D; 6.?.@  D9 <*, ?( <-,
"&.W/> W FC DB B.@ </,
:B; C+m,f; 9$H D= 6 DA"&.W/> W:A.@l; 
.
@ 
/
*H J'.$8&v <0, <3,
 $.6 DO"&/8.O O FM DB B.@ <5,
:B; M+,6b?0b+
+4Z4`4
 6.@  F9"= $ .@ 
6.

5.

 4. ?7

5.

7 N/ .@ 
4.
n$

6.

,H L/.$8& <6, <9,
 $.6 DN"&/8.N N FK DB B.@ <;,
:B; K+",f$ 9$H D9 <<, <?,
 $.4 DN"&/5.N N FJ DB B.@ <A,
:B; J+/,:P; E+D <B,, <E,"# $ FI DP P.S <G,
:P; I+9,"$ $ FH DP/$$# DO <I,.$ DM"&/#/O.M M FG DB B.9 <K,
:B; G+F,"# $ O. H;.9 
' JI5JQ ;.9 * J'+U .S '2HI+N ;.9 * J'.$8&K:P; H+? <f,0r $.4 D5.$ D5.$ D6.$ D6 <L,,6d3+b <O, <R,
+d <U, <X,
"# $ F7 DP <c, 6.@ 5.@ 4.@   5.@ H 6.@ 5.@ 5.@ ' 6.@ H6d3+. <\, <_,
 $.4 DL"&/5.L L FW DB B.@ <a,
:B; W+{ $.5 DK"&/6.K K FV DA A.@ <b,
:A; V+, 2 D? 4 DW"& $ FV DB/$4$5d 3 D? 5 DW+ $ D? 6 DW $.W DJ"&/W.J J .@l? 
'
*H J'.$8&:B; V+ <d, $.4 DH"&/5.H H FU DB B.@ <g,
:B; U+  $.5 D8"&/6.8 8 FT DA A.@ <h,
:A; T+(, <j,,+R $.4 DW <m, <p,
"&/6.W W FT DB B.@ <q,
:B; T+4, 2 D?"&/6.W W (.52H+> 3 H? (.52H+A 3 H? (.62H+D $ H? .@l? 
'
*H J'.$8&; <s,"&/6.W W F< DB B.@ <v,
:B; <+M, <w,, P.@ 6.@ &Ff F 4.P.@ 4.@ 5.@  (Hh H:P; 7+f <b,p i,~x	@`#P9	@xj`#P9	@`	A9B	@xjx>h$h$'XX

Xd)@Xd$X}	$?X	$?XX(,(,XX@$#$$0P(,$20Q(@$30R(,$3X,$P$#$$BX8(:X90O(9(X<(=(X>(9(X<(9(XAh$h$XAXF

0P(,0R(,XR

0P(,0Q(@0R(,X^$P((Xb((XeX^$P(Xb(XgSR p @{ p @ !p @z !p @~ $.4 D"&/6.  .~@j'.$8&
 $ D} D} 2 D| 4 D+7D3+ & F} &.2 F}.2 D| 5 D+ $ D} $.| D} 3.D| 5 D 6.} D"&.}/| }"(.${. H|.z7J'+' |.z '. H{.~!*J'+) .~!*J'.$8&6b}0b+.+,444.,~('-ERROR IN SORT ROUTINE, CONTACT COMPUTER CENTER STAFF'/)g?@ \D !p @2 !p @/ !p @4 !p @0 $1d+- 2  F7  H03f0+c H F"# $ ./ ' H2 
#.
 J=

/.
/ / N7 
=.
/ H/.$8&Q"& $ .4 ' H2 
&.
 J=

4.
4 / N7 
=.
4 H/.$8&Z $2$$+- &/$ $ F8 D=.2  F7 =/$$& D3"& $ 3..4 ' H:.$8&k"$.=$# D3"# $ .0 
.
3.
/ 
/ J'.$8&r 2 3$7+ $ D1 &$1.$ D= &$= D9"=.1 = .2 
' J'/$8&~ 1.2 7 F"&.=/9 9 .4"
&.
 
/ J'/$8&"&.D="& $ =.4 
: J':=.$8& #$1.$ D3 #$= F1 3/&/1 1 ./"
#.
 
/ J'/$8&"#.D3"# $ 3./ 
.
0 
/J':3.$8&++=.23d7++&/=$D//.23$7+(/D1+y:/8&$</,,<.,8:=;8+gD,~X>I&64\4!p@2!p@3!$XD,D,#D4.4D4.$D5.$D5.$D6.$D6$D* ( I* ( S* ( C* ( R* ( I* ( M* ( I* ( N* ( A* ( ('-AVERAGE INDEX OF DISCRIMINATION =',F12.3/' AVERAGE INDEX OF DIFFICULTY     =',F12.3/'-NOTE:  INDEX OF DISCRIMINATION = DIFFERENCES BETWEEN THE PROPORTION'/8X,'OF THE UPPER GROUP (27%) WHO GOT AN ITEM CORRECT AND THE'/8X,'PROPORTION OF THE LOWER GROUP (27%) WHO GOT THE ITEM CORRECT.'/26X,'RANGE = (-100,100)'//8X,'INDEX OF DIFFICULTY     = PROPORTION OF THE',I5,' SUBJECTS WHO'/8X,'ANSWERED THE ITEM INCORRECTLY.'/26X,'RANGE = (0,100)'/'-'/'-DIFFICULTY AND DISCRIMINATION MATRIX'/' (ENTRIES ARE NUMBERS OF ITEMS WITHIN RANGES)'/'- *',12X,'* D    I    F    F    I    C    U    L    T    Y * # OF'/2X,'* R A N G E  *  (0-19) (20-39) (40-59) (60-79) (80-99) (100- )* ITEMS'/1X,70('*'))(1X,A4,I4,',',I3,') * ',5(I6,2X),I6,' *',F5.0)(' T* ( 100,   ) * ',5(I6,2X),I6,' *',F5.0/' I',69('*')/' O* # OF ITEMS *',6F8.0,'*',I4/' N*',12X,'*',48X,'*')(0PI&4L` \i !p @d # Db.b D.$ Dp.$ Dn .& F"n/&.  .d@j'.$8&u kDnZD j &$.&@hj*dy:; n+y@d Dc"# $ b..d ' Hb 
.
d 
/ JdHcJ(H( (H H* *J Jo$*.
:

(j 
o.
.
d!,L/.p.dL'.$8&f#  Df# c Dc <6, <9,
"$< Dj j &
.fj.&	 Fj <<, <?,
 k_FlZFc &$c.& <A,
:c; l+ p.&.d <C,
*d <D, k_DkZDc $$c <G,
:c; k+& n.d <I,
 $. D"&/.  Fk D .d <J,
:; k+0 <L,
 i,~XD(c($$XY$d$j$j$j(X^$p(($#('1ITEM DIFFICULTY AND DISCRIMINATION SUMMARY'/1X,16A5/'-NUMBER OF ITEMS    =',I7/' NUMBER OF SUBJECTS =',I7/'-LOWER GROUP:',F7.2,'%'/' UPPER GROUP:',F7.2,'%'/'-',5X,'*  I N D E X  *  I N D E X'/' ITEM *  OF   DIS-  *',5X,'OF'/6X,'* CRIMINATION * DIFFICULTY'/1X,32('*')/6X,'*',13X,'*')(1X,I4,' *',3X,F6.0,4X,'*',3X,F6.0)I&6=6 \o !p @M <{, <~,
"# $ < , .M 
#.
 < ,
.$8&u o,~XO@$#$$(,(,Xk$(/('         ^          .........+('1FREQUENCY  DISTRIBUTION'/1X,16A5/'-NUMBER OF ITEMS     =',I7/' NUMBER OF  SUBJECTS =',I7/'-TEST MEAN     =',F12.3/' TEST ST. DEV. =',F12.3)('-NO CALCULATIONS DONE WITH STANDARD DEVIATION OF ZERO')('-******',14X,'CUM -',2X,'C U M',4X,'CUM',4X,'STANDARD',3X,'NORMAL',2X,'STANDARD'/' SCORE* FREQ',4X,'%',5X,'FREQ',4X,'%',4X,'T-SCORE',4X,'SCORE',3X,'CUM',3X,'%',2X,'T-SCORE'/1X,70('*')/6X,'*')(1X,I5,'*',I5,F7.2,I7,F7.2,9X,F10.2,F9.2,F10.2)('-NOTE:  STANDARD T-SCORE IS BASED ON THE STANDARD NORMAL SCORE.'/8X,'CUMULATIVE T-SCORE IS BASED ON THE CUMULATIVE % SCORE.'/)(1X,I5,'*',I5,F7.2,I7,F7.2,2(F9.2,F10.2))('-STANDARD T-SCORE IS BASED ON THE STANDARD NORMAL SCORE.'/' CUMMULATIVE T-SCORE IS BASED ON THE CUMMULATIVE PERCENT SCORE.'/)('1HISTOGRAM'/1X,16A5/' GRAPH INTERVAL =',G12.4/'-',7X,'0',6(A10,F10.3))(8X,'^',6(F10.3,A10))(8X,'^',12A10)(' SCORE  +',12A10)(8X,'+')(1X,I5,2X,'+',120A1) 5$3,X}n]S# <@;b 6v,cyD)u7	J_+p_BnU_f'AgTTY  X    `	at8/c a*lIj     MJ. \!; !p @  !p @  $ D

 D ]" ] $ . @j'.$8&!K      F.

!& F $ D ^.

 D  &/$ $  ^.  
.
  
/3J'+!\: ^:
 .  
.
  
/ J'  . !*J'.$8&!U <#, <#,
6D++!d <#",,+"1 <#%,,

. D D @d \" ^ $ D Z  Z. D D Y  Z.

.DD2d$DZ.H$++=Dj$h (H H $	 $
 J "  H H!; <#,2!? @ 
!<
!A
 
!>
 
!C
 
!C"  ( H 6( +"
!(H " (H( H \5h"!*HJ  <#(, <#+,
 <#0,,+"1!$3$ \+" 
 \
!( H!; <#,2@ @ [2$ \+""
 \*
!( H!; <#,2@ @ [ <#,2 @ [  [ [ H [!<  [!?.

!@

  [!D 
 [
!A
!@


[	Jh!D"h#3, <#6,
:Z8&!i <#;,, $ D  3D!B+"5 $< D 7$ .$( D 	2d  D    D 
& D

. ] D V"

 $  ].. l!*	 
 

 J'.$8&"@ <#>, <#A,
 $. ] D Z  Z/ V7 .&(/&  Z F  D Z  Z.  <#D,
0$.d"Z;<#+"M,. ] D Y &/ V. Y7 .&(/&  Y F  D Z  Z.  <#I,
 $.d Z;  +"[  V.  <#K,
+"m <#M, $. ] D X  X/ V7 .&(/&  X F  D Z  Z.  <#P,
 $.d Z;  +"h, <#R,"

 $ F  D Z <#U,
: Z;  +"p, <#V,"

 $ F W D Z <#Y,
: Z;  W+"v, <#[,,  
D D " ^ $ F W D Z"  $ !E H .$8&"  Z. D D

. Z.   
 D D Y4d#
" Y $ !B H .$8&# <#^, <#a,
" Y $ F U D    <#b,
: ;  U+#,: Z;  W+"~ <#d,, !;,~x [x!;x!;x!;X _@$#$$(+(+X mX sX!$ Y$ ( $ \( ( ( ( XX!

!$Y$!($ \( ( 
0 (X!2(0 	(X!2(0 	X!40 	X!60 ]X!8X!9$ $ X!8('+INPUT? (for help type HELP) '$)('+INPUT? ',$)('+OUTPUT? (for help type HELP) ',$)('+OUTPUT? ',$)('+Either a colon was missing or the file name',' is too long'/)(80A1)('+Device ',A6,' does not exist'/)('+Device  'A6,' cannot do input'/)('+Device ',A6,' cannot do output.'/)('WMU',I3,'.',I3)('+Only a /COPIES switch may follow a LPT:'/)('+Illegal character "',A1,'" in COPIES switch'/)('+Copies must be between 1 and 63.'/)(I2)('+Only switch available if for the LPT'/)('+Non-directory devices require no additional information'/)('+File name too long'/)('+Character"',A1,'" is not valid in a file name'/)('+Only one period is allowed in the file name.'/)('+BANK files must be read from the disk'/)('+Bank files can not be used for output.'/)('+PROJECT or PROGRAMMER number cannont be longer'/'  than 6 characters'/)('+Illegal character "',A1,'" in PROJECT-PROGRAMMMER',' number'/)('+ Comma missing between PROJECT and PROGRAMMER number'/)(O10)('+Nothing should follow the closing bracket for the',' PROJECT-PROGRAMMER number'/)('+File not found or protected'/)('R ',4A1,4X)('+You must have answered this question in this',' program previously to use "SAME" now.'/)('+You cannot do a /OUT while answering a /OUT'/)(' No output defined yet'/)('+To use the CONTINUE an input must have already been',' defined.'/)(' The answer to this question defines where the program is'/' to find the data.  It usually consists of a device, and'/' possibly a file name with or without a PROJECT-PROGRAMMER'/' number.  Devices may be specified by their physical'/' or logical name followed by a colon (:).  If the'/' device is a directory device (DSK, DTA), then a filename,'/' extension and PROJECT-PROGRAMMER number may follow it.'/' If the device used is a magtape or dectape, the tape'/' must be mounted, and in the case of a magtape it must'/' be positioned.'/'0DEFAULTS:'/' (1) If no input devices is specified but a filename is'/'     given, the default device will be DSK:.'/' (2) If a device which requires a filename and extension'/'     is specified, but no filename is given INPUT.DAT'/'     will be used.'/' (3) If no response is given (CARRIAGE RETURN is entered)'/'     the default is TTY:.'/' (4) If DSK: is specified as the input device, but no')('     PROJECT-PROGRAMMER number is used, the PROJECT-'/'     PROGRAMMER number of the job is used.'/'0EXAMPLES:'/'  DSK:DATA.DAT'/'  TEST.DAT[220,220]'/'   MTA:'/'0The following responses may also be used after the first'/' response to this question.'/' "CONTINUE" - (For MAGTAPE) Use the next set of data'/' "SAME" - Use same device specifications as used before.'/' "FINI" - End of run.'/' "/PROG" - User may initiate the run of a bank program'/'          (STP, BANK, TAB, FREQ, CORL, or REGR) from'/'          this program.'/' "/OUTPUT" - Redefine the output device, the program will'/'             respond with "OUTPUT? ".'/)('0The answer to this question defines the destination'/' for the program''s results.  It usually consists of a device'/' and possibly a filename with or without an extension.'/' Devices may be indicated by their physical or'/' logical name followed by a colon (:).  If the device is'/' a directory device (DSK, DTA), then a filename,'/' extension and PROJECT-PROGRAMMER number may follow it.'/' If the device used is a magtape or dectape, the tape'/' must be mounted, and in the case of the magtape, it must'/' be positioned.  If the device is a lineprinter, the user'/' may request multiple copies by following the "LPT:" with'/' a "/COPIES:" and the number of copies desired (1-63).'/'0DEFAULTS:'/' (1) - If no input device is specified but a filename is'/'       given, the default device will be DSK:')(' (2) - If a device which requires a filename and extension"'/'       is specified but no filename is given OUTPUT.DAT is'/'       used.'/' (3) - If no response is given (a CARRIAGE RETURN is entered),'/'       the default is TTY:.'/' (4) - If LPT: is specified and no /COPEIS switch is used,'/'       1 copy is assumed.'/'0EXAMPLES:'/'  DSK:SAM.F4'/'  LPT:/COPIES:3'/'  MTA:'/)S              B    .    /REGR     /STP      DSK  /OUT      E    ~9    (K    HELP      /OUTPUT   N    LPT       CONTINUE  0    DSK       C    TTY  ?FINI      /FREQ     Z    I    /CORL     /BANK     ]    O    A    /    0z        ,    TTY        FINISH    @INPUT.DAT _SAME      :    {[    `7     END       /TAB      pa         OUTPUT.DATP         LPT  DSK  SEQOUT    SEQINSEQOUT    RANDIN    BINARY    S< \'G p @#l p B#xp#m p B#xp#k p B#i p B$$ p B#g @$*5 ( $.D$*@d#j 'c D

 '` D 'k D@d#i'd#m <,U,4)'I#k <,T,3%@d#g & F$&2d#l+(3F$*+(2D0+( <,W,,3D0+( <,Z,, F0+(6D0+( <,],,4D( <,`,, & F0 <,R,3

 #g1D++\ $ D#o 'j #{3F'r+(* #{3&'o+(( #{2f'c+(( 'hAF#{ #o #{ H#{:#o*d(" #o1D(+(2 #o/&( #o 'r H#{.$8&(- #o1D+*b #|3D

+*b 'b 'r F#o*d(3 $ D$) D#o $) #{3F'r+)K #{3F'j+(B #{3F

+)K #{3F+)K #o0f+(@ #{ H#o:#o:$)+(6 <,c,,+( <,f, 'b_D#yZD#o #o <,i,
:#o; #y+(E, <,P,4)6D#o+(M <,k, <,n,
+( $*1D+(R 'rA#o5D)- <,o, <,r,
+( 'tA#o5D(V <,t, <,w,
+( 'UA#o4D)- $2 D#o:#o <,O,3) $2.D#j <,x, <,|,
 <,M,467D#{+(Y:$) #{3F'r+) #{3F

+) #{3F'b+(f <,~,,+( $) #|2F'Y+(r #|2F'a+(r #}2F'q+(r #}2F']+(r #~2F'P+(r #~2F'I+(r #2F'j+(r $.D$) 'r D#p D#p $ D#o.d$) $) #{3F'r+) #{3F

+) #{3&'X+) #{2f'Q+) #o0f+) #{ H#o:#o:$)+(u <-, $) <-,
+( <-,,+( #o1D+)
 #p2D'r+)
 #p D#p 'r D#p <-, 'o_D#wZD#o #o <-

,
:#o; #w+)

, <-,
.$&0$0d+)A#x(04D), <-,+#x($0:D'G <,K,4)+#x!&p83f{+)+& F0 'UA#l4F),F{"F$& $&1f2+)""&2.f$& $&$

+*b 'lA#o5D)= <-,,+( 'b 'r F#o*d)> $ D#o $) #{3F'r+)Q #{3F+)Q #{3F

+)Q #o0f+)I #{ H#o:#o:$)+)@ <-,,+('X#m'g#k $*0D+)P'p#k <,D,4) <-!, <-$,
#n3D'I2F'J7+*3D'M2F'M7++%3D'_2F'_7++%3D'L2F'L7++%3D'n2F'n7++%3D'\2F'\7++%3D'^2F'^7++%3D'i2F'i7++B3D'W2F'W7+,3D'O2F'O7++s3D'T2F'T7++s3D'm2F'm7++\3D'[2F'[7++\3D'f2F'f7++\3D'S2F'S7+,@h$) 'bZD#o #o #o3H'r+* #o3H'K+) #o3('X+)y #o3h'Q+* #o2h']+)| #o2('a+* <-', <-*,
+(:$)1F+* <-+,,+(*d)r $3D$)+*

 D#o #o #o3D'r+*	:#o1d+*+)I #o 'K F#o <-., <-2,
 $2D#o:#o0d+*+#o2F'K+*R+* & F#g 'eA#o5F* <-4,,+(7D$*+* <-7,,+(#n#k $) #{2D+*b 'b 'r F#o*d*  $ D#o.d$) $) #{3F+*2 #{3F'd+*4 #{3&'X+*/ #{2f'l+*/ #o0f+*- #{ H#o:#o:$)+*# <-:,,+( <-=, $) <-@,
+( <-B,,+( #o1D+*@ #t2D'r+*<"& $ #o H#p/$8&*8 'r D#p+*6 <-E, <-H,
 <-K,	 <-N,
 'b 'r F#o*d*@ $ D#o.d$) $) #{3F+*O #{3F'r+*O #{3F

+*O #{3&'X+*/ #{2f'l+*/ #o0f+*- #{ H#o:#o:$)+*C #o1D+*[ #t2D'r+*W"& $ #o H#p/$8&*S 'r D#p+*Q <-P, <-S,
 <-V,	 <-Y,
 $) #{3D:$) $) #{3F'r+*b #{3F

+*b(<-[,,+(,#i6D#h@$$+D#h@d#{2D$*+*g <,A,417D#{+*j<-^,,+(#x(04D+(<-a, #x( $0 D'G <,@,4)A#x!&p83f{+*s &AF04'UA#l4F+F{"F$&$&1f2+*x"&2.f$&"$&$&h H{0F++ #x H(03H'V2J'V++"0F++" 's D:0!$3D#j+,+," <-p, 'kD$&ZD#o #o <-s,
:#o;F$&++',@d#}"&6$:F$%;D#o6&{++?,<-u,(03H'V2J'V++?,#oF{"F$&($&1f2++6"&2.f$&$&$k+#x l&'s F#i"(	.l F$$@f#g!&2F{++Q@& F#gF{"F$& $&1f2++T"&2.F$&5<,2,4),$*0D++X <-z,'UA#o5D)('`A#o4D+\ <-|,+*b"&"$(F$%.D#o6&{++p!<-~,(03H'V2J'V++p #oF{"F$&"$&1f2++g"&2.f$&1$&$#+*b $*1D+, <.	,, <.

,,+( <.,, <.,,+( 'G #x Ap#mp #x Ap#kp #i Ap $$ Ap #g Ap,~p#m#o`'G'P'N$&X'G'P'N$&#up#m#ox#|`'G'P'N$&X'G'P'N$&#u`'G'P'N$&X'G'P'N$&#up'G#lX#m#k#{#i$$p#m#o`'G'P'N$&X'G'P'N$&#up'G#l`#k#{'J'Jx#jp#m#oh#|'R#gp#i$$p#m#oX$*X$.X$/X$3X$5P$;#m$#oX$<0#mX$@0#mX$C0#mP$G#k$#o$#jX$IX$N$#{X$SP$;#z$#oP$W#z$$&h#xP#x~'tP#k^'uX$WX$\X$bP$;#n@#pX$e$#oX$jP$;#n@#pX$oX$tX$xX%$#{X%P$;#n@#pP%

#n$#iP$;#n@#pP%

#n$$$X%H#xp#mP#k^'w#hH#xp#mP#k^'x#h8#xp#mP#k^'y#h^'{'ZP%#|$#oh#oX%	h#x`#xh#oX%$X%)X%,X%3^X&?X&PQX'!&(' ENTER HEADER')(16A5)     O% \. <.+,, <.., <.1,
"& $ F. D# 2F.+.)>#; .+.& .,~X.X.@F    A    I    (' ENTER FORMAT ENCLOSED IN PARENTHESES'/)(' ENTER FORMAT ENCLOSED IN PARENTHESES: (',A1,'-TYPE ONLY)'/)(80A1)('-ERROR:  Format incorrectly specified'/)(' Any FORMAT specification must comply with the FORTRAN-10 Format'/' requirement. The FORMAT must also be enclosed in parentheses'/' and be no more than ',I3,' characters in length'//' Example:  ENTER FORMAT ENCLOSED IN PARENTHESES'/11X,'(I2,F3.0,1X,F2.0,I1)'/)S    .    E    (    H    (@    L    A    )    M    P         SYSTEM ERROR CONTACT COMPUTER CENTER    DSK  SEQINO$lH \/ p @.7 p @.: !p @.e $ D.6@f F.4 F.82F.:+/( <0,14 0H3D.7+/++/, <0,, 1(2F.7+/1 <0,  <0,
 .40$+/3 <0,3

 .40D+/7 <0, <0,
"&( $( D.f .f .=2D/+/=>.f8&/8 $ D+0 .f D.7@d.f:.f2d.7+/G .=2F/+/> .f/&/.7 .f .= H.=.$8&/C"$.D.7+/>6D.4+/p .=2D/+/N .>2D/+/N .>2D/+/N .?3D/+0 .=2D/+/T .>2D/+/T .>2D/+/T .?3D/+0 .=3D/+/W .=2D/+0	 $ D.4".: $ ..e 
/ J'.$8&/Y .=3D/+/p $ D.4 &/.7 $ D.f .f .=3D/+/e:.f8&/`:.7 / F.="$..7 D.8 <0!, &/.7 $ F.: D.f .f <0$,
:.f; .:+/j, <0&, <0(,+/1".7 $ .=3H/:.8 .=2H/+/u"(.H.8.$8&/q $..7&$..62d.:+0	 .6..e <0+,".7 $ F.9 D.f .f <0/,
:.f; .9+/}, $..7&$.D.6 .80$+06b.40b+0+04040+/1 <00,+0 <02,,+/$ .:(..: D.f <05, <08,
+/$ /,~h.=/.=x/X.fX.k$ .5X.q@(.=P.8.q.3$.=hP~/P.3^/P.7.q$.=hX.rX.w$.f	`Z(X^. >[.~(3~+0>	~+0IZ. \x <x*<x .->2uez+0E!"	b+  "0F	b+Z. h+ggM?Th
&0K	b+09,
?NO CORE AVAILABLE - CAN NOT PROCEED
!*0o**,^,~*x,> <0o*<0q  pZ@0e@@0e@@0f 1&`|+0YPw,~ "p h a`~+0^h  ``~+0_$1&!0`d1'/"+0YP,~@@@ @@0@x@@@`edX91,>8,>Zp @0e\`0d <0e,,^,~SMI 1,>8,0R 1( B0e+1	_MI 1,>8,0R 1* B0e+1	I5R1,>8,0R 1+ B0e*\17ApX"1, B0e/& pd"~l" B0e*\1/& pd"~l"$ B0e*\1/& pd"~l"

 B0e*\1Sp*\1/&Xp B0n@@0n 1- B0e*\1/& pd"~l" B0eRF0d <0e,+0PEV4i91,>8+1!S,i@1,>8+1!_,i@1,>8+1!K>21,>8+1!K>401,>8+1![<I71,>8
&1- w @)@. 
"5B1"
&13,~`.

.4SEQIN^1'SEQOUT^1)RANDOM^1*SEQINOUT0n
%0 THE FOLLOWING ROUTINE IS NOT IMPLEMENTED IN FOROTS: 
a.3@1,>8O@1r+18gR~@1,>8@@1r,>,>@6 w+1E"1r0B+1@!"A`X#p5@1=/#p!"X#p+1E\p+1Ea.9'1,>8,>,>O@1r+1E,>
6+ _4`1M"`Q@,> <1s,,^,> <1v,
,^*b1J+1X,> <1x,,^7@1r+1S,> <1{,
,^+1U,> <1|,
,^Z5"1X,> <1~,
,^,7@1r,

,> <1,,^,,> <2,,^,> <2,
,^(@qd1@,,

1@#+1f0@*+1X,><2,,^+1X,^,^,^,~('TypeGKto Continue, X to Exit, T To trace.'/2H *,$)(A1)(1H 14A5/)(1H A5,1X,O6)PAUSESTOP .pX1np X1op 1qp 1qp X1hX~1np xgG@1,>87cp+2 (Bdb+2

2#p+2
  ,~>attempt to take SQRT of negative argKc1,>8 p3"26+2 3b26+2"+D0K0
2U ,~+D0K02!  ,~ D27 F28@@27%"j"%25)/;`:XD215f2)aF+2).&@(|h&f27 2324 24 2723D25@ 27 28,~!t0_'"S'qf!um.	.#Y% !vyO^	RXC2|t(1,>8 p4@2P @2?,> <2X,2@,^2>,~{e^bC2|p1,>8 p5`2D4@2P+P0K02Y#p3@2S+2R)r. !@2W! n@2W(|h"2S 2T B2W 2T2U2U2W2W2V,~+D0K0
2Q 2V,~  ,~ 0_i/X3 6P'M 5( bB W
R `@x2?ATTEMPT TO TAKE LOG OF NEGATIVE ARGI$P1,>8 #p D F	b&".$&$7@"$  (@. &"* 2o)@
(@ $ &$.$.&(D(F..  #p**,~.$D.&-Jan--Feb--Mar--Apr--May--Jun--Jul--Aug--Sep--Oct--Nov--Dec-!$hX$h@@h*% "2| BhL " BhM+xeX2GiSHYC aSiSHINXGYC GSHiSHaSaSI'IR
IR
 IR
0IR
@IR
PIR
`IR
p[R
[R
[R
 M?L@INXINXINXINXINXI2I2 I20I2@GiSHO1,>8@ p.#p<XB3Q#p %p8XD 3# Ep*" #pXB3@Ap p@
(1D+31D+334.33#d3$FK1d>1D Kp
&3$,~     :
O&

1,>8	`
ZAp[Ap,~U>m61,>8	`

 Ap,~H3/H4gZx3. A=Qi7+ @	` 1pQ0A` 3+@@3/ 4* 3B@,44T3u1T+3J1T)+3_1,44T3OT+3M ."&""`QB3- 4	`+3T 4+4 INX5X+3^	`

&b4&b4`4`3C+3^ 3+?`3.
&4	`5H3NO 3, $,41T+40T*+3F,41T',40T+3F>@@4,40T1T+3l0T1T-+3s4T3s+3u $ 3,,47@4+3s1T+3w4T41T-+3y0T+3u,4+3o!*Lu*
4 J4+3n
&4 
'p
&4"	` $ 4",4+3o@

,40T1T.+41T+31t14+3u(L.,Wh+3ySL4+3yXL4+4,4! >9 @4  2 4#*&8+0@@4 4#*&4,41T+47,414,~1t+4

04 0t-,~4d4.4T=40"d@81T 4,~ 4$	b+ 	`+2ggG>n
65p3/3,5$3C03C<3CCANNOT ENTER TMP FILE!
Command error: 
H4B0BP4iSN
,7 OAp,~I4:1,>8,4} Ap,~444-44YKbN=1,>8O@4Z p4B45,4}4@45949948KbN=1,>8@@4Z!$Lu 	`@Ap``a`+4Wa`+4Y D40A (`4>/"#B4/@@40 !pX@4,,> <4,,4`,^7@4Y+4DOAp+4X #pQ"A` $1@+4I0`=d4F! H: @4.@@4/a|+4O[pd0@ +4T[pd0@ +4T+4R_w6@4Z_w#`1 +4TSpXp @4/
4/+4V@4-+4W+4X
&4Z+4X   Ap ,~ ERROR ON OPEN!
HH4^H4_G.t21,>8@@Ap! A`.!p @4\ 4] @4^@@4^@@4_ & "4\<1D+4k-4v=b4f4\<0D+4tO " 4] @4^4\<-4v=b4m7@4^OAp !p<, 4^, 4_,~<&4o4\1D+4s   Ap+4o1D+4s1$+4p1d+4{0$ 0d-+4p $D4^+4v"5,5&0@+5 p4B5Lad+5`b+5 $0d"+5&$$&(&}Z.G5.&$.$ 7F+5
  ,~ A$&$(DG$1$((D(D

 	`5@5 .2bM+5 L.&7D!$Lu+52"5+5 &p,5 	`,~
&5 <5,

.p M}ILLEGAL DEVICE NUMBER!
"5%,5& 'Q&A` 5%@1x,~180.8X=`5!,~.H  a|+5)0"0b/ ,~0B1B,~0B/ ,~aJMm1,>8,6t+5I@,6,6p+5IZ"6Ep " B` "b5R $7cp $1B $d5R,5K,6=+5J6cp0b "b5S$5 ({."XB`&$@6@.$.$
a|+5B[pdp0B +5F+5D_w#`1"+5F6cp 0d $QD`,6+ ,6{ ,~
&5S+5H
&5V+5H@b -p .Q,A` 
5X4P5Q1P+5Y/0P=n5N,~`

``
CANNOT INIT DISK!

FILE NOT FOUND!
HH . 
5X+5NYC GaSa3 S;YC&<G<aS<a3&<E$;w|x5_ P5Z B`1T!"L	b@XB`O@5z 7

 5z@,6{
+7!,2,6e@!.~,6{`+7	f+6s2FP5]+6 	f+ 1$96+6s 85@`5 7*(5x 7	n@`N+7 6`
 71T 7 B` " B`\"

	b@ B`\"	b!"Z(Brb7	b

 B5{	b
+"`B`!"2	b`b`b+68!"2	b!`2B`+68!$2	d!$Lu+6; 7	b 7 7	d!$Lu B5y D5z,~@@5} 7*(6 B5} D5~ BX B` DXZ5{(D}	d ` D5} DX "2D`b7d  "b7,6{@5|+7 6 BX@@6 7	b$+6M!"6X"X*"X!"`

 6@,6{
+6_!,2,6eB,6{"X

5~ 5~,6{ +6_ JX,6{ +6s
&7 "b7a`+6^+6Ga`+6^,6{ 5|+ +6^ 	x H6n	h	&(2 
P5Z 7$.5{ &..0P`bp+6id

@ 5y,6{+6n`L+6g 5y+6s (!*Lu@

,6{
,~:x,~ " B7

O@5{O@5|g "?$7

+7	d5D6w 7

(D D5{+6s,> e`p+67 5|+7l!5|+77 5{+7l!5{:+@>,^+6s
&7$,~ "
&7&,~ "
&7,,~,7
&74
& ,7	b (74+7
&78,~@;`5z+6

+7[x5`0CMQ Cannot do MPB QUEUE on GALAXY system. (7+7`` `P$` h_P5}

XHXa`,~!"GB`+6^@66$5~
% 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,>86#p0b+8@Ap 8

 $	b2+7q "6@&Z&." p4D7f.$(B{(D{0d+8 B8 D8
 ( & Q&	f2+7H4&7H1(~97E H8	3H8
+7U2(8
+7\.(3(8 8 H8
@@8@@7iS"xZH7i:7i.(3h8
*b7N!$6@8GD7i 8

	d2+7V3h8
+7M 8(F+86@8+7XO@8+7QOApZ7i3b8
+8/"*8	 B8
+7]@Ap 8
:!&@@7i!"x H7i:7iGF7i.(3h8	*b7_ 8

	d2+&3h8	+7^6Ap+8+7UZ	b+"@gp+86@&+7wZ.$1$ $!	d+8 $QD&,8 pZaD $ 8
&8 7ip 
Cannot write-enable high segment data area.
KbN@1,>8,

,~8Y\8Q<X\8*+