LCOV - code coverage report
Current view: | top level - chemistry/pp_none - mo_prod_loss.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             :       module mo_prod_loss
           2             :       use shr_kind_mod, only : r8 => shr_kind_r8
           3             :       private
           4             :       public :: exp_prod_loss
           5             :       public :: imp_prod_loss
           6             :       contains
           7           0 :       subroutine exp_prod_loss( prod, loss, y, rxt, het_rates )
           8             :       use ppgrid, only : pver
           9             :       implicit none
          10             : !--------------------------------------------------------------------
          11             : ! ... dummy args
          12             : !--------------------------------------------------------------------
          13             :       real(r8), dimension(:,:,:), intent(out) :: &
          14             :             prod, &
          15             :             loss
          16             :       real(r8), intent(in) :: y(:,:,:)
          17             :       real(r8), intent(in) :: rxt(:,:,:)
          18             :       real(r8), intent(in) :: het_rates(:,:,:)
          19           0 :       end subroutine exp_prod_loss
          20           0 :       subroutine imp_prod_loss( prod, loss, y, rxt, het_rates )
          21             :       use ppgrid, only : pver
          22             :       implicit none
          23             : !--------------------------------------------------------------------
          24             : ! ... dummy args
          25             : !--------------------------------------------------------------------
          26             :       real(r8), dimension(:), intent(out) :: &
          27             :             prod, &
          28             :             loss
          29             :       real(r8), intent(in) :: y(:)
          30             :       real(r8), intent(in) :: rxt(:)
          31             :       real(r8), intent(in) :: het_rates(:)
          32           0 :       end subroutine imp_prod_loss
          33             :       end module mo_prod_loss

Generated by: LCOV version 1.14