MODULE YOMWM

USE PARKIND1  ,ONLY : JPRB

IMPLICIT NONE

SAVE

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

!*    CHAMPS PHYSIQUE POUR LES ANIMATIONS
!*    PHYSICAL FIELDS FOR ANIMATIONS

! FTHSOR(NGPTOT)           LONG WAVES RADIATION FLUX AT THE TOP

REAL(KIND=JPRB),ALLOCATABLE:: FTHSOR(:)

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

END MODULE YOMWM
