Changeset 91 for branches/iLoveclim/SOURCES/3D-physique-gen_mod.f90

Timestamp:

10/28/16 09:11:13 (8 years ago)

Author:

aquiquet

Message:

GRISLI coupled using basal melting rates coming from CLIO. Might need further testing for LGM conditions.

File:

• branches/iLoveclim/SOURCES/3D-physique-gen_mod.f90 (modified) (1 diff)

branches/iLoveclim/SOURCES/3D-physique-gen_mod.f90

@@ -253 +253 @@
   real (kind = 8),dimension(nx,ny) :: calvingGRIS
   real (kind = 8),dimension(nx,ny),target :: calvin_GRIS ! calving flux[m3/s] given to CLIO
+  real (kind = 8),dimension(nx,ny,20),target :: bmshelfCLIO  ! basal melting given by CLIO  
   real, dimension(nx,ny) :: coef_drag   !< coefficient de la loi de friction non lineaire : depend de la valeur de alpha_drag
                                         !< si alpha_drag = 1, coef_drag = drag_centre