Skip to content

Commit

Permalink
remove trailing white spaces
Browse files Browse the repository at this point in the history
  • Loading branch information
asalmgren committed Jan 4, 2024
1 parent 0b90d43 commit dd44c92
Show file tree
Hide file tree
Showing 9 changed files with 99 additions and 99 deletions.
4 changes: 2 additions & 2 deletions Source/Radiation/Aero_rad_props.cpp
Original file line number Diff line number Diff line change
Expand Up @@ -112,7 +112,7 @@ void AerRadProps::aer_rad_props_sw(const int& list_idx, const real& dt, const in
if ((tlev == -1) || (stobie < strop(1))) {
tlev = k;
strop(1) = stobie;
}
}
}
if (tlev != -1) trop_level(i) = tlev;
});
Expand All @@ -135,7 +135,7 @@ void AerRadProps::aer_rad_props_sw(const int& list_idx, const real& dt, const in
ext_cmip6_sw_2d(icol,ilev) = ext_cmip6_sw_inv_m(icol,ilev,RadConstants::idx_sw_diag);
});

mam_aer.modal_aero_sw(list_idx, dt, nnite, idxnite, is_cmip6_volc,
mam_aer.modal_aero_sw(list_idx, dt, nnite, idxnite, is_cmip6_volc,
pdeldry, pmid, temp, qt, ext_cmip6_sw_2d,
trop_level, tau, tau_w, tau_w_g, tau_w_f, clear_rh);
} else {
Expand Down
10 changes: 5 additions & 5 deletions Source/Radiation/Mam4_aero.H
Original file line number Diff line number Diff line change
Expand Up @@ -173,7 +173,7 @@ class Mam4_aer {
for (i = 1; i <= im; ++i) {
if(x(ic) < xtab(i)) break;
}

ix(ic) = std::max(i-1,1);
auto ip1 = std::min(ix(ic)+1,im);
auto dx = (xtab(ip1)-xtab(ix(ic)));
Expand Down Expand Up @@ -205,7 +205,7 @@ class Mam4_aer {
if(std::abs(dy) > 1.e-20) {
u(ic) = (y(ic)-ytab(jy(ic)))/dy;
if(u(ic) < 0. || u(ic) > 1.)
amrex::Print() << "u= " << u(ic) << "; y= " << y(ic) << "; ytab= "
amrex::Print() << "u= " << u(ic) << "; y= " << y(ic) << "; ytab= "
<< ytab(jy(ic)) << "; dy= " << dy << std::endl;
} else {
u(ic)=0.;
Expand All @@ -217,7 +217,7 @@ class Mam4_aer {
u(i) = 0.;
});
}
}
}

parallel_for (SimpleBounds<2>(ncol, km), YAKL_LAMBDA (int ic, int k) {
tu(ic) = t(ic)*u(ic);
Expand Down Expand Up @@ -319,7 +319,7 @@ class Mam4_aer {
//
void modal_aero_sw(int list_idx, real dt, int nnite,
const int1d& idxnite, const bool& is_cmip6_volc,
const real2d& pdeldry, const real2d& pmid, const real2d& temperature, const real2d& qt,
const real2d& pdeldry, const real2d& pmid, const real2d& temperature, const real2d& qt,
const real2d& ext_cmip6_sw, const int1d& trop_level,
const real3d& tauxar, const real3d& wa, const real3d& ga,
const real3d& fa, const real2d& clear_rh) {
Expand Down Expand Up @@ -555,7 +555,7 @@ class Mam4_aer {
//
// calcualtes aerosol lw radiative properties
//
void modal_aero_lw(int list_idx, real dt,
void modal_aero_lw(int list_idx, real dt,
const real2d& pdeldry, const real2d& pmid, const real2d& temperature, const real2d& qt,
const real3d& tauxar, const real2d& clear_rh) {
real sigma_logr_aer; // geometric standard deviation of number distribution
Expand Down
18 changes: 9 additions & 9 deletions Source/Radiation/Mam4_constituents.H
Original file line number Diff line number Diff line change
Expand Up @@ -516,7 +516,7 @@ class MamConstituents {
}

const
int rad_cnst_get_spec_idx(int list_idx, int mode_idx,
int rad_cnst_get_spec_idx(int list_idx, int mode_idx,
const std::string& spec_type)
{
// if specie type not found return -1
Expand Down Expand Up @@ -823,7 +823,7 @@ class MamConstituents {
}

const
void get_mode_props(int list_idx, int mode_idx, real& sigmag,
void get_mode_props(int list_idx, int mode_idx, real& sigmag,
real2d& refrtablw, real2d& refitablw, real4d& absplw)
{
modelist_t mlist;
Expand Down Expand Up @@ -942,7 +942,7 @@ class MamConstituents {

const inline
void get_mam_props_sw(int list_idx, int mode_idx, int spec_idx,
real& density_aer, real1d& refindex_real_aer_sw,
real& density_aer, real1d& refindex_real_aer_sw,
real1d& refindex_im_aer_sw)
{
modelist_t mlist;
Expand Down Expand Up @@ -973,8 +973,8 @@ class MamConstituents {

const inline
void get_mam_props_lw(int list_idx, int mode_idx, int spec_idx,
real& density_aer,
real1d& refindex_real_aer_lw,
real& density_aer,
real1d& refindex_real_aer_lw,
real1d& refindex_im_aer_lw)
{
modelist_t mlist;
Expand Down Expand Up @@ -1090,8 +1090,8 @@ class MamConstituents {
}

const inline
void get_aer_refindex_aer_sw(int list_idx, int aer_idx,
real1d& refindex_real_aer_sw,
void get_aer_refindex_aer_sw(int list_idx, int aer_idx,
real1d& refindex_real_aer_sw,
real1d& refindex_im_aer_sw)
{
auto aerlist = aerosollist[list_idx];
Expand All @@ -1102,8 +1102,8 @@ class MamConstituents {
}

const inline
void get_aer_refindex_aer_lw(int list_idx, int aer_idx,
real1d& refindex_real_aer_lw,
void get_aer_refindex_aer_lw(int list_idx, int aer_idx,
real1d& refindex_real_aer_lw,
real1d& refindex_im_aer_lw)
{
auto aerlist = aerosollist[list_idx];
Expand Down
6 changes: 3 additions & 3 deletions Source/Radiation/Modal_aero_wateruptake.H
Original file line number Diff line number Diff line change
Expand Up @@ -24,7 +24,7 @@ class ModalAeroWateruptake {
public:
static
void modal_aero_wateruptake_dr(int list_idx, int ncol, int nlev, int nmodes, int top_lev,
MamConstituents& consti, const real2d& h2ommr, const real2d& t, const real2d& pmid,
MamConstituents& consti, const real2d& h2ommr, const real2d& t, const real2d& pmid,
const real3d& dgnumdry_m, const real3d& dgnumwet_m, const real3d& qaerwat_m,
const real3d& wetdens_m, const real2d& clear_rh_in) {
real2d raer("raer",ncol,nlev); // aerosol species MRs (kg/kg and #/kg)
Expand Down Expand Up @@ -388,7 +388,7 @@ class ModalAeroWateruptake {
cx[0] = amrex::GpuComplex<real>(std::pow(-p0, third), 0.);
cx[1] = cx[0];
cx[2] = cx[1];
}
}
else {
auto q = amrex::GpuComplex<real>(p1/3., 0.);
auto r = amrex::GpuComplex<real>(p0/2., 0.);
Expand Down Expand Up @@ -425,7 +425,7 @@ class ModalAeroWateruptake {
cx[1] = cx[0];
cx[2] = cx[0];
cx[3] = cx[0];
}
}
else {
cb = amrex::pow(cb, third);
auto cy = -cb+q/cb+p2/6.;
Expand Down
4 changes: 2 additions & 2 deletions Source/Radiation/Optics.cpp
Original file line number Diff line number Diff line change
Expand Up @@ -89,8 +89,8 @@ void Optics::get_cloud_optics_sw(int ncol, int nlev, int nbnd,
ice_tau_ssa_g, ice_tau_ssa_f);
}
else if (icecldoptics == "ebertcurry") {
EbertCurry::ec_ice_optics_sw(ncol, nlev, nbnd, cld, iciwp,
rei, ice_tau, ice_tau_ssa,
EbertCurry::ec_ice_optics_sw(ncol, nlev, nbnd, cld, iciwp,
rei, ice_tau, ice_tau_ssa,
ice_tau_ssa_g, ice_tau_ssa_f);
}

Expand Down
Loading

0 comments on commit dd44c92

Please sign in to comment.