Skip to content

Commit

Permalink
SMOKEv5.1 Public Release in July 2024
Browse files Browse the repository at this point in the history
  • Loading branch information
cseppan committed Jul 31, 2024
1 parent bf4fbe4 commit 468f5c3
Show file tree
Hide file tree
Showing 45 changed files with 45 additions and 45 deletions.
2 changes: 1 addition & 1 deletion src/biog/normbeis3.f
Original file line number Diff line number Diff line change
Expand Up @@ -43,7 +43,7 @@ PROGRAM NORMBEIS3
INCLUDE 'IODECL3.EXT' ! I/O API function declarations

C......... Local parameters
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... External functions
LOGICAL, EXTERNAL :: ENVYN
Expand Down
2 changes: 1 addition & 1 deletion src/biog/normbeis4.f
Original file line number Diff line number Diff line change
Expand Up @@ -79,7 +79,7 @@ PROGRAM NORMBEIS4
CHARACTER(256) MESG ! message buffer for M3EXIT()
CHARACTER(5) BTMP ! temporary tag for naming output variables
C......... CVS release tag
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.0_Jun2023$'
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.1_Jul2024$'

INTEGER NCOLS ! no. of grid columns
INTEGER NROWS ! no. of grid rows
Expand Down
2 changes: 1 addition & 1 deletion src/biog/tmpbeis3.f
Original file line number Diff line number Diff line change
Expand Up @@ -54,7 +54,7 @@ PROGRAM TMPBEIS3
INCLUDE 'IODECL3.EXT' ! I/O API function declarations

C......... Local parameters
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... External functions
LOGICAL, EXTERNAL :: ENVYN
Expand Down
2 changes: 1 addition & 1 deletion src/cntlmat/cntlmat.f
Original file line number Diff line number Diff line change
Expand Up @@ -59,7 +59,7 @@ PROGRAM CNTLMAT
C........... LOCAL PARAMETERS and their descriptions:

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... LOCAL VARIABLES and their descriptions:

Expand Down
2 changes: 1 addition & 1 deletion src/cntlmat/opencmat.f
Original file line number Diff line number Diff line change
Expand Up @@ -63,7 +63,7 @@ SUBROUTINE OPENCMAT( ENAME, MATTYP, MNAME )

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... SUBROUTINE ARGUMENTS
CHARACTER(*), INTENT (IN) :: ENAME ! emissions inven logical name
Expand Down
2 changes: 1 addition & 1 deletion src/cntlmat/openpmat.f
Original file line number Diff line number Diff line change
Expand Up @@ -62,7 +62,7 @@ SUBROUTINE OPENPMAT( ENAME, BYEARIN, PYEAR, PNAME )

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... SUBROUTINE ARGUMENTS
CHARACTER(*), INTENT (IN) :: ENAME ! emissions inven logical name
Expand Down
2 changes: 1 addition & 1 deletion src/cntlmat/openrmat.f
Original file line number Diff line number Diff line change
Expand Up @@ -64,7 +64,7 @@ SUBROUTINE OPENRMAT( ENAME, RPOL, SFLAG, LFLAG,
C........... LOCAL PARAMETERS
INTEGER , PARAMETER :: NBASVAR = 4
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... SUBROUTINE ARGUMENTS
CHARACTER(*), INTENT (IN) :: ENAME ! emissions inven logical name
Expand Down
2 changes: 1 addition & 1 deletion src/emqa/smkreport.f
Original file line number Diff line number Diff line change
Expand Up @@ -76,7 +76,7 @@ PROGRAM SMKREPORT

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... Gridding Matrix
INTEGER, ALLOCATABLE :: GMAT( : ) ! Contiguous gridding matrix
Expand Down
2 changes: 1 addition & 1 deletion src/emutil/aggwndw.f
Original file line number Diff line number Diff line change
Expand Up @@ -89,7 +89,7 @@ PROGRAM AGGWNDW

C......... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... LOCAL VARIABLES

Expand Down
2 changes: 1 addition & 1 deletion src/emutil/beld3to2.f
Original file line number Diff line number Diff line change
Expand Up @@ -65,7 +65,7 @@ PROGRAM BELD3TO2
C........... LOCAL PARAMETERS

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag
REAL, PARAMETER :: TOHECT = 0.0001 ! factor to convert to hectares
CHARACTER, PARAMETER :: AQUT = "'"
INTEGER, PARAMETER :: IZERO = 0
Expand Down
2 changes: 1 addition & 1 deletion src/emutil/cemscan.f
Original file line number Diff line number Diff line change
Expand Up @@ -41,7 +41,7 @@ PROGRAM CEMSCAN

C......... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag
INTEGER, PARAMETER :: MXSEG = 16 ! number of segments in line

C......... LOCAL VARIABLES
Expand Down
2 changes: 1 addition & 1 deletion src/emutil/extractida.f
Original file line number Diff line number Diff line change
Expand Up @@ -56,7 +56,7 @@ PROGRAM EXTRACTIDA

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024' ! CVS release tag

C............ Allocatable arrays
INTEGER, ALLOCATABLE :: INDEXA ( : ) ! sorting index
Expand Down
2 changes: 1 addition & 1 deletion src/emutil/gentpro.f
Original file line number Diff line number Diff line change
Expand Up @@ -128,7 +128,7 @@ PROGRAM GENTPRO
& YR2DAY, ENVYN, STR2REAL, FINDC

C..... Define temporal profile type constants for enumeration
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

INTEGER, PARAMETER :: MXVAR = 100
INTEGER, PARAMETER :: MXSEG = 16
Expand Down
2 changes: 1 addition & 1 deletion src/emutil/geofac.f
Original file line number Diff line number Diff line change
Expand Up @@ -62,7 +62,7 @@ PROGRAM GEOFAC
C........... PARAMETERS and their descriptions:

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... LOCAL VARIABLES

Expand Down
2 changes: 1 addition & 1 deletion src/emutil/inlineto2d.f
Original file line number Diff line number Diff line change
Expand Up @@ -71,7 +71,7 @@ PROGRAM INLINETO2D
C......... LOCAL PARAMETERS and their descriptions:

CHARACTER(50), PARAMETER ::
& CVSW = '$Name: SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name: SMOKEv5.1_Jul2024$' ! CVS release tag

C........... LOCAL VARIABLES and their descriptions:
C........... Emissions arrays
Expand Down
2 changes: 1 addition & 1 deletion src/emutil/layalloc.f
Original file line number Diff line number Diff line change
Expand Up @@ -60,7 +60,7 @@ PROGRAM LAYALLOC


C........... LOCAL PARAMETERS
CHARACTER*50, PARAMETER :: CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
CHARACTER*50, PARAMETER :: CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag
REAL, PARAMETER :: CONVPA = 1.0E-2 ! conversion factor for Pa to mb

C........... LOCAL VARIABLES and their descriptions:
Expand Down
2 changes: 1 addition & 1 deletion src/emutil/metcombine.f
Original file line number Diff line number Diff line change
Expand Up @@ -54,7 +54,7 @@ PROGRAM METCOMBINE

C......... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

INTEGER, PARAMETER :: MAXVARS = 80 ! maximum number of variables

Expand Down
2 changes: 1 addition & 1 deletion src/emutil/saregroup.f
Original file line number Diff line number Diff line change
Expand Up @@ -59,7 +59,7 @@ PROGRAM REGROUP
CHARACTER(64), PARAMETER ::
& BAR = '-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-'
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... LOCAL VARIABLES and their descriptions:

Expand Down
2 changes: 1 addition & 1 deletion src/emutil/smk2emis.f
Original file line number Diff line number Diff line change
Expand Up @@ -57,7 +57,7 @@ PROGRAM SMK2EMIS
C........... PARAMETERS and their descriptions:

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... EXTERNAL FUNCTIONS and their descriptions:

Expand Down
2 changes: 1 addition & 1 deletion src/emutil/surgtool.f
Original file line number Diff line number Diff line change
Expand Up @@ -76,7 +76,7 @@ PROGRAM SURGTOOL

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C............ Allocatable arrays for computing grid cell intersections
INTEGER, ALLOCATABLE:: C2( :, : ) ! output grid cell
Expand Down
2 changes: 1 addition & 1 deletion src/emutil/uam2ncf.f
Original file line number Diff line number Diff line change
Expand Up @@ -62,7 +62,7 @@ PROGRAM UAM2NCF
C........... PARAMETER

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C....... Input and output emissions

Expand Down
2 changes: 1 addition & 1 deletion src/grdmat/grdmat.f
Original file line number Diff line number Diff line change
Expand Up @@ -92,7 +92,7 @@ PROGRAM GRDMAT

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... LOCAL VARIABLES and their descriptions:
C........... Gridding Matrix
Expand Down
2 changes: 1 addition & 1 deletion src/grdmat/opengmat.f
Original file line number Diff line number Diff line change
Expand Up @@ -76,7 +76,7 @@ SUBROUTINE OPENGMAT( NMATX, NMATXU, UFLAG, INVPROG, INVVERS,

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... Other local variables

Expand Down
2 changes: 1 addition & 1 deletion src/movesmrg/met4moves.f
Original file line number Diff line number Diff line change
Expand Up @@ -102,7 +102,7 @@ PROGRAM MET4MOVES
& FINDCFIRST, STR2INT, BLKORCMT, ENVYN

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag
INTEGER, PARAMETER :: MXVAR = 20

C........... LOCAL VARIABLES and their descriptions:
Expand Down
2 changes: 1 addition & 1 deletion src/movesmrg/mopenmrgout.f
Original file line number Diff line number Diff line change
Expand Up @@ -79,7 +79,7 @@ SUBROUTINE OPENMRGOUT

C........... Local parameters
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... Base and future year per

Expand Down
2 changes: 1 addition & 1 deletion src/movesmrg/movesmrg.f
Original file line number Diff line number Diff line change
Expand Up @@ -126,7 +126,7 @@ PROGRAM MOVESMRG
C......... LOCAL PARAMETERS and their descriptions:

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... LOCAL VARIABLES and their descriptions:

Expand Down
2 changes: 1 addition & 1 deletion src/point/elevpoint.f
Original file line number Diff line number Diff line change
Expand Up @@ -111,7 +111,7 @@ PROGRAM ELEVPOINT

C........... LOCAL PARAMETERS and their descriptions:
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

INTEGER, PARAMETER :: LAYPOINT_APPROACH = 0
INTEGER, PARAMETER :: NOPING_APPROACH = 0
Expand Down
2 changes: 1 addition & 1 deletion src/point/laypoint.f
Original file line number Diff line number Diff line change
Expand Up @@ -101,7 +101,7 @@ PROGRAM LAYPOINT
REAL, PARAMETER :: BTU2M4PS3 = 0.00000258 ! conv. factor for bouyancy flux

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... Indicator for which public inventory arrays need to be read
INTEGER, PARAMETER :: NINVARR = 9
Expand Down
2 changes: 1 addition & 1 deletion src/point/openeout.f
Original file line number Diff line number Diff line change
Expand Up @@ -74,7 +74,7 @@ SUBROUTINE OPENEOUT( NGROUP, SDATE, STIME, ENAME,

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... Other local variables
INTEGER J ! indices and counters
Expand Down
2 changes: 1 addition & 1 deletion src/point/openlayout.f
Original file line number Diff line number Diff line change
Expand Up @@ -66,7 +66,7 @@ SUBROUTINE OPENLAYOUT( SDATE, STIME, TSTEP, EMLAYS, REP_LAYR,

C........... LOCAL PARAMETERS and their descriptions:
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... SUBROUTINE ARGUMENTS
INTEGER , INTENT (IN) :: SDATE ! Julian start date
Expand Down
2 changes: 1 addition & 1 deletion src/point/wpingstk.f
Original file line number Diff line number Diff line change
Expand Up @@ -65,7 +65,7 @@ SUBROUTINE WPINGSTK( FNAME, SDATE, STIME, LFLAG )

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... Local variables allocatable arrays
C........... These are for sorting groups and outputting in sorted order
Expand Down
2 changes: 1 addition & 1 deletion src/smkinven/grwinven.f
Original file line number Diff line number Diff line change
Expand Up @@ -68,7 +68,7 @@ PROGRAM GRWINVEN
C........... LOCAL PARAMETERS and their descriptions:

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... LOCAL VARIABLES and their descriptions:
C........... Local parameters
Expand Down
2 changes: 1 addition & 1 deletion src/smkinven/opengrwout.f
Original file line number Diff line number Diff line change
Expand Up @@ -80,7 +80,7 @@ SUBROUTINE OPENGRWOUT( ENAME, FYEAR, NAME1, SFLAG,

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... Other local variables

Expand Down
2 changes: 1 addition & 1 deletion src/smkinven/openinvout.f
Original file line number Diff line number Diff line change
Expand Up @@ -82,7 +82,7 @@ SUBROUTINE OPENINVOUT( A2PFLAG, GRDNM, ENAME, ANAME, IDEV,
C........... LOCAL PARAMETERS
CHARACTER(16), PARAMETER :: FORMEVNM = 'SMKINVEN_FORMULA'
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... Other local variables

Expand Down
2 changes: 1 addition & 1 deletion src/smkinven/openpdout.f
Original file line number Diff line number Diff line change
Expand Up @@ -71,7 +71,7 @@ SUBROUTINE OPENPDOUT( NPDSRC, NVAR, TZONE, SDATE, STIME, TSTEP,

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... Other local variables

Expand Down
2 changes: 1 addition & 1 deletion src/smkinven/smkinven.f
Original file line number Diff line number Diff line change
Expand Up @@ -94,7 +94,7 @@ PROGRAM SMKINVEN

C........... LOCAL PARAMETERS and their descriptions:

CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... LOCAL VARIABLES and their descriptions:

Expand Down
2 changes: 1 addition & 1 deletion src/smkmerge/mrgasciielev.f
Original file line number Diff line number Diff line change
Expand Up @@ -71,7 +71,7 @@ PROGRAM MRGELEV
& JUNIT, PROMPTFFILE, SECSDIFF, SEC2TIME

C......... LOCAL PARAMETERS
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag
INTEGER, PARAMETER :: MXPING = 300 ! final number of PinG sources

C......... LOCAL VARIABLES
Expand Down
2 changes: 1 addition & 1 deletion src/smkmerge/mrggrid.f
Original file line number Diff line number Diff line change
Expand Up @@ -84,7 +84,7 @@ PROGRAM MRGGRID
C......... LOCAL PARAMETERS and their descriptions:

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... LOCAL VARIABLES and their descriptions:
CHARACTER(16) :: SEGMENT( 3 )
Expand Down
2 changes: 1 addition & 1 deletion src/smkmerge/mrgpt.f
Original file line number Diff line number Diff line change
Expand Up @@ -80,7 +80,7 @@ PROGRAM MRGPT
C......... LOCAL PARAMETERS and their descriptions:

CHARACTER(50), PARAMETER ::
& CVSW = '$Name: SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name: SMOKEv5.1_Jul2024$' ! CVS release tag

C........... LOCAL VARIABLES and their descriptions:

Expand Down
2 changes: 1 addition & 1 deletion src/smkmerge/openmrgout.f
Original file line number Diff line number Diff line change
Expand Up @@ -91,7 +91,7 @@ SUBROUTINE OPENMRGOUT( NGRP )

C........... Local parameters
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C......... Base and future year per

Expand Down
2 changes: 1 addition & 1 deletion src/smkmerge/smkmerge.f
Original file line number Diff line number Diff line change
Expand Up @@ -139,7 +139,7 @@ PROGRAM SMKMERGE
CHARACTER(16), PARAMETER :: PROGNAME = 'SMKMERGE' ! program name

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS release tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS release tag

C........... LOCAL VARIABLES and their descriptions:

Expand Down
2 changes: 1 addition & 1 deletion src/spcmat/opensmat.f
Original file line number Diff line number Diff line change
Expand Up @@ -84,7 +84,7 @@ SUBROUTINE OPENSMAT( ENAME, SFLAG, LFLAG, NOPOL, MXSPEC,

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023 $' ! CVS revision tag
& CVSW = '$Name SMOKEv5.1_Jul2024 $' ! CVS revision tag

C......... Count of species per inventory pollutant/emission type
INTEGER NSPEC( NIPPA )
Expand Down
2 changes: 1 addition & 1 deletion src/spcmat/spcmat.f
Original file line number Diff line number Diff line change
Expand Up @@ -81,7 +81,7 @@ PROGRAM SPCMAT
CHARACTER(1 ), PARAMETER :: QUOTE = "'"

CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS revision tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS revision tag

C........... LOCAL VARIABLES and their descriptions:

Expand Down
2 changes: 1 addition & 1 deletion src/temporal/opentmp.f
Original file line number Diff line number Diff line change
Expand Up @@ -86,7 +86,7 @@ SUBROUTINE OPENTMP( II, ENAME, SDATE, STIME, TSTEP, NSTEPS,

C........... LOCAL PARAMETERS
CHARACTER(50), PARAMETER ::
& CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS revision tag
& CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS revision tag

C........... Other local variables

Expand Down
Loading

0 comments on commit 468f5c3

Please sign in to comment.