Changeset 187 for branches/iLoveclim/SOURCES/Netcdf-routines

Timestamp:

03/15/18 14:18:24 (6 years ago)

Author:

aquiquet

Message:

Grisli-iloveclim branch merged to trunk at revision 185

Location:

branches/iLoveclim

Files:

• . (modified) (1 prop)
• SOURCES/Netcdf-routines/Description_Variables.dat (modified) (2 diffs)
• SOURCES/Netcdf-routines/sortie_netcdf_GRISLI_mod.0.2-hassine.f90 (modified) (1 diff)

branches/iLoveclim/SOURCES/Netcdf-routines/Description_Variables.dat

@@ -550 +550 @@
 "xxx"           
 "flux eau selon y ^"
+------------------------------------------------------
+"flot_marais"
+67      "marais"                2
+"o"     
+"xxx"   
+"xxx"   
+"xxx"           
+"points flottants cernes par des points poses"
 ------------------------------------------------------
 "xxx"
@@ -1280 +1288 @@
 "Height above buoyency "           !~  description
 ------------------------------------------------------
+"back_force_x"                     ! nom de la variable
+164     back_x      4        ! number, name in grisli, class
+">"                                ! node type : "o" ,"^", ">"
+""                                 !~  long name
+""                                 !~  standard name
+"-"                                !~  unit
+"ice shelf back force x"           !~  description
+------------------------------------------------------
+"back_force_y"                     ! nom de la variable
+165     back_y      4        ! number, name in grisli, class
+"^"                                ! node type : "o" ,"^", ">"
+""                                 !~  long name
+""                                 !~  standard name
+"-"                                !~  unit
+"ice shelf back force y"           !~  description
+------------------------------------------------------
+"phi_schoof_x"                     ! nom de la variable
+166     schoof_x      4        ! number, name in grisli, class
+">"                                ! node type : "o" ,"^", ">"
+""                                 !~  long name
+""                                 !~  standard name
+"-"                                !~  unit
+"ice flux schoof x"           !~  description
+------------------------------------------------------
+"phi_schoof_y"                     ! nom de la variable
+167     schoof_y      4        ! number, name in grisli, class
+"^"                                ! node type : "o" ,"^", ">"
+""                                 !~  long name
+""                                 !~  standard name
+"-"                                !~  unit
+"ice flux schoof y"           !~  description
+------------------------------------------------------
+"tacheg"                      ! nom de la variable
+221     tacheg         5      ! number, name in grisli, class
+"o"                                ! node type : "o" ,"^", ">"
+"xxx"                              !~  long name
+"xxx"                              !~  standard name
+"xxx"                              !~  unit
+"Numero taches glace"             !~  description
+------------------------------------------------------  
+"tachem"                      ! nom de la variable
+222     tachem         5      ! number, name in grisli, class
+"o"                                ! node type : "o" ,"^", ">"
+"xxx"                              !~  long name
+"xxx"                              !~  standard name
+"xxx"                              !~  unit
+"Numero taches marais"             !~  description
+------------------------------------------------------  
 "xxx"                              ! nom de la variable
 182     stress_x         4         ! number, name in grisli, class

branches/iLoveclim/SOURCES/Netcdf-routines/sortie_netcdf_GRISLI_mod.0.2-hassine.f90

@@ -935 +935 @@
                 if (itab.eq.66) then 
                    tab(:,:) = phiwy(:,:)
+                end if
+                if (itab.eq.67) then
+                   where (flot_marais(:,:))
+                      tab(:,:)=1
+                   elsewhere
+                      tab(:,:)=0
+                   end where
                 end if
                 if (itab.eq.68) then