122 | | C'était bien un bogue de la version LMD. |
| 122 | C'était bien un bogue de la version LMD. [[BR]] |
| 123 | Voici les corrections que l'on a appliqué pour rendre le modèle conservatif : |
| 124 | {{{ |
| 125 | precisol(:,1)=veget_max(:,1)*precip_rain(:) |
| 126 | DO jv=2,nvm |
| 127 | DO ji = 1, kjpindex |
| 128 | zqsintvegnew(ji,jv) = MIN (qsintveg(ji,jv),qsintmax(ji,jv)) |
| 129 | IF ( ok_throughfall_by_pft ) THEN |
| 130 | ! correction throughfall Nathalie - Juin 2006 |
| 131 | precisol(ji,jv) = (veget(ji,jv)*throughfall_by_pft(jv)*precip_rain(ji)) + & |
| 132 | qsintveg(ji,jv) - zqsintvegnew (ji,jv) + & |
| 133 | (veget_max(ji,jv) - veget(ji,jv))*precip_rain(ji) |
| 134 | ELSE |
| 135 | precisol(ji,jv) = qsintveg(ji,jv) - zqsintvegnew (ji,jv) + & |
| 136 | (veget_max(ji,jv) - veget(ji,jv))*precip_rain(ji) |
| 137 | ENDIF |
| 138 | ENDDO |
| 139 | END DO |
| 140 | [...] |
| 141 | DO jv=2,nvm |
| 142 | qsintveg(:,jv) = zqsintvegnew (:,jv) |
| 143 | END DO |
| 144 | }}} |
| 145 | On ne fait donc plus aucun calcul de l'interception pour le PFT 1. On prends bien en compte le precip_rain sur les surface fracnobio dans hydrol_snow. |
| 146 | |