| 326 | * In tag 196, when IMPOSE_VEG is activated veget is not calculated by the subroutine slowproc_veget. So as we have veget=veget_max, no fraction of bare soil is calculated. |
| 327 | * In trunk (rev [947]), veget(:,1) is replaced by tot_frac_bare and slowproc_veget is called whatever the case. So a fraction is always calculated even in IMPOSE_VEG. This modification implies a modification of the value of z0 (and albedo). To have the same results, a call to slowproc_veget should be added in the tag version of slowproc : |
| 328 | {{{ |
| 329 | ! |
| 330 | !Config Key = SLOWPROC_HEIGHT |
| 331 | !Config Desc = Height for all vegetation types |
| 332 | !Config Def = 0., 30., 30., 20., 20., 20., 15., 15., 15., .5, .6, 1.0, 1.0 |
| 333 | !Config If = OK_SECHIBA |
| 334 | !Config Help = The height used in the 0dim mode. The values should be found |
| 335 | !Config in the restart file. The new values of height will be computed anyway |
| 336 | !Config at the end of the current day. The need for this variable is caused |
| 337 | !Config by the fact that the model may stop during a day and thus we have not |
| 338 | !Config yet been through the routines which compute the new surface conditions. |
| 339 | !Config Units = [m] |
| 340 | ! |
| 341 | CALL setvar_p (height, val_exp, 'SLOWPROC_HEIGHT', height_presc) |
| 342 | |
| 343 | CALL slowproc_veget (kjpindex, lai, frac_nobio, veget_max, veget) |
| 344 | |
| 345 | ELSE |
| 346 | }}} |
| 347 | This line lets ORCHIDEE to calculate a fraction of bare soil even in IMPOSE_VEG. |