?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Merge remote-tracking branch 'origin/release-v4.6.1'
[WRF.git] / chem / KPP / inc / mozcart / kpp_mechd_ia_mozcart.inc
blob1cf014c22a298f180283cc45007bcb5bbf0ef18c
1 !
2    IF( irr_option(dm) ) THEN
3      DO n = param_first_scalar,num_irr_diag
4        irr_rates(i,k,j,n) = real( IRR_WRK(irr_diag_ndx(n-1,dm)),kind=4 )
5      ENDDO
6    ENDIF
Mirror of the official repository at https://github.com/wrf-model/WRF