Difference between revisions of "User:Jmandel/chem"
Jump to navigation
Jump to search
| Line 2: | Line 2: | ||
Tracer accessed as grid%tracer(i,k,j,p_smoke) | Tracer accessed as grid%tracer(i,k,j,p_smoke) | ||
| + | real,intent(inout),dimension( ims:ime,kms:kme,jms:jme,num_tracer ) :: tracer | ||
| + | from | ||
use module_state_description , only: num_tracer, p_smoke | use module_state_description , only: num_tracer, p_smoke | ||
| − | + | which has | |
| + | INTEGER, PARAMETER :: tracer_smoke = 1 | ||
| + | similar code in | ||
| + | chem/module_add_emiss_burn.F: chem(i,k,j,p_smoke) = chem(i,k,j,p_smoke)+ebu(i,k,j,p_ebu_co)*conv_rho | ||
Revision as of 03:50, 25 November 2012
Tracer accessed as grid%tracer(i,k,j,p_smoke) real,intent(inout),dimension( ims:ime,kms:kme,jms:jme,num_tracer ) :: tracer from use module_state_description , only: num_tracer, p_smoke which has INTEGER, PARAMETER :: tracer_smoke = 1 similar code in chem/module_add_emiss_burn.F: chem(i,k,j,p_smoke) = chem(i,k,j,p_smoke)+ebu(i,k,j,p_ebu_co)*conv_rho