File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_chemistry_coms.h |
19 |
NO PROCEDURE |
. co2, cfc11, cfc12, cfc22, ozone, stratq, n2o, methane |
./pkg/fizhi/fizhi_chemistry_coms.h |
25 |
NO PROCEDURE |
_RL stratq(nlatsq,nlevsq,ntimesq) |
./pkg/fizhi/fizhi_init_fixed.F |
139 |
FIZHI_INIT_FIXED |
& nlatsq,nlevsq,ntimesq,latsq,levsq,stratq, |
./pkg/fizhi/update_chemistry_exports.F |
109 |
INTERP_CHEMISTRY |
subroutine INTERP_CHEMISTRY (stratq,nwatlevs,nwatlats,watlevs, |
./pkg/fizhi/update_chemistry_exports.F |
118 |
INTERP_CHEMISTRY |
_RL stratq(nwatlats,nwatlevs),ozone(nozlats,nozlevs) |
./pkg/fizhi/update_chemistry_exports.F |
131 |
INTERP_CHEMISTRY |
call INTERP_QZ (stratq,nwatlevs,nwatlats,watlevs,watlats,im*jm, |
./pkg/fizhi/update_chemistry_exports.F |
139 |
INTERP_QZ |
subroutine INTERP_QZ(stratq,nwatlevs,nwatlats,watlevs,watlats, |
./pkg/fizhi/update_chemistry_exports.F |
160 |
INTERP_QZ |
_RL stratq ( nwatlats,nwatlevs ) |
./pkg/fizhi/update_chemistry_exports.F |
212 |
INTERP_QZ |
QPR1(i) = stratq(jlatm,k) |
./pkg/fizhi/update_chemistry_exports.F |
213 |
INTERP_QZ |
QPR2(i) = stratq(jlatp,k) |
./pkg/fizhi/update_chemistry_exports.F |
92 |
UPDATE_CHEMISTRY_EXPORTS |
strq1(j,L) = stratq(j,L,imns)*facm + stratq(j,L,ipls)*facp |
./verification/fizhi-cs-aqualev20/code/fizhi_init_fixed.F |
118 |
FIZHI_INIT_FIXED |
& nlatsq,nlevsq,ntimesq,latsq,levsq,stratq, |
./verification/fizhi-gridalt-hs/code/fizhi_init_fixed.F |
118 |
FIZHI_INIT_FIXED |
& nlatsq,nlevsq,ntimesq,latsq,levsq,stratq, |