--- trunk/phylmd/Interface_surf/interface_surf.f 2014/03/05 14:57:53 82 +++ trunk/Sources/phylmd/Interface_surf/interface_surf.f 2017/03/30 14:25:18 217 @@ -5,13 +5,6 @@ IMPLICIT none - ! run_off ruissellement total - REAL, ALLOCATABLE, DIMENSION(:), SAVE :: run_off, run_off_lic - real, allocatable, dimension(:), save :: coastalflow, riverflow - - REAL, ALLOCATABLE, DIMENSION(:, :), SAVE :: tmp_rriv, tmp_rcoa, tmp_rlic - ! pour simuler la fonte des glaciers antarctiques - REAL, save :: tau_calv ! temps de relaxation pour la fonte des glaciers, en jours