subroutine module_flake::flake_interface |
( |
real (kind = kind_phys), intent(in) | dmsnowdt_in, |
|
|
real (kind = kind_phys), intent(in) | i_atm_in, |
|
|
real (kind = kind_phys), intent(in) | q_atm_lw_in, |
|
|
real (kind = kind_phys), intent(in) | height_u_in, |
|
|
real (kind = kind_phys), intent(in) | height_tq_in, |
|
|
real (kind = kind_phys), intent(in) | u_a_in, |
|
|
real (kind = kind_phys), intent(in) | t_a_in, |
|
|
real (kind = kind_phys), intent(in) | q_a_in, |
|
|
real (kind = kind_phys), intent(in) | p_a_in, |
|
|
real (kind = kind_phys), intent(in) | depth_w, |
|
|
real (kind = kind_phys), intent(in) | fetch, |
|
|
real (kind = kind_phys), intent(in) | depth_bs, |
|
|
real (kind = kind_phys), intent(in) | t_bs, |
|
|
real (kind = kind_phys), intent(in) | par_coriolis, |
|
|
real (kind = kind_phys), intent(in) | del_time, |
|
|
real (kind = kind_phys), intent(in) | t_snow_in, |
|
|
real (kind = kind_phys), intent(in) | t_ice_in, |
|
|
real (kind = kind_phys), intent(in) | t_mnw_in, |
|
|
real (kind = kind_phys), intent(in) | t_wml_in, |
|
|
real (kind = kind_phys), intent(in) | t_bot_in, |
|
|
real (kind = kind_phys), intent(in) | t_b1_in, |
|
|
real (kind = kind_phys), intent(in) | c_t_in, |
|
|
real (kind = kind_phys), intent(in) | h_snow_in, |
|
|
real (kind = kind_phys), intent(in) | h_ice_in, |
|
|
real (kind = kind_phys), intent(in) | h_ml_in, |
|
|
real (kind = kind_phys), intent(in) | h_b1_in, |
|
|
real (kind = kind_phys), intent(in) | t_sfc_p, |
|
|
real (kind = kind_phys), intent(in) | ch, |
|
|
real (kind = kind_phys), intent(in) | cm, |
|
|
real (kind = kind_phys), intent(in) | albedo_water, |
|
|
real (kind = kind_phys), intent(in) | water_extinc, |
|
|
real (kind = kind_phys), intent(out) | t_snow_out, |
|
|
real (kind = kind_phys), intent(out) | t_ice_out, |
|
|
real (kind = kind_phys), intent(out) | t_mnw_out, |
|
|
real (kind = kind_phys), intent(out) | t_wml_out, |
|
|
real (kind = kind_phys), intent(out) | t_bot_out, |
|
|
real (kind = kind_phys), intent(out) | t_b1_out, |
|
|
real (kind = kind_phys), intent(out) | c_t_out, |
|
|
real (kind = kind_phys), intent(out) | h_snow_out, |
|
|
real (kind = kind_phys), intent(out) | h_ice_out, |
|
|
real (kind = kind_phys), intent(out) | h_ml_out, |
|
|
real (kind = kind_phys), intent(out) | h_b1_out, |
|
|
real (kind = kind_phys), intent(out) | t_sfc_n, |
|
|
real (kind = kind_phys), intent(out) | hflx_out, |
|
|
real (kind = kind_phys), intent(out) | evap_out, |
|
|
real (kind = kind_phys), intent(out) | gflx_out, |
|
|
real (kind = kind_phys), intent(out) | lflx_out, |
|
|
real (kind = kind_phys), intent(in) | t_bot_2_in, |
|
|
real (kind = kind_phys), intent(out) | t_bot_2_out, |
|
|
real (kind = kind_phys), intent(out) | ustar, |
|
|
real (kind = kind_phys), intent(out) | q_sfc, |
|
|
real (kind = kind_phys), intent(out) | chh, |
|
|
real (kind = kind_phys), intent(out) | cmm ) |