Module fildef defines the various file unit numbers. Typically, the only information important for the user is that NUT8 is the Autodyn log file, in case the user wishes to write something to the log file.
MODULE fildef USE kindef IMPLICIT NONE SAVE INTEGER, PARAMETER :: LIMUNT=3 INTEGER, PARAMETER :: NUT1=31, NUT2=32, NUT3=33, NUT4=34, NUT5=35 INTEGER, PARAMETER :: NUT6=36, NUT7=37, NUT8=38, NUT9=39,NUT10=40 INTEGER, PARAMETER ::NUT11=41,NUT12=42,NUT13=43,NUT14=44,NUT15=45 INTEGER, PARAMETER ::NUT16=46,NUT17=47,NUT18=48,NUT19=49,NUT20=50 INTEGER, PARAMETER ::NUT21=51, NUT22=52 INTEGER, PARAMETER :: NOLD=0,NNEW=1,NAPP=2,NUNF=0 ! UNFORMATTED FILE FORMATS ! NUNF = 0 DEFAULTS TO 'BIG ENDIAN' ! NULND = -1 'LITTLE_ENDIAN' ! NUCRY = -2 'CRAY' ! NUFDX = -3 'FDX' ! NUFGX = -4 'FGX' ! NUIBM = -5 'IBM' ! NUVXD = -6 'VAXD' ! NUVXG = -7 'VAXG' ! NUNAT = -8 'NATIVE' INTEGER, PARAMETER :: NULND=-1,NUCRY=-2,NUFDX=-3,NUFGX=-4 INTEGER, PARAMETER :: NUIBM=-5,NUVXD=-6,NUVXG=-7,NUNAT=-8 INTEGER, PARAMETER :: NFOR=1,NUNK=2,NSEQ=0,NDIR=1 INTEGER (INT4) :: IFBINI, IFBINO, LOGFILE, NUNIT, IRDOLY CHARACTER (LEN=4), PARAMETER :: ADHLP1 = 'AD21', ADHLP2 = 'AD22' CHARACTER (LEN=9), PARAMETER :: FNEW='unknown',FOLD='old',FAPP='append' CHARACTER (LEN=1) :: SLASH CHARACTER (LEN=3) :: FEXT CHARACTER (LEN=256):: FNID CHARACTER (LEN=6) :: IOUNIT CHARACTER (LEN=10) :: FNREST, FNHIST, FNPRNT = 'PRT', WRITESW CHARACTER (LEN=80) :: FDPLOT, FDREST, FDHIST, FDPRNT, FDSLID CHARACTER (LEN=80) :: FDHELP, FDMTRL, FDMCRO, FDTEMP, FDBIN CHARACTER (LEN=256) :: FNAME, FDUMMY,FDADI, FNUNIT END MODULE fildef