273 |
endif |
endif |
274 |
ccanopy = co2_ppm |
ccanopy = co2_ppm |
275 |
|
|
276 |
CALL interfsurf_hq(itime, dtime, jour, rmu0, klon, iim, jjm, & |
CALL interfsurf_hq(itime, dtime, jour, rmu0, iim, jjm, & |
277 |
nisurf, knon, knindex, pctsrf, rlat, debut, & |
nisurf, knon, knindex, pctsrf, rlat, debut, & |
278 |
ok_veget, soil_model, nsoilmx, tsoil, qsol, u1lay, v1lay, & |
ok_veget, soil_model, nsoilmx, tsoil, qsol, u1lay, v1lay, & |
279 |
temp_air, spechum, tq_cdrag, petAcoef, peqAcoef, & |
temp_air, spechum, tq_cdrag, petAcoef, peqAcoef, & |