@@ -192,13 +192,13 @@ P3MainData::P3MainData(
192192 Int its_, Int ite_, Int kts_, Int kte_, Int it_, Real dt_, bool do_predict_nc_, bool do_prescribed_CCN_, Real) :
193193 PhysicsTestData ( { {(ite_ - its_) + 1 , (kte_ - kts_) + 1 }, {(ite_ - its_) + 1 , (kte_ - kts_) + 2 } }, { {
194194 &pres, &dz, &nc_nuceat_tend, &nccn_prescribed, &ni_activated, &dpres, &inv_exner, &cld_frac_i, &cld_frac_l, &cld_frac_r,
195- &inv_qc_relvar, &qc, &nc, &qr, &nr, &qi, &qm, &ni, &bm, &qv, &th_atm, &qv_prev, &t_prev,
195+ &inv_qc_relvar, &qc, &nc, &qr, &nr, &qi, &qm, &ni, &bm, &qv, &th_atm, &qv_prev, &t_prev,
196196 &diag_eff_radius_qc, &diag_eff_radius_qi, &diag_eff_radius_qr, &rho_qi, &mu_c, &lamc, &qv2qi_depos_tend, &precip_total_tend, &nevapr,
197197 &qr_evap_tend, &liq_ice_exchange, &vap_liq_exchange, &vap_ice_exchange, &precip_liq_flux,
198198 &precip_ice_flux},
199199 {&precip_liq_surf, &precip_ice_surf} }), // these two are (ni, nk+1)
200200 its (its_), ite(ite_), kts(kts_), kte(kte_), it(it_), dt(dt_), do_predict_nc(do_predict_nc_), do_prescribed_CCN(do_prescribed_CCN_), use_hetfrz_classnuc(false ),
201- hetfrz_immersion_nucleation_tend (nullptr ), hetfrz_contact_nucleation_tend(nullptr ), hetfrz_deposition_nucleation_tend(nullptr )
201+ hetfrz_immersion_nucleation_tend (nullptr ), hetfrz_contact_nucleation_tend(nullptr ), hetfrz_deposition_nucleation_tend(nullptr )
202202{}
203203
204204void IceSupersatConservationData::randomize (std::mt19937_64& engine)
@@ -824,11 +824,11 @@ void check_values_host(Real* qv, Real* temp, Int kstart, Int kend,
824824
825825 kstart -= 1 ;
826826 kend -= 1 ;
827- const auto nk = (kend - kstart) + 1 ;
827+ const Int nk = (kend - kstart) + 1 ;
828828 const Int nk_pack = ekat::npack<Spack>(nk);
829829 std::vector<view_1d> cvd_d (CheckValuesData::NUM_ARRAYS+1 );
830830
831- ekat::host_to_device<Int> ({qv, temp, col_loc}, {nk, nk, 3 }, cvd_d);
831+ ekat::host_to_device ({qv, temp, col_loc}, std::vector<Int> {nk, nk, 3 }, cvd_d);
832832
833833 view_1d qv_d (cvd_d[0 ]), temp_d (cvd_d[1 ]), col_loc_d (cvd_d[2 ]);
834834 suview_1d ucol_loc_d (reinterpret_cast <Real*>(col_loc_d.data ()), 3 );
@@ -963,7 +963,7 @@ void p3_main_part2_host(
963963 Real* acn, Real* qv, Real* th_atm, Real* qc, Real* nc, Real* qr, Real* nr, Real* qi, Real* ni,
964964 Real* qm, Real* bm, Real* qc_incld, Real* qr_incld, Real* qi_incld, Real* qm_incld, Real* nc_incld, Real* nr_incld,
965965 Real* ni_incld, Real* bm_incld, Real* mu_c, Real* nu, Real* lamc, Real* cdist, Real* cdist1, Real* cdistr, Real* mu_r, Real* lamr, Real* logn0r, Real* qv2qi_depos_tend, Real* precip_total_tend,
966- Real* nevapr, Real* qr_evap_tend, Real* vap_liq_exchange, Real* vap_ice_exchange, Real* liq_ice_exchange,
966+ Real* nevapr, Real* qr_evap_tend, Real* vap_liq_exchange, Real* vap_ice_exchange, Real* liq_ice_exchange,
967967 Real* qr2qv_evap, Real* qi2qv_sublim, Real* qc2qr_accret, Real* qc2qr_autoconv,
968968 Real* qv2qi_vapdep, Real* qc2qi_berg, Real* qc2qr_ice_shed, Real* qc2qi_collect, Real* qr2qi_collect,
969969 Real* qc2qi_hetero_freeze, Real* qr2qi_immers_freeze, Real* qi2qr_melt,
@@ -1028,8 +1028,8 @@ void p3_main_part2_host(
10281028
10291029 int current_index = 0 ;
10301030 view_1d
1031- hetfrz_immersion_nucleation_tend_d (temp_d[current_index++]),
1032- hetfrz_contact_nucleation_tend_d (temp_d[current_index++]),
1031+ hetfrz_immersion_nucleation_tend_d (temp_d[current_index++]),
1032+ hetfrz_contact_nucleation_tend_d (temp_d[current_index++]),
10331033 hetfrz_deposition_nucleation_tend_d (temp_d[current_index++]),
10341034 pres_d (temp_d[current_index++]),
10351035 dpres_d (temp_d[current_index++]),
@@ -1116,8 +1116,8 @@ void p3_main_part2_host(
11161116 Kokkos::parallel_for (policy, KOKKOS_LAMBDA (const MemberType& team) {
11171117
11181118 P3F::p3_main_part2 (
1119- team, nk_pack, max_total_ni, do_predict_nc, do_prescribed_CCN, dt, inv_dt,
1120- hetfrz_immersion_nucleation_tend_d, hetfrz_contact_nucleation_tend_d, hetfrz_deposition_nucleation_tend_d,
1119+ team, nk_pack, max_total_ni, do_predict_nc, do_prescribed_CCN, dt, inv_dt,
1120+ hetfrz_immersion_nucleation_tend_d, hetfrz_contact_nucleation_tend_d, hetfrz_deposition_nucleation_tend_d,
11211121 dnu, ice_table_vals, collect_table_vals, revap_table_vals,
11221122 pres_d, dpres_d, dz_d, nc_nuceat_tend_d, inv_exner_d, exner_d, inv_cld_frac_l_d,
11231123 inv_cld_frac_i_d, inv_cld_frac_r_d, ni_activated_d, inv_qc_relvar_d, cld_frac_i_d, cld_frac_l_d, cld_frac_r_d,
@@ -1316,8 +1316,8 @@ Int p3_main_host(
13161316 pres, dz, nc_nuceat_tend, nccn_prescribed, ni_activated, dpres, inv_exner, cld_frac_i, cld_frac_l, cld_frac_r, inv_qc_relvar,
13171317 qc, nc, qr, nr, qi, qm, ni, bm, qv, th_atm, qv_prev, t_prev, diag_eff_radius_qc, diag_eff_radius_qi, diag_eff_radius_qr,
13181318 rho_qi, qv2qi_depos_tend,
1319- liq_ice_exchange, vap_liq_exchange, vap_ice_exchange,
1320- precip_liq_flux, precip_ice_flux,
1319+ liq_ice_exchange, vap_liq_exchange, vap_ice_exchange,
1320+ precip_liq_flux, precip_ice_flux,
13211321 precip_liq_surf, precip_ice_surf
13221322 };
13231323
@@ -1372,7 +1372,7 @@ Int p3_main_host(
13721372 precip_liq_flux_d (temp_d[counter++]),
13731373 precip_ice_flux_d (temp_d[counter++]), // 35
13741374 precip_liq_surf_temp_d (temp_d[counter++]),
1375- precip_ice_surf_temp_d (temp_d[counter++]);
1375+ precip_ice_surf_temp_d (temp_d[counter++]);
13761376
13771377 std::vector<Real> hetfrz_immersion_nucleation_tend (nj*nk, 0.0 );
13781378 std::vector<Real> hetfrz_contact_nucleation_tend (nj*nk, 0.0 );
@@ -1393,8 +1393,8 @@ Int p3_main_host(
13931393 std::vector<Real> qr_sedim (nj*nk, 0.0 );
13941394 std::vector<Real> qi_sedim (nj*nk, 0.0 );
13951395 std::vector<const Real*> pointers = {
1396- hetfrz_immersion_nucleation_tend.data (),
1397- hetfrz_contact_nucleation_tend.data (),
1396+ hetfrz_immersion_nucleation_tend.data (),
1397+ hetfrz_contact_nucleation_tend.data (),
13981398 hetfrz_deposition_nucleation_tend.data (),
13991399 qr2qv_evap.data (), qi2qv_sublim.data (),
14001400 qc2qr_accret.data (), qc2qr_autoconv.data (),
0 commit comments