Skip to content
Snippets Groups Projects
Commit ef34a317 authored by Juan Escobar's avatar Juan Escobar
Browse files

Juan 5/10/2018:ini_cst.f90, for real*4 ,higher value for XEPS_DT = 1.5e-4

parent 0c0a21a9
No related branches found
No related tags found
No related merge requests found
......@@ -63,6 +63,7 @@ END MODULE MODI_INI_CST
!! J. Escobar 28/03/2014 for pb with emissivity/aerosol reset XMNH_TINY=1.0e-80 in real8 case
!! J.Escobar : 10/2017 : for real*4 , add XMNH_HUGE_12_LOG
!! Philippe Wautelet: 05/2016-04/2018: new data structures and calls for I/O
!! J.Escobar : 5/10/2018 : for real*4 ,higher value for XEPS_DT = 1.5e-4
!!
!-------------------------------------------------------------------------------
!
......@@ -166,7 +167,7 @@ XRES_OTHER = 1.0e-9
XRES_PREP = 1.0e-8
#else
XMNH_TINY = TINY (XMNH_TINY )
XEPS_DT = 1.0e-4
XEPS_DT = 1.5e-4
XRES_FLAT_CART = 1.0e-12
XRES_OTHER = 1.0e-7
XRES_PREP = 1.0e-4
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment