Return pointers to atmo arrays. More...
Public Member Functions | |
subroutine | cs_f_atmo_arrays_get_pointers (p_zdmet, p_ztmet, p_umet, p_vmet, p_wmet, p_tmmet, p_phmet, p_tpmet, p_ekmet, p_epmet, p_xyvert, p_zvert, p_acinfe, p_dacinfe, p_aco2, p_aco2s, p_daco2, p_daco2s, p_acsup, p_acsups, p_dacsup, p_dacsups, p_tauzq, p_tauz, p_zq, p_zray, p_rayi, p_rayst, p_iru, p_ird, p_solu, p_sold, dim_pumet, dim_phmet, dim_tpmet, dim_ekmet, dim_epmet, dim_xyvert, dim_kmx2, dim_kmx_nvert) |
Return pointers to atmo arrays.
subroutine cs_f_atmo_arrays_get_pointers | ( | type(c_ptr), intent(out) | p_zdmet, |
type(c_ptr), intent(out) | p_ztmet, | ||
type(c_ptr), intent(out) | p_umet, | ||
type(c_ptr), intent(out) | p_vmet, | ||
type(c_ptr), intent(out) | p_wmet, | ||
type(c_ptr), intent(out) | p_tmmet, | ||
type(c_ptr), intent(out) | p_phmet, | ||
type(c_ptr), intent(out) | p_tpmet, | ||
type(c_ptr), intent(out) | p_ekmet, | ||
type(c_ptr), intent(out) | p_epmet, | ||
type(c_ptr), intent(out) | p_xyvert, | ||
type(c_ptr), intent(out) | p_zvert, | ||
type(c_ptr), intent(out) | p_acinfe, | ||
type(c_ptr), intent(out) | p_dacinfe, | ||
type(c_ptr), intent(out) | p_aco2, | ||
type(c_ptr), intent(out) | p_aco2s, | ||
type(c_ptr), intent(out) | p_daco2, | ||
type(c_ptr), intent(out) | p_daco2s, | ||
type(c_ptr), intent(out) | p_acsup, | ||
type(c_ptr), intent(out) | p_acsups, | ||
type(c_ptr), intent(out) | p_dacsup, | ||
type(c_ptr), intent(out) | p_dacsups, | ||
type(c_ptr), intent(out) | p_tauzq, | ||
type(c_ptr), intent(out) | p_tauz, | ||
type(c_ptr), intent(out) | p_zq, | ||
type(c_ptr), intent(out) | p_zray, | ||
type(c_ptr), intent(out) | p_rayi, | ||
type(c_ptr), intent(out) | p_rayst, | ||
type(c_ptr), intent(out) | p_iru, | ||
type(c_ptr), intent(out) | p_ird, | ||
type(c_ptr), intent(out) | p_solu, | ||
type(c_ptr), intent(out) | p_sold, | ||
integer(c_int), dimension(2) | dim_pumet, | ||
integer(c_int), dimension(2) | dim_phmet, | ||
integer(c_int), dimension(2) | dim_tpmet, | ||
integer(c_int), dimension(2) | dim_ekmet, | ||
integer(c_int), dimension(2) | dim_epmet, | ||
integer(c_int), dimension(2) | dim_xyvert, | ||
integer(c_int), dimension(2) | dim_kmx2, | ||
integer(c_int), dimension(2) | dim_kmx_nvert | ||
) |