|
| real function | mode_sfcflx::sfcflx_lwradatm (T_a, e_a, cl_tot, cl_low) |
| |
| real function | mode_sfcflx::sfcflx_lwradwsfc (emis, pts) |
| |
| subroutine | mode_sfcflx::sfcflx_momsenlat (height_u, height_tq, fetch, U_a, T_a, q_a, T_s, P_a, h_ice, Q_momentum, Q_sensible, Q_latent, Q_watvap, Ri, z0u_ini, z0t_ini, Qsat_out, Q_latenti, Q_sublim) |
| |
| real function | mode_sfcflx::sfcflx_rhoair (T, q, P) |
| |
| subroutine | mode_sfcflx::sfcflx_roughness (fetch, U_a, u_star, h_ice, c_z0u_fetch, u_star_thresh, z0u, z0t, z0q) |
| |
| real function | mode_sfcflx::sfcflx_satwvpres (T, h_ice) |
| |
| real function | mode_sfcflx::sfcflx_spechum (wvpres, P) |
| |
| real function | mode_sfcflx::sfcflx_wvpreswetbulb (T_dry, T_wetbulb, satwvpres_bulb, P) |
| |
|
| real, parameter | mode_sfcflx::c_karman = 0.40 |
| |
| real, parameter | mode_sfcflx::pr_neutral = 1.0 |
| |
| real, parameter | mode_sfcflx::sc_neutral = 1.0 |
| |
| real, parameter | mode_sfcflx::c_mo_u_stab = 5.0 |
| |
| real, parameter | mode_sfcflx::c_mo_t_stab = 5.0 |
| |
| real, parameter | mode_sfcflx::c_mo_q_stab = 5.0 |
| |
| real, parameter | mode_sfcflx::c_mo_u_conv = 15.0 |
| |
| real, parameter | mode_sfcflx::c_mo_t_conv = 15.0 |
| |
| real, parameter | mode_sfcflx::c_mo_q_conv = 15.0 |
| |
| real, parameter | mode_sfcflx::c_mo_u_exp = 0.25 |
| |
| real, parameter | mode_sfcflx::c_mo_t_exp = 0.5 |
| |
| real, parameter | mode_sfcflx::c_mo_q_exp = 0.5 |
| |
| real, parameter | mode_sfcflx::z0u_ice_rough = 1.0E-03 |
| |
| real, parameter | mode_sfcflx::c_z0u_smooth = 0.1 |
| |
| real, parameter | mode_sfcflx::c_z0u_rough = 1.23E-02 |
| |
| real, parameter | mode_sfcflx::c_z0u_rough_l = 1.00E-01 |
| |
| real, parameter | mode_sfcflx::c_z0u_ftch_f = 0.70 |
| |
| real, parameter | mode_sfcflx::c_z0u_ftch_ex = 0.3333333 |
| |
| real, parameter | mode_sfcflx::c_z0t_rough_1 = 4.0 |
| |
| real, parameter | mode_sfcflx::c_z0t_rough_2 = 3.2 |
| |
| real, parameter | mode_sfcflx::c_z0t_rough_3 = 0.5 |
| |
| real, parameter | mode_sfcflx::c_z0q_rough_1 = 4.0 |
| |
| real, parameter | mode_sfcflx::c_z0q_rough_2 = 4.2 |
| |
| real, parameter | mode_sfcflx::c_z0q_rough_3 = 0.5 |
| |
| real, parameter | mode_sfcflx::c_z0t_ice_b0s = 1.250 |
| |
| real, parameter | mode_sfcflx::c_z0t_ice_b0t = 0.149 |
| |
| real, parameter | mode_sfcflx::c_z0t_ice_b1t = -0.550 |
| |
| real, parameter | mode_sfcflx::c_z0t_ice_b0r = 0.317 |
| |
| real, parameter | mode_sfcflx::c_z0t_ice_b1r = -0.565 |
| |
| real, parameter | mode_sfcflx::c_z0t_ice_b2r = -0.183 |
| |
| real, parameter | mode_sfcflx::c_z0q_ice_b0s = 1.610 |
| |
| real, parameter | mode_sfcflx::c_z0q_ice_b0t = 0.351 |
| |
| real, parameter | mode_sfcflx::c_z0q_ice_b1t = -0.628 |
| |
| real, parameter | mode_sfcflx::c_z0q_ice_b0r = 0.396 |
| |
| real, parameter | mode_sfcflx::c_z0q_ice_b1r = -0.512 |
| |
| real, parameter | mode_sfcflx::c_z0q_ice_b2r = -0.180 |
| |
| real, parameter | mode_sfcflx::re_z0s_ice_t = 2.5 |
| |
| real, parameter | mode_sfcflx::re_z0u_thresh = 0.1 |
| |
| real, parameter | mode_sfcflx::c_free_conv = 0.14 |
| |
| real, parameter | mode_sfcflx::c_lwrad_emis = 0.99 |
| |
| real, parameter | mode_sfcflx::tpsf_c_stefboltz = 5.67E-08 |
| |
| real, parameter | mode_sfcflx::tpsf_r_dryair = 2.8705E+02 |
| |
| real, parameter | mode_sfcflx::tpsf_r_watvap = 4.6151E+02 |
| |
| real, parameter | mode_sfcflx::tpsf_c_a_p = 1.005E+03 |
| |
| real, parameter | mode_sfcflx::tpsf_l_evap = 2.501E+06 |
| |
| real, parameter | mode_sfcflx::tpsf_nu_u_a = 1.50E-05 |
| |
| real, parameter | mode_sfcflx::tpsf_kappa_t_a = 2.20E-05 |
| |
| real, parameter | mode_sfcflx::tpsf_kappa_q_a = 2.40E-05 |
| |
| real, parameter | mode_sfcflx::tpsf_rd_o_rv = tpsf_R_dryair/tpsf_R_watvap |
| |
| real, parameter | mode_sfcflx::tpsf_alpha_q = (1.-tpsf_Rd_o_Rv)/tpsf_Rd_o_Rv |
| |
| real, parameter | mode_sfcflx::p_a_ref = 1.0E+05 |
| |
| real, parameter, private | mode_sfcflx::z_ =-HUGE(0.0) |
| |
| real | mode_sfcflx::z0u_sf =Z_ |
| |
| real | mode_sfcflx::z0t_sf =Z_ |
| |
| real | mode_sfcflx::z0q_sf =Z_ |
| |
| real, parameter | mode_sfcflx::u_wind_min_sf = 1.0E-02 |
| |
| real, parameter | mode_sfcflx::u_star_min_sf = 1.0E-04 |
| |
| real, parameter | mode_sfcflx::z0t_min_sf = 1.0E-11 |
| |
| real, parameter | mode_sfcflx::c_accur_sf = 1.0E-07 |
| |
| real, parameter | mode_sfcflx::c_small_sf = 1.0E-04 |
| |
| real, parameter | mode_sfcflx::num_1o3_sf = 1./3. |
| |
