208 |
_RL hl (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
_RL hl (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
209 |
#endif |
#endif |
210 |
|
|
|
#ifdef ALLOW_BULKFORMULAE |
|
211 |
common /exfl_wind_r/ us, cw, sw, sh |
common /exfl_wind_r/ us, cw, sw, sh |
212 |
_RL us (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
_RL us (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
213 |
_RL cw (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
_RL cw (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
214 |
_RL sw (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
_RL sw (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
215 |
_RL sh (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
_RL sh (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |
|
#endif |
|
216 |
|
|
217 |
#if defined(ALLOW_ATM_TEMP) || defined(SHORTWAVE_HEATING) |
#if defined(ALLOW_ATM_TEMP) || defined(SHORTWAVE_HEATING) |
218 |
common /exf_swflux_r/ swflux |
common /exf_swflux_r/ swflux |