Skip to content
Snippets Groups Projects
Commit 39981cb4 authored by ESCOBAR MUNOZ Juan's avatar ESCOBAR MUNOZ Juan Committed by WAUTELET Philippe
Browse files

Juan 13/03/2014: missing YDIR=XY in 1.6 for tendencies fields

parent a4b274f6
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 3 additions and 0 deletions
src/MNH/write_lfin.f90
+ 3
− 0
View file @ 39981cb4
...@@ -153,6 +153,7 @@ END MODULE MODI_WRITE_LFIFM_n ...@@ -153,6 +153,7 @@ END MODULE MODI_WRITE_LFIFM_n
!! AEROSOLS and ozone vertical distribution are also written !! AEROSOLS and ozone vertical distribution are also written
!! M.Tomasini 06/12 2D west african monsoon: nesting for ADV forcing writing !! M.Tomasini 06/12 2D west african monsoon: nesting for ADV forcing writing
!! Pialat/Tulet 15/02/2012 add ForeFire variables !! Pialat/Tulet 15/02/2012 add ForeFire variables
!! J. Escobar Mars 2014 , missing YDIR="XY" in 1.6 for tendencies fields
!! !!
!------------------------------------------------------------------------------- !-------------------------------------------------------------------------------
! !
...@@ -1725,6 +1726,8 @@ CALL FMWRIT(HFMFILE,YRECFM,CLUOUT,YDIR,XEXNTOP,IGRID,ILENCH,YCOMMENT,IRESP) ...@@ -1725,6 +1726,8 @@ CALL FMWRIT(HFMFILE,YRECFM,CLUOUT,YDIR,XEXNTOP,IGRID,ILENCH,YCOMMENT,IRESP)
!* 1.6 Tendencies !* 1.6 Tendencies
! !
IF (CPROGRAM == 'MESONH') THEN IF (CPROGRAM == 'MESONH') THEN
YDIR='XY'
YRECFM='US_PRES' YRECFM='US_PRES'
YCOMMENT='X_Y_Z_US_PRES' YCOMMENT='X_Y_Z_US_PRES'
IGRID=2 IGRID=2
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment

Documentation | Mentions légales | CGU | Accessibilité : non conforme