yomcoaphy.F90 Source File


This file depends on

sourcefile~~yomcoaphy.f90~~EfferentGraph sourcefile~yomcoaphy.f90 yomcoaphy.F90 sourcefile~parkind1.f90 parkind1.F90 sourcefile~yomcoaphy.f90->sourcefile~parkind1.f90 sourcefile~gridpoint_buffers.f90 gridpoint_buffers.F90 sourcefile~yomcoaphy.f90->sourcefile~gridpoint_buffers.f90 sourcefile~gridpoint_buffers.f90->sourcefile~parkind1.f90 sourcefile~yomgem.f90 yomgem.F90 sourcefile~gridpoint_buffers.f90->sourcefile~yomgem.f90 sourcefile~yomlun.f90 yomlun.F90 sourcefile~gridpoint_buffers.f90->sourcefile~yomlun.f90 sourcefile~yomct0.f90 yomct0.F90 sourcefile~gridpoint_buffers.f90->sourcefile~yomct0.f90 sourcefile~yomhook_dummy.f90 yomhook_dummy.F90 sourcefile~gridpoint_buffers.f90->sourcefile~yomhook_dummy.f90 sourcefile~yomgem.f90->sourcefile~parkind1.f90 sourcefile~yomlun.f90->sourcefile~parkind1.f90 sourcefile~yomlun_ifsaux.f90 yomlun_ifsaux.F90 sourcefile~yomlun.f90->sourcefile~yomlun_ifsaux.f90 sourcefile~yomct0.f90->sourcefile~parkind1.f90 sourcefile~yomlun_ifsaux.f90->sourcefile~parkind1.f90

Files dependent on this one

sourcefile~~yomcoaphy.f90~~AfferentGraph sourcefile~yomcoaphy.f90 yomcoaphy.F90 sourcefile~suphec.f90 suphec.F90 sourcefile~suphec.f90->sourcefile~yomcoaphy.f90 sourcefile~suphec.f90~2 suphec.F90 sourcefile~suphec.f90~2->sourcefile~yomcoaphy.f90

Contents

Source Code


Source Code

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