Changes between Version 13 and Version 14 of DevelopmentActivities/MergeHydro/Martial_notes_on_merge

Timestamp:

2011-10-24T09:02:08+02:00 (13 years ago)

Author:

mmaipsl

Comment:

--

DevelopmentActivities/MergeHydro/Martial_notes_on_merge

@@ -168 +168 @@
 }}}
   On aurait pu le définir dans intsurf_config, non ?
+
+== merge de slowproc ==
+ * à vérifier avec les autres driver : déplacement/redéfinition de diaglev + validation stomate activé
+ * ancien bug toujours présent dans la version LMD dans la définition des soiltiles :
+{{{
+          ! Soiltiles are only used in hydrol, but we fix them in here because some time it might depend
+          ! on a changing vegetation (but then some adaptation should be made to hydrol) and be also used
+          ! in the other modules to perform separated energy balances
+          njsc(:) = 0
+          soiltile(:,:) = zero
+          DO ji = 1, kjpindex
+             njsc(ji) = MAXLOC(soilclass(ji,:),1)
+             soiltile(:,1) = SUM(frac_nobio(ji,:))
+          ENDDO
+          DO jv = 1, nvm
+             jst = pref_soil_veg(jv)
+             DO ji = 1, kjpindex
+                soiltile(ji,jst) = soiltile(ji,jst) + veget(ji,jv)
+             ENDDO
+          ENDDO
+}}}
+   On prend alors ici toujours le frac_nobio du dernier point. Le code corrigé est :
+{{{
+          ! Soiltiles are only used in hydrol, but we fix them in here because some time it might depend
+          ! on a changing vegetation (but then some adaptation should be made to hydrol) and be also used
+          ! in the other modules to perform separated energy balances
+          njsc(:) = 0
+          soiltile(:,:) = zero
+          DO ji = 1, kjpindex
+             njsc(ji) = MAXLOC(soilclass(ji,:),1)
+             soiltile(ji,1) = SUM(frac_nobio(ji,:))
+          ENDDO
+          DO jv = 1, nvm
+             jst = pref_soil_veg(jv)
+             DO ji = 1, kjpindex
+                soiltile(ji,jst) = soiltile(ji,jst) + veget(ji,jv)
+             ENDDO
+          ENDDO
+}}}
+}}}