Skip to content

Commit

Permalink
Merge pull request #300 from geoschem/bugfix/run_with_geos
Browse files Browse the repository at this point in the history
Fixes to build and run in GEOS
  • Loading branch information
lizziel authored Dec 20, 2024
2 parents c76adbb + e61ab90 commit b94f2e0
Show file tree
Hide file tree
Showing 3 changed files with 5 additions and 3 deletions.
2 changes: 2 additions & 0 deletions CHANGELOG.md
Original file line number Diff line number Diff line change
Expand Up @@ -23,11 +23,13 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0

### Fixed
- Fixed excessive prints when using MPI
- Fixed F77 formating in hcox_dustdead_mod.F

### Removed
- Removed warnings count in HcoState%Config%Err
- Removed RC argument in HCO_WARNING
- Deleted subroutine HCO_IsVerb
- Remove print of HcoDiagn%MassScal since never set in the model

## [3.10.0] - 2024-11-07
### Added
Expand Down
2 changes: 0 additions & 2 deletions src/Core/hco_diagn_mod.F90
Original file line number Diff line number Diff line change
Expand Up @@ -1109,8 +1109,6 @@ SUBROUTINE Diagn_Create( HcoState, cName, &
IF ( HcoState%Config%doVerbose ) THEN
WRITE(MSG, *) ' ThisDiagn%AreaScal = ', ThisDiagn%AreaScal
CALL HCO_MSG( msg, LUN=HcoState%Config%hcoLogLUN )
WRITE(MSG, *) ' ThisDiagn%MassScal = ', ThisDiagn%MassScal
CALL HCO_MSG( msg, LUN=HcoState%Config%hcoLogLUN )
ENDIF
!----------------------------------------------------------------
! Determine the normalization factors applied to the diagnostics
Expand Down
4 changes: 3 additions & 1 deletion src/Extensions/hcox_dustdead_mod.F
Original file line number Diff line number Diff line change
Expand Up @@ -5864,7 +5864,9 @@ SUBROUTINE ReadTuningFactor(HcoState, TuningTable, FCT, RC )
FNDLABEL = TRIM(CSLABEL)
IF ( .NOT. HcoState%Grid%AREA_M2%Alloc ) THEN
MSG = 'Warning: AREA_M2 not found, will use default number'
IF ( HcoState%Config%doVerbose ) CALL HCO_WARNING( MSG, THISLOC=LOC )
IF ( HcoState%Config%doVerbose ) THEN
CALL HCO_WARNING( MSG, THISLOC=LOC )
ENDIF
ELSE
AM2 = SUM(HcoState%Grid%AREA_M2%Val)/(HcoState%NX*HcoState%NY)
RES = SQRT(AM2)
Expand Down

0 comments on commit b94f2e0

Please sign in to comment.