Google
 

Trailing-Edge - PDP-10 Archives - decus_20tap1_198111 - decus/20-0020/descrb.tuk
There are 2 other files named descrb.tuk in the archive. Click here to see a list.
10' NAME--DESCRB
20'
30' DESCRIPTION--WORKING COMMENTS FOR PROGRAM "LINPRO"
40'
50' SOURCE--REVISED 3/25/68 BY D. DOWNES
60'
70' THIS PROGRAM WAS WRITTEN FOR STUDENT USE AT AMOS TUCK SCHOOL
72' OF HANOVER, N.H., WHICH DOES NOT ASSUME RESPONSIBILITY
74' FOR ITS ACCURACY.
80'
85' * * * * * * * * * * * * MAIN PROGRAM * * * * * * * * * * * 
90'
100   THESE INSTRUCTIONS ARE FOR 'LINPRO***'.
110   
120   
130   LINPRO*** USES THE TWO-PHASE SIMPLEX METHOD.
140   
150   
160   ENTER DATA STARTING AT LINE 10000:
170   
180   HOWEVER, FIRST - ARRANGE YOUR CONSTRAINTS SO THAT THE
190   'LESS THAN' INEQUALITIES PRECEDE THE STRICT EQUALITIES,
200   WHICH, IN TURN, PRECEDE THE 'GREATER THAN' INEQUALITIES.
210   
220   THEN - TYPE IN AS DATA THE COEFFICIENTS OF THE
230   CONSTRAINTS, ROW BY ROW.
240   DO NOT INCLUDE COEFFICIENTS FOR SLACK, SURPLUS,
250   OR ARTIFICIAL VARIABLES.
260   
270   NEXT - TYPE IN AS DATA THE 'B' VECTOR (THE CONSTANTS,
280   OR RIGHT-HAND SIDES OF THE CONSTRAINTS) IN THE SAME ORDER
290   AS THE ROWS WERE TYPED ABOVE.
300   THESE VALUES MUST BE NON-NEGATIVE.
310   
320   FINALLY - TYPE IN AS DATA THE COEFFICIENTS OF THE
330   OBJECTIVE FUNCTION.
340    
350   
360   AT RUN TIME YOU WILL BE ASKED TO:
370   
380   INPUT WHETHER YOU ARE MAXIMIZING THE OBJECTIVE FUNCTION
390   (AS YOU PUT IT IN DATA), OR MINIMIZING IT.
400   
410   INPUT THE NUMBER OF CONSTRAINTS AND VARIABLES IN YOUR PROGRAM,
420   RESPECTIVELY.
430   
440   INPUT THE NUMBER OF 'LESS THAN' INEQUALITIES, STRICT
450   EQUALITIES, AND 'GREATER THAN' INEQUALITIES - IN THAT ORDER.
460   
470   
480   REMEMBER TO ALWAYS TYPE ZEROS WHEN APPLICABLE...
490   
500   
510   OUTPUT INCLUDES THE FOLLOWING ELIMINATABLE FEATURES:
520   
530   THE INITIAL TABLEAU             -- LINE 860
540   THE FINAL TABLEAU               -- LINE 1550
550   THE BASIS BEFORE EACH ITERATION -- LINE 910
560   
570   IF YOU DO NOT WANT ANY OF THESE FEATURES,
580   ELIMINATE THE INDICATED LINE - BEFORE RUN TIME.