Skip to content
Snippets Groups Projects
Commit bd44ba73 authored by RIETTE Sébastien's avatar RIETTE Sébastien
Browse files

Merge branch 'riette_bf2_OCND2' into riette_bf_OCND2

parents 02ef786b 8956c549
No related branches found
No related tags found
No related merge requests found
...@@ -363,6 +363,16 @@ IF(LLDEFAULTVAL) THEN ...@@ -363,6 +363,16 @@ IF(LLDEFAULTVAL) THEN
XFRMIN_NAM(26:38)=0. XFRMIN_NAM(26:38)=0.
XFRMIN_NAM(39)=0.25 XFRMIN_NAM(39)=0.25
XFRMIN_NAM(40)=0.15 XFRMIN_NAM(40)=0.15
#ifdef REPRO48
!In the original version, these array was filled in suparar. suparar is in a part of the model compiled without
!defining implicit kind for reals whereas the current module is in phyex where the compilation options
!set implicit kind for reals to 8 bytes.
!
!Only these 3 values must be set in simple precision to reproduce the old results. Why?
XFRMIN_NAM(13) =1.0E-15_4
XFRMIN_NAM(15) =1.0E-4_4
XFRMIN_NAM(40)=0.15_4
#endif
IF(HPROGRAM=='AROME') THEN IF(HPROGRAM=='AROME') THEN
LCONVHG=.TRUE. LCONVHG=.TRUE.
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment