Ambiguous definition of EFLAG variable in setoutdate

CEMPD / SMOKE

Create emissions inputs for multiple air quality modeling systems with unmatched speed and flexibility

https://www.cmascenter.org/smoke/

45 stars 21 forks source link

Ambiguous definition of EFLAG variable in setoutdate #90

Closed jlbeidler closed 5 months ago

jlbeidler commented 5 months ago

Local logical variable EFLAG is not initialized with a default value in the setoudate.f subroutine. This could cause an incorrect exit at line 130 with certain compilers or compiler options.

hnqtran commented 5 months ago

Confirm that initialize EFLAG = .FALSE. in setoutdate.f solved the issue "'Inconsistent start time in input files" (which only occurred with gfortran compiler).

Change made to line 80: LOGICAL :: EFLAG = .FALSE. ! true: an error has happened