APFELM/FP=APFELM,CHAOS3,CHAOS4,YESNO,[1,5]PROF77/LB
/
;
;CLUSTER SCHEME :
;
CLSTR=PROF77,CGLFPU,POSRES,RMSRES:RO
;
;TASK NAME :
;
TASK   = APFELM
;
;LENGTH OF LUN-TABLE;CHOOSE HIGHEST LUN IN DECIMAL :
;
UNITS  = 20	
;
;GLOBAL DEFINITIONS IN OCTAL :
;
GBLDEF = TT$EFN:1		;TERMINAL I/O.
GBLDEF = MS$LUN:10		;MESSAGE LUN.
GBLDEF = WC$LUN:0
GBLDEF = HL$LUN:0
GBLDEF = MN$LUN:0
GBLDEF = TT$LUN:5		;TERMINAL LUN.
GBLDEF = G$LUN:7		;GRAPHIC LUN.
GBLDEF = G$EFN:7		;GRAPHIC I/O.
GBLDEF = MB$LUN:0
;
;ASSIGNMENTS IN DECIMAL :
;
ASG    = TI:5			;DEFINE TT$LUN.
ASG    = TT2:12			;FOR ODT.
ASG    = TT1:7			;USE 7 FOR GRAPHIC.
;
//
