diff --git a/Source/Radiation/Albedo.H b/Source/Radiation/Albedo.H index bb52f26c5..bbb971fc8 100644 --- a/Source/Radiation/Albedo.H +++ b/Source/Radiation/Albedo.H @@ -14,7 +14,7 @@ void set_albedo(const real1d& coszrs, real2d& albedo_dir, real2d& albedo_dif) // Albedos for land type I (Briegleb) auto nswbands = albedo_dir.extent(0); auto ncol = albedo_dif.extent(1); - yakl::c::parallel_for(yakl::c::Bounds<2>(nswbands,ncol), YAKL_LAMBDA (int ibnd, int icol) { + yakl::c::parallel_for(yakl::c::Bounds<2>(nswbands,ncol), YAKL_LAMBDA (int ibnd, int icol) { albedo_dir(ibnd, icol) = 1.4 * 0.24 / ( 1. + 0.8 * coszrs(icol)); albedo_dif(ibnd, icol) = 1.2 * 0.24; }); diff --git a/Source/Radiation/Init_rrtmgp.cpp b/Source/Radiation/Init_rrtmgp.cpp index 5ab8ac65b..f00045cf4 100644 --- a/Source/Radiation/Init_rrtmgp.cpp +++ b/Source/Radiation/Init_rrtmgp.cpp @@ -10,8 +10,8 @@ // Rrtmgp #include "Rrtmgp.H" -void Rrtmgp::initialize(int num_gas, std::vector active_gas_names, - const char* rrtmgp_coefficients_file_sw, +void Rrtmgp::initialize(int num_gas, std::vector active_gas_names, + const char* rrtmgp_coefficients_file_sw, const char* rrtmgp_coefficients_file_lw) { // First, make sure yakl has been initialized @@ -29,7 +29,7 @@ void Rrtmgp::initialize(int num_gas, std::vector active_gas_names, // rad_cnst objects are setup yet. // the other tasks! ngas = num_gas; - for (auto i = 0; i < ngas; ++i) + for (auto i = 0; i < ngas; ++i) gas_names[i] = active_gas_names[i].c_str(); coefficients_file_sw = rrtmgp_coefficients_file_sw; diff --git a/Source/Radiation/Rrtmgp.H b/Source/Radiation/Rrtmgp.H index 50996e56a..9cca6a6f4 100644 --- a/Source/Radiation/Rrtmgp.H +++ b/Source/Radiation/Rrtmgp.H @@ -2,7 +2,7 @@ * RTE-RRTMGP radiation model interface to ERF * The orginal code is developed by RobertPincus, and the code is open source available at: * https://github.com/earth-system-radiation/rte-rrtmgp - * For details of the radiation algorithm, please reference to the following paper, + * For details of the radiation algorithm, please reference to the following paper, * https://agupubs.onlinelibrary.wiley.com/doi/10.1029/2019MS001621 * * NOTE: we use the C++ version of RTE-RRTMGP, which is reimplemented the original Fortran @@ -10,7 +10,7 @@ * of the rte-rrtmgp code is located at: * https://github.com/E3SM-Project/rte-rrtmgp * - * The RTE-RRTMGP uses BSD-3-Clause Open Source License, if you want to make changes, + * The RTE-RRTMGP uses BSD-3-Clause Open Source License, if you want to make changes, * and modifications to the code, please refer to BSD-3-Clause Open Source License. */ #ifndef ERF_RRTMGP_H @@ -42,8 +42,8 @@ class Rrtmgp { ~Rrtmgp() = default; // initialize and load gas property data for rrtmgp radiation - void initialize(int num_gas, std::vector active_gas_names, - const char* rrtmgp_coefficients_file_sw, + void initialize(int num_gas, std::vector active_gas_names, + const char* rrtmgp_coefficients_file_sw, const char* rrtmgp_coefficients_file_lw); // finalize/clean up @@ -113,7 +113,7 @@ class Rrtmgp { template void multifab_to_array(); - template + template void array_to_multifab(); // number of gas for radiation model