50  PRINT "10JUNE74"
60  PRINT "IDA COMMON VARIABLES AS OF 15JAN74"
62  PRINT 
70  PRINT "X      DATA MATRIX"
80  PRINT "       MEANS IN ROW N9+1.  X(N9+1,J) IS MEAN OF COL.J."
90  PRINT "       STD.DEV(S). IN ROW N9+2.  X(N9+2,J) IS STD.DEV. OF COL.J."
100  PRINT "       X(N9+3,I) IS THE NUMBER OF UNDEFINED OBSERVATIONS"
110  PRINT "            AT THE BEGINNING OF COLUMN I (CAUSED BY "
120  PRINT "            LAGGING OR DIFFERENCING OF VARIABLES)."
130  PRINT "       COLUMN K9 : FITTED VALUES FROM CURRENT REGRESSION"
140  PRINT "       COLUMN K9+1:  RESIDUALS FROM CURRENT REGRESSION"
150  PRINT "       COLUMN K9+2:  X(I,K9+2)=1 IF ITH ROW IS 'ACTIVE'"
160  PRINT "                              =0 IF ITH ROW DELETED"
161  PRINT "       X(N9+1,K9+2), X(N9+2,K9+2) NOT USED NOW"
170  PRINT "N,  K  NUMBER OF ROWS AND COLUMNS IN DATA MATRIX"
180  PRINT "N9,K9  MAXIMUM DIMENSION ALLOWED FOR DATA MATRIX."
190  PRINT "       NORMALLY, N9=100, K9-1=19.THESE CAN BE CHANGED"
200  PRINT "       BY THE COMMAND 'RDIM'."
210  PRINT "Q4     INDEX OF FIRST ACTIVE OBSERVATION"
220  PRINT "       Q4 = MAX( X(N9+3,J) +1 ) OVER J=1,2,...,K"
230  PRINT "U      CORRELATION MATRIX OF VARIABLES IN REGRESSION"
240  PRINT "N8,K8  NUMBER OF ROWS AND COLUMNS FOR THE MATRIX OF"
250  PRINT "       INDEPENDENT VARIABLES USED IN REGRESSION"
260  PRINT "M      CORRELATION MATRIX OF ALL VARIABLES FOR ALL ACTIVE"
270  PRINT "       OBSERVATIONS"
280  PRINT "P      INDICATOR VECTOR OF OPTIONS CHOSEN"
290  PRINT "       P(41) TO P(60),INCLUSIVE MAY BE USED FOR TEMPORARY"
300  PRINT "       MEMORY FOR CHAINING BY 'NEWC' PROGRAMMERS."
301  PRINT "       P(1) TO P(40) AND P(61) TO P(78) RESERVED FOR"
302  PRINT "              POSSIBLE IDA PARAMETERS.  CURRENTLY:"
303  PRINT "       P(61)=P(62)=0 IF NO MISSING VALUES DECLARED"
304  PRINT "       P(61)=1 IF MISSING VALUE DECLARED IN 'MISS','ENRA',"
305  PRINT "               OR 'EOBR'"
306  PRINT "       P(62)= NUMBER ASSIGNED TO REPRESENT MISSING VALUES"
307  PRINT "       P(63)=THE NUMBER OF COLUMNS CONSIGNED TO THE SCRATCH"
308  PRINT "             PAD WITH THE COMMAND 'RDIM'.  0 OTHERWISE."
309  PRINT "       P(64)=1,2,...,10 TO INDICATE WHICH KIND OF CRT IS"
310  PRINT "             BEING USED.  IT IS ASSIGNED IN THE COMMAND"
320  PRINT "             'CRTS'.  0 OTHERWISE."
330  PRINT "       P(65)=S, THE VALUE OF THE STARTING CRSP- INDEX MONTH"
340  PRINT "             IF CRSP- DATA HAS BEEN ENTERED.  0 OTHERWISE."
400  PRINT "Q      INDICATOR VECTOR OF TASKS"
410  PRINT "       Q(1)=1 IF DATA HAS BEEN ENTERED. 0 OTHERWISE"
420  PRINT "       Q(2)=1 IF REGRESSION EQUATION HAS BEEN SPECIFIED"
430  PRINT "       Q(3)=1 IF CORR. MATRIX NEEDS UPDATING. 0 OTHERWISE"
440  PRINT "       Q(4)=1 IF REGRESSION NEEDS UPDATING. 0 OTHERWISE"
450  PRINT "       Q(5)=0 TO UPDATE BOTH CORR AND REGR IN $IDA38"
460  PRINT "           =1 TO UPDATE CORR. MATRIX ONLY"
470  PRINT "       Q(6)= ID OF PROGRAM MODULE.  USED IN $IDA38 TO"
480  PRINT "             DETERMINE THE PROGRAM TO CHAIN BACK TO."
490  PRINT "             E.G., IF PRESENT PROGRAM IS $IDA32, THEN Q(6)=32."
500  PRINT "       Q(7)= LINE NUMBER TO CHAIN BACK FROM $IDA38"
510  PRINT "       Q(8) TO Q(19) : TEMPORARY MEMORY FOR CHAINING"
520  PRINT "       Q(20)= NO. OF INDEP. VARS. IN CURRENT REGRESSION"
530  PRINT "V      VARIABLES IN REGRESSION"
540  PRINT "       V(K8+1) = COL. NUMBER OF DEPENDENT VARIABLE"
550  PRINT "       V(1), ..., V(K8) = COL. NUMBERS OF INDEP. VARS."
551  PRINT "       V(20) NOT USED NOW."
560  PRINT "M$     NAMES OF 1ST 10 VARIABLES, 6 SPACES PER NAME"
570  PRINT "N$     NAMES OF REMAINING VARIABLES"
571  PRINT "       N$(67,72) BEING CONSIDERED TO CARRY DATA FILE NAME FOR"
572  PRINT "         NEW COMMAND WHICH REQUIRES SCRATCH FILE."
580  PRINT "Q3     =1  IF USER GAVE NAMES TO VARIABLES.  0 OTHERWISE"
590  PRINT "Q1     CODE NUMBER FOR COMMAND IN SUBPROGRAM"
600  PRINT "Q2     SERIAL NUMBER FOR COMMAND WORD"
610  PRINT "Q5     NOT USED NOW"
620  PRINT "Q7     INITIALIZATION PARAMETER"
630  PRINT "Q9     =1,2, OR 3.  CODE FOR LEVEL OF PROMPT."
640  PRINT "I3,I4  TEMPORARY PARAMETERS"
650  PRINT "U9     NUMBER OF USER-DEFINED COMMAND NAMES.  U9<=5"
660  PRINT "X$     NAMES OF USER-DEFINED COMMANDS, 4 SPACES PER NAME."
9999  END 
