Line data Source code
1 : module mo_rxt_rates_conv 2 : use shr_kind_mod, only : r8 => shr_kind_r8 3 : implicit none 4 : private 5 : public :: set_rates 6 : contains 7 0 : subroutine set_rates( rxt_rates, sol, ncol ) 8 : real(r8), intent(inout) :: rxt_rates(:,:,:) 9 : real(r8), intent(in) :: sol(:,:,:) 10 : integer, intent(in) :: ncol 11 0 : end subroutine set_rates 12 : end module mo_rxt_rates_conv