yomlun_ifsaux.F90

Go to the documentation of this file.

MODULE yomlun_ifsaux

USE parkind1  ,ONLY : jpim

IMPLICIT NONE

SAVE

!     ------------------------------------------------------------------

!*    Logical units used by code

!     NULOUT :   output unit
!     NULERR :   unit number for comparison with reference run

INTEGER(KIND=JPIM) :: nulout = 6
INTEGER(KIND=JPIM) :: nulerr = 0

!     ------------------------------------------------------------------
!$OMP THREADPRIVATE(nulerr,nulout)
END MODULE yomlun_ifsaux