LCOV - code coverage report
Current view: | top level - chemistry/pp_none - mo_setrxt.F90 (source / functions) |  |  | Hit | Total | Coverage
Test: | coverage.info |  | Lines: | 0 | 4 | 0.0 %
Date: | 2024-12-17 17:57:11 |  | Functions: | 0 | 2 | 0.0 %

              Line data    Source code
           1             :
           2             :       module mo_setrxt
           3             :
           4             :       use shr_kind_mod, only : r8 => shr_kind_r8
           5             :
           6             :       private
           7             :       public :: setrxt
           8             :       public :: setrxt_hrates
           9             :
          10             :       contains
          11             :
          12           0 :       subroutine setrxt( rate, temp, m, ncol )
          13             :
          14             :       use ppgrid,       only : pver, pcols
          15             :       use shr_kind_mod, only : r8 => shr_kind_r8
          16             :       use chem_mods, only : rxntot
          17             :       use mo_jpl,    only : jpl
          18             :
          19             :       implicit none
          20             :
          21             : !-------------------------------------------------------
          22             : !       ... dummy arguments
          23             : !-------------------------------------------------------
          24             :       integer, intent(in) :: ncol
          25             :       real(r8), intent(in)    :: temp(pcols,pver)
          26             :       real(r8), intent(in)    :: m(ncol,pver)
          27             :       real(r8), intent(inout) :: rate(ncol,pver,rxntot)
          28             :
          29           0 :       end subroutine setrxt
          30             :
          31             :
          32           0 :       subroutine setrxt_hrates( rate, temp, m, ncol, kbot )
          33             :
          34             :       use ppgrid,       only : pver, pcols
          35             :       use shr_kind_mod, only : r8 => shr_kind_r8
          36             :       use chem_mods, only : rxntot
          37             :       use mo_jpl,    only : jpl
          38             :
          39             :       implicit none
          40             :
          41             : !-------------------------------------------------------
          42             : !       ... dummy arguments
          43             : !-------------------------------------------------------
          44             :       integer, intent(in) :: ncol
          45             :       integer, intent(in) :: kbot
          46             :       real(r8), intent(in)    :: temp(pcols,pver)
          47             :       real(r8), intent(in)    :: m(ncol,pver)
          48             :       real(r8), intent(inout) :: rate(ncol,pver,rxntot)
          49             :
          50           0 :       end subroutine setrxt_hrates
          51             :
          52             :       end module mo_setrxt

Generated by: LCOV version 1.14