C..      DATAMAINS.FTN   BOHDEN K. CMAYLO  DEC 1981
C..
C..   MAIN PROGRAM FOR DATAENTRY
C..
C.. LONG VERSION = (5,999) WORDS AND (5000) BYTES
C.. SHORT VERSION = (5,99) WORDS AND (1000) BYTES
C..
	BYTE INPUT,MARRAY
	COMMON/IOCOM/INCR,IPR,IEOF,INPUT(512),INARR(5,99)
	COMMON/XMAXID/MAXIDX
	COMMON/XIOCOM/MARRAX,MARRAY(1000)
	DATA MARRAX,MAXIDX/1000,99/
C..
C..    CALL PROGRAM WITH MAX PARAMETERS
C.
	CALL DATAEN
	CALL EXIT
	END