Changeset 6034 for LMDZ6/trunk/libf/phylmd/dyn1d/scm.f90

Timestamp:

Jan 16, 2026, 11:49:42 AM (6 days ago)

Author:

evignon

Message:

simplehydrol dans le 1d et dans etat0phys_netcdf

File:

• LMDZ6/trunk/libf/phylmd/dyn1d/scm.f90 (modified) (3 diffs)

LMDZ6/trunk/libf/phylmd/dyn1d/scm.f90

@@ -32 +32 @@
    USE pbl_surface_mod, only : ftsoil, pbl_surface_init, &
                                  pbl_surface_final
-   USE fonte_neige_mod, only : fonte_neige_init, fonte_neige_final
+   USE simplehydrol_mod, only : simplehydrol_init, simplehydrol_final
 
    USE infotrac ! new
@@ -561 +561 @@
         type_ocean = "force"
         run_off_lic_0(1) = restart_runoff 
-        call fonte_neige_init(run_off_lic_0)
+        call simplehydrol_init(run_off_lic_0)
 
         fder=0.
@@ -776 +776 @@
           call pbl_surface_final( fder, snsrf, qsurfsrf, tsoil)
         print*,'after surf final'
-          CALL fonte_neige_final(run_off_lic_0)
+          CALL simplehydrol_final(run_off_lic_0)
         endif