Skip to content

Commit

Permalink
Minor change on module_mixing and kpp_chem
Browse files Browse the repository at this point in the history
  • Loading branch information
laomangio committed Jan 18, 2024
1 parent c52de9f commit 7436444
Showing 1 changed file with 1 addition and 3 deletions.
4 changes: 1 addition & 3 deletions src/trac.c
Original file line number Diff line number Diff line change
Expand Up @@ -1868,7 +1868,7 @@ void module_kpp_chem(
kpp_chem_initialize(ctl, clim, met0, met1, atm, ip);

/* Integrate... */
INTEGRATE(atm->time[ip] - dt[ip], atm->time[ip]);
INTEGRATE(0, ctl->dt_kpp);

/* Output to air parcel.. */
kpp_chem_output2atm(atm, ctl, met0, met1, ip);
Expand Down Expand Up @@ -1932,8 +1932,6 @@ void module_mixing(
}

/* Calculate interparcel mixing... */
if (ctl->qnt_m >= 0)
module_mixing_help(ctl, clim, atm, ixs, iys, izs, ctl->qnt_m);
if (ctl->qnt_vmr >= 0)
module_mixing_help(ctl, clim, atm, ixs, iys, izs, ctl->qnt_vmr);
if (ctl->qnt_Cx >= 0)
Expand Down

0 comments on commit 7436444

Please sign in to comment.