5.3. FILDEF, File Definitions

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