yoedbug.F90

Go to the documentation of this file.

MODULE yoedbug

USE parkind1  ,ONLY : jpim     ,jprb

IMPLICIT NONE

SAVE

!     -------------------------------------------------
!*    ** *YOEDBUG* - CONTROL OPTIONS FOR DEBUGGING HELP
!     -------------------------------------------------
INTEGER(KIND=JPIM) :: kstpdbg(3)
!     ------------------------------------------------------------------

!$OMP THREADPRIVATE(kstpdbg)

END MODULE yoedbug