Skip to content

Commit

Permalink
Fiees for Cuda build.
Browse files Browse the repository at this point in the history
  • Loading branch information
overfelt committed Nov 17, 2024
1 parent fc1ea03 commit c952d36
Showing 1 changed file with 3 additions and 4 deletions.
7 changes: 3 additions & 4 deletions src/mam4xx/mo_gas_phase_chemdr.hpp
Original file line number Diff line number Diff line change
Expand Up @@ -72,6 +72,7 @@ namespace microphysics {
* @param [in] dry_diameter_icol
* @param [in] wet_diameter_icol
* @param [in] wetdens_icol
* @param [in] seq_drydep::Data drydep_data = seq_drydep::set_gas_drydep_data()
* @param [out] dvel[gas_pcnst] -- deposition velocity [1/cm/s]
* @param [out] dflx[gas_pcnst] -- deposition flux [1/cm^2/s]
* @param [out] progs -- prognostics: stateq, qqcw updated
Expand Down Expand Up @@ -112,7 +113,8 @@ void perform_atmospheric_chemistry_and_microphysics(
const int offset_aerosol, const Real o3_sfc, const Real o3_tau,
const int o3_lbl, const ConstView2D dry_diameter_icol,
const ConstView2D wet_diameter_icol, const ConstView2D wetdens_icol,
Real dvel[gas_pcnst], Real dflx[gas_pcnst], mam4::Prognostics &progs) {
const seq_drydep::Data &drydep_data, Real dvel[gas_pcnst],
Real dflx[gas_pcnst], mam4::Prognostics &progs) {

mam4::mo_setext::extfrc_set(forcings_in, extfrc_icol);

Expand Down Expand Up @@ -143,9 +145,6 @@ void perform_atmospheric_chemistry_and_microphysics(
eccf, photo_table, // in
photo_work_arrays_icol); // out

const seq_drydep::Data drydep_data = seq_drydep::set_gas_drydep_data();
;

// compute aerosol microphysics on each vertical level within this
// column
Kokkos::parallel_for(Kokkos::TeamThreadRange(team, nlev), [&](const int kk) {
Expand Down

0 comments on commit c952d36

Please sign in to comment.