Skip to content

Commit

Permalink
move placement of line where fixed solar irradiance is defined
Browse files Browse the repository at this point in the history
  • Loading branch information
Peter Andrew Bogenschutz committed Nov 14, 2024
1 parent b7211bd commit 50815e2
Showing 1 changed file with 1 addition and 1 deletion.
Original file line number Diff line number Diff line change
Expand Up @@ -827,7 +827,6 @@ void RRTMGPRadiation::run_impl (const double dt) {
auto eccen = m_orbital_eccen;
auto obliq = m_orbital_obliq;
auto mvelp = m_orbital_mvelp;
auto fixed_total_solar_irradiance = m_fixed_total_solar_irradiance;
if (eccen >= 0 && obliq >= 0 && mvelp >= 0) {
// use fixed orbital parameters; to force this, we need to set
// orbital_year to SHR_ORB_UNDEF_INT, which is exposed through
Expand All @@ -846,6 +845,7 @@ void RRTMGPRadiation::run_impl (const double dt) {
obliqr, &delta, &eccf);

// Overwrite eccf if using a fixed solar constant.
auto fixed_total_solar_irradiance = m_fixed_total_solar_irradiance;
if (fixed_total_solar_irradiance >= 0){
eccf = fixed_total_solar_irradiance/1360.9;
}
Expand Down

0 comments on commit 50815e2

Please sign in to comment.