Skip to content
Snippets Groups Projects
Commit 8cc0775d authored by WAUTELET Philippe's avatar WAUTELET Philippe
Browse files

Philippe 30/11/2021: minifix: problem with & characters at end of declarations (Cray compiler)

parent 8013a6d1
No related branches found
No related tags found
No related merge requests found
...@@ -84,16 +84,16 @@ CHARACTER(LEN=4), SAVE :: SURF_TYPE ...@@ -84,16 +84,16 @@ CHARACTER(LEN=4), SAVE :: SURF_TYPE
! !
NAMELIST/NAM_PARAM_ECRADn/NSWSOLVER,NLWSOLVER,NRADLP,NRADIP,& NAMELIST/NAM_PARAM_ECRADn/NSWSOLVER,NLWSOLVER,NRADLP,NRADIP,&
NLIQOPT,NICEOPT,NOVLP,NGAS,NREG,XCLOUD_FRAC_STD,& NLIQOPT,NICEOPT,NOVLP,NGAS,NREG,XCLOUD_FRAC_STD,&
NLWSCATTERING, NAERMACC &
#ifndef MNH_ECRAD #ifndef MNH_ECRAD
& NLWSCATTERING, NAERMACC
#else #else
#if ( VER_ECRAD == 140 ) #if ( VER_ECRAD == 140 )
, LSPEC_ALB, LSPEC_EMISS, & NLWSCATTERING, NAERMACC, &
LSPEC_ALB, LSPEC_EMISS, &
! USER_ALB_DIFF, USER_ALB_DIR, USER_EMISS, & ! USER_ALB_DIFF, USER_ALB_DIR, USER_EMISS, &
SURF_TYPE SURF_TYPE
#else #else
& NLWSCATTERING, NAERMACC
#endif #endif
#endif #endif
! !
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment