--- trunk/phylmd/clesphys2.f	2014/07/02 18:39:15	99
+++ trunk/phylmd/clesphys2.f	2014/12/18 17:30:24	118
@@ -5,8 +5,8 @@
   implicit none
 
   LOGICAL:: cycle_diurne = .TRUE.
-  ! Cette option permet d'éteindre le cycle diurne.
-  ! Peut être utile pour accélérer le code.
+  ! Cette option permet d'éteindre le cycle diurne. Peut être utile
+  ! pour accélérer le code.
 
   LOGICAL:: soil_model = .TRUE.
   ! Choix du modele de sol (Thermique ?)
@@ -38,15 +38,15 @@
     use unit_nml_m, only: unit_nml
     use nr_util, only: assert
 
-    namelist /clesphys2_nml/cycle_diurne, soil_model, new_oliq, &
-         ok_orodr, ok_orolf, ok_limitvrai, nbapp_rad, iflag_con
+    namelist /clesphys2_nml/cycle_diurne, soil_model, new_oliq, ok_orodr, &
+         ok_orolf, ok_limitvrai, nbapp_rad, iflag_con
 
     !------------------------------------
 
     print *, "Enter namelist 'clesphys2_nml'."
     read(unit=*, nml=clesphys2_nml)
     write(unit_nml, nml=clesphys2_nml)
-    call assert(iflag_con >= 2, "read_clesphys2 iflag_con")
+    call assert(iflag_con >= 2 .and. iflag_con <= 4, "read_clesphys2 iflag_con")
 
   end subroutine read_clesphys2