150 |
& ' /* minimum stability parameter [?] */') |
& ' /* minimum stability parameter [?] */') |
151 |
CALL WRITE_0D_R8( psim_fac, INDEX_NONE, 'psim_fac =', |
CALL WRITE_0D_R8( psim_fac, INDEX_NONE, 'psim_fac =', |
152 |
& ' /* coef used in turbulent fluxes calculation [-] */') |
& ' /* coef used in turbulent fluxes calculation [-] */') |
153 |
CALL WRITE_0D_R8( hu, INDEX_NONE, 'zref =', |
CALL WRITE_0D_R8( zref, INDEX_NONE, 'zref =', |
154 |
& ' /* reference height [ m ] */') |
& ' /* reference height [ m ] */') |
155 |
CALL WRITE_0D_R8( hu, INDEX_NONE, 'hu =', |
CALL WRITE_0D_R8( hu, INDEX_NONE, 'hu =', |
156 |
& ' /* height of mean wind [ m ] */') |
& ' /* height of mean wind [ m ] */') |
157 |
CALL WRITE_0D_R8( hu, INDEX_NONE, 'ht =', |
CALL WRITE_0D_R8( ht, INDEX_NONE, 'ht =', |
158 |
& ' /* height of mean temperature [ m ] */') |
& ' /* height of mean temperature [ m ] */') |
159 |
CALL WRITE_0D_R8( hu, INDEX_NONE, 'hq =', |
CALL WRITE_0D_R8( hq, INDEX_NONE, 'hq =', |
160 |
& ' /* height of mean spec.humidity [ m ] */') |
& ' /* height of mean spec.humidity [ m ] */') |
161 |
CALL WRITE_0D_R8( umin, INDEX_NONE, 'uMin =', |
CALL WRITE_0D_R8( umin, INDEX_NONE, 'uMin =', |
162 |
& ' /* minimum wind speed [m/s] */') |
& ' /* minimum wind speed [m/s] */') |
167 |
& ' /* drag coefficient over sea-ice (fixed) [-] */') |
& ' /* drag coefficient over sea-ice (fixed) [-] */') |
168 |
CALL WRITE_0D_R8( exf_iceCe, INDEX_NONE, 'exf_iceCe =', |
CALL WRITE_0D_R8( exf_iceCe, INDEX_NONE, 'exf_iceCe =', |
169 |
& ' /* transfert coeff. over sea-ice, for Evap (fixed) [-] */') |
& ' /* transfert coeff. over sea-ice, for Evap (fixed) [-] */') |
170 |
CALL WRITE_0D_R8( exf_iceCe, INDEX_NONE, 'exf_iceCh =', |
CALL WRITE_0D_R8( exf_iceCh, INDEX_NONE, 'exf_iceCh =', |
171 |
& ' /* transfert coeff. over sea-ice, Sens.Heat.(fixed)[-] */') |
& ' /* transfert coeff. over sea-ice, Sens.Heat.(fixed)[-] */') |
172 |
CALL WRITE_0D_R8( exf_albedo, INDEX_NONE, 'exf_albedo =', |
CALL WRITE_0D_R8( exf_albedo, INDEX_NONE, 'exf_albedo =', |
173 |
& ' /* Sea-water albedo [-] */') |
& ' /* Sea-water albedo [-] */') |