Skip to content
Snippets Groups Projects
Commit 3083088f authored by Gaelle Tanguy's avatar Gaelle Tanguy Committed by WAUTELET Philippe
Browse files

Gaelle 22/03/2016 : coquille

parent 8380c2dd
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
src/SURFEX/ch_init_snapn.F90
+ 0
− 1
View file @ 3083088f
......@@ -139,7 +139,6 @@ DO JSPEC = 1,NEMIS_NBR ! Loop on the number of species
!
! Read the temporal profiles of all snaps
YRECFM = "E_"//TRIM(CEMIS_NAME(JSPEC))//"_M"
YRECFM = 'ICE_STO'
CALL READ_SURF_FIELD2D(HPROGRAM,XSNAP_MONTHLY(:,:,JSPEC),YRECFM,YCOMMENT,HDIR='-')
YRECFM = "E_"//TRIM(CEMIS_NAME(JSPEC))//"_D"
CALL READ_SURF_FIELD2D(HPROGRAM,XSNAP_DAILY(:,:,JSPEC),YRECFM,YCOMMENT,HDIR='-')
......
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