yomcoaphy.F90

Go to the documentation of this file.

MODULE yomcoaphy

USE parkind1  ,ONLY : jpim
USE gridpoint_buffers , ONLY : gridpoint_buffer

IMPLICIT NONE

SAVE

!     -----------------------------------------------------------------
!*    ** *YOEPHY* - SWITCHES RELATED TO DIABATIC PROCESSES
!     -----------------------------------------------------------------

!        * E.C.M.W.F. PHYSICS PACKAGE *

INTEGER(KIND=JPIM) :: nphyint      ! NPHYINT=0 -> Physics and dynamics at the same resolution
                                   ! NPHYINT=1 -> Physics grid coarser than dynamics grid
                                                                   ! NPHYINT=2 -> Physics grid finer than dynamics grid
TYPE(gridpoint_buffer) :: phys_gppbuf
CHARACTER (LEN = 32) ::   cptablefil
CHARACTER (LEN = 256) ::   cptabledir

!$OMP THREADPRIVATE(cptabledir,cptablefil,nphyint,phys_gppbuf)
END MODULE yomcoaphy