LMDZ
yomjfh.F90
Go to the documentation of this file.
1 MODULE yomjfh
2 
3 USE parkind1 ,ONLY : jpim ,jprb
4 
5 IMPLICIT NONE
6 
7 SAVE
8 
9 ! ------------------------------------------------------------
10 
11 INTEGER(KIND=JPIM) :: n_vmass=0
12 
13 ! -----------------------------------------------------------------
14 
15 !$OMP THREADPRIVATE(n_vmass)
16 END MODULE yomjfh
integer(kind=jpim) n_vmass
Definition: yomjfh.F90:11
integer, parameter jprb
Definition: parkind1.F90:31
integer, parameter jpim
Definition: parkind1.F90:13
Definition: yomjfh.F90:1