diff --git a/src/biog/normbeis3.f b/src/biog/normbeis3.f index be2a0c10..b64ce78d 100644 --- a/src/biog/normbeis3.f +++ b/src/biog/normbeis3.f @@ -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 diff --git a/src/biog/normbeis4.f b/src/biog/normbeis4.f index 2b5d8f4a..8299bdb6 100644 --- a/src/biog/normbeis4.f +++ b/src/biog/normbeis4.f @@ -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 diff --git a/src/biog/tmpbeis3.f b/src/biog/tmpbeis3.f index 0f2be92b..2d948d13 100644 --- a/src/biog/tmpbeis3.f +++ b/src/biog/tmpbeis3.f @@ -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 diff --git a/src/cntlmat/cntlmat.f b/src/cntlmat/cntlmat.f index 0df330c0..fc70fff8 100644 --- a/src/cntlmat/cntlmat.f +++ b/src/cntlmat/cntlmat.f @@ -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: diff --git a/src/cntlmat/opencmat.f b/src/cntlmat/opencmat.f index 8c849e92..99dd571e 100644 --- a/src/cntlmat/opencmat.f +++ b/src/cntlmat/opencmat.f @@ -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 diff --git a/src/cntlmat/openpmat.f b/src/cntlmat/openpmat.f index 068a3032..67206215 100644 --- a/src/cntlmat/openpmat.f +++ b/src/cntlmat/openpmat.f @@ -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 diff --git a/src/cntlmat/openrmat.f b/src/cntlmat/openrmat.f index 5f1f3763..0845b4e7 100644 --- a/src/cntlmat/openrmat.f +++ b/src/cntlmat/openrmat.f @@ -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 diff --git a/src/emqa/smkreport.f b/src/emqa/smkreport.f index 9bab636c..5fda8e7f 100644 --- a/src/emqa/smkreport.f +++ b/src/emqa/smkreport.f @@ -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 diff --git a/src/emutil/aggwndw.f b/src/emutil/aggwndw.f index 86cf9ac0..37549ffb 100644 --- a/src/emutil/aggwndw.f +++ b/src/emutil/aggwndw.f @@ -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 diff --git a/src/emutil/beld3to2.f b/src/emutil/beld3to2.f index 33d59702..424a3c89 100644 --- a/src/emutil/beld3to2.f +++ b/src/emutil/beld3to2.f @@ -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 diff --git a/src/emutil/cemscan.f b/src/emutil/cemscan.f index d114c08f..be4a15a7 100644 --- a/src/emutil/cemscan.f +++ b/src/emutil/cemscan.f @@ -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 diff --git a/src/emutil/extractida.f b/src/emutil/extractida.f index 9dac4eb1..f2983525 100644 --- a/src/emutil/extractida.f +++ b/src/emutil/extractida.f @@ -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 diff --git a/src/emutil/gentpro.f b/src/emutil/gentpro.f index f115076d..c7a87eb4 100644 --- a/src/emutil/gentpro.f +++ b/src/emutil/gentpro.f @@ -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 diff --git a/src/emutil/geofac.f b/src/emutil/geofac.f index f19131b8..345ce109 100644 --- a/src/emutil/geofac.f +++ b/src/emutil/geofac.f @@ -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 diff --git a/src/emutil/inlineto2d.f b/src/emutil/inlineto2d.f index c2e75511..eac09009 100644 --- a/src/emutil/inlineto2d.f +++ b/src/emutil/inlineto2d.f @@ -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 diff --git a/src/emutil/layalloc.f b/src/emutil/layalloc.f index c288d114..bc205fa6 100644 --- a/src/emutil/layalloc.f +++ b/src/emutil/layalloc.f @@ -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: diff --git a/src/emutil/metcombine.f b/src/emutil/metcombine.f index e1162259..e4093093 100644 --- a/src/emutil/metcombine.f +++ b/src/emutil/metcombine.f @@ -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 diff --git a/src/emutil/saregroup.f b/src/emutil/saregroup.f index ba377a01..21049507 100644 --- a/src/emutil/saregroup.f +++ b/src/emutil/saregroup.f @@ -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: diff --git a/src/emutil/smk2emis.f b/src/emutil/smk2emis.f index 20aa3738..e940ac74 100644 --- a/src/emutil/smk2emis.f +++ b/src/emutil/smk2emis.f @@ -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: diff --git a/src/emutil/surgtool.f b/src/emutil/surgtool.f index 949aff23..e8685e1b 100644 --- a/src/emutil/surgtool.f +++ b/src/emutil/surgtool.f @@ -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 diff --git a/src/emutil/uam2ncf.f b/src/emutil/uam2ncf.f index 8d42b80d..98a8fed1 100644 --- a/src/emutil/uam2ncf.f +++ b/src/emutil/uam2ncf.f @@ -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 diff --git a/src/grdmat/grdmat.f b/src/grdmat/grdmat.f index 25c861b4..d9037e37 100644 --- a/src/grdmat/grdmat.f +++ b/src/grdmat/grdmat.f @@ -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 diff --git a/src/grdmat/opengmat.f b/src/grdmat/opengmat.f index 7deb98c5..843bd3da 100644 --- a/src/grdmat/opengmat.f +++ b/src/grdmat/opengmat.f @@ -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 diff --git a/src/movesmrg/met4moves.f b/src/movesmrg/met4moves.f index e43ecb31..f0ab1938 100644 --- a/src/movesmrg/met4moves.f +++ b/src/movesmrg/met4moves.f @@ -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: diff --git a/src/movesmrg/mopenmrgout.f b/src/movesmrg/mopenmrgout.f index 85a7f427..c87f9ea1 100644 --- a/src/movesmrg/mopenmrgout.f +++ b/src/movesmrg/mopenmrgout.f @@ -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 diff --git a/src/movesmrg/movesmrg.f b/src/movesmrg/movesmrg.f index da25a771..cddd3aed 100644 --- a/src/movesmrg/movesmrg.f +++ b/src/movesmrg/movesmrg.f @@ -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: diff --git a/src/point/elevpoint.f b/src/point/elevpoint.f index 571aaeac..f9704a3f 100644 --- a/src/point/elevpoint.f +++ b/src/point/elevpoint.f @@ -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 diff --git a/src/point/laypoint.f b/src/point/laypoint.f index ab717440..e422aca9 100644 --- a/src/point/laypoint.f +++ b/src/point/laypoint.f @@ -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 diff --git a/src/point/openeout.f b/src/point/openeout.f index 9aab86d4..29ae694b 100644 --- a/src/point/openeout.f +++ b/src/point/openeout.f @@ -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 diff --git a/src/point/openlayout.f b/src/point/openlayout.f index 4aecda03..0934a43a 100644 --- a/src/point/openlayout.f +++ b/src/point/openlayout.f @@ -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 diff --git a/src/point/wpingstk.f b/src/point/wpingstk.f index 0dbe9a4f..6096e84e 100644 --- a/src/point/wpingstk.f +++ b/src/point/wpingstk.f @@ -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 diff --git a/src/smkinven/grwinven.f b/src/smkinven/grwinven.f index 2cc43eca..759cb43d 100644 --- a/src/smkinven/grwinven.f +++ b/src/smkinven/grwinven.f @@ -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 diff --git a/src/smkinven/opengrwout.f b/src/smkinven/opengrwout.f index d770bdc6..84add421 100644 --- a/src/smkinven/opengrwout.f +++ b/src/smkinven/opengrwout.f @@ -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 diff --git a/src/smkinven/openinvout.f b/src/smkinven/openinvout.f index b629d1c7..9b0e8340 100644 --- a/src/smkinven/openinvout.f +++ b/src/smkinven/openinvout.f @@ -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 diff --git a/src/smkinven/openpdout.f b/src/smkinven/openpdout.f index 9f923f5d..d775f031 100644 --- a/src/smkinven/openpdout.f +++ b/src/smkinven/openpdout.f @@ -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 diff --git a/src/smkinven/smkinven.f b/src/smkinven/smkinven.f index 6a2a4e4a..8b2e4610 100644 --- a/src/smkinven/smkinven.f +++ b/src/smkinven/smkinven.f @@ -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: diff --git a/src/smkmerge/mrgasciielev.f b/src/smkmerge/mrgasciielev.f index daa18bfa..a1cfd198 100644 --- a/src/smkmerge/mrgasciielev.f +++ b/src/smkmerge/mrgasciielev.f @@ -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 diff --git a/src/smkmerge/mrggrid.f b/src/smkmerge/mrggrid.f index e285e568..becc02d3 100644 --- a/src/smkmerge/mrggrid.f +++ b/src/smkmerge/mrggrid.f @@ -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 ) diff --git a/src/smkmerge/mrgpt.f b/src/smkmerge/mrgpt.f index 45f43cd8..42a3b9bf 100644 --- a/src/smkmerge/mrgpt.f +++ b/src/smkmerge/mrgpt.f @@ -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: diff --git a/src/smkmerge/openmrgout.f b/src/smkmerge/openmrgout.f index 0f2b7708..daca1791 100644 --- a/src/smkmerge/openmrgout.f +++ b/src/smkmerge/openmrgout.f @@ -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 diff --git a/src/smkmerge/smkmerge.f b/src/smkmerge/smkmerge.f index 0f724854..d9c394e7 100644 --- a/src/smkmerge/smkmerge.f +++ b/src/smkmerge/smkmerge.f @@ -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: diff --git a/src/spcmat/opensmat.f b/src/spcmat/opensmat.f index 08b1e7ca..e5c559a8 100644 --- a/src/spcmat/opensmat.f +++ b/src/spcmat/opensmat.f @@ -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 ) diff --git a/src/spcmat/spcmat.f b/src/spcmat/spcmat.f index bf897516..5bd456f4 100644 --- a/src/spcmat/spcmat.f +++ b/src/spcmat/spcmat.f @@ -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: diff --git a/src/temporal/opentmp.f b/src/temporal/opentmp.f index db0b0af6..310ed989 100644 --- a/src/temporal/opentmp.f +++ b/src/temporal/opentmp.f @@ -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 diff --git a/src/temporal/temporal.f b/src/temporal/temporal.f index 8db6a9ab..b396df96 100644 --- a/src/temporal/temporal.f +++ b/src/temporal/temporal.f @@ -104,7 +104,7 @@ PROGRAM TEMPORAL C......... LOCAL PARAMETERS and their descriptions: - CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.0_Jun2023$' ! CVS revision tag + CHARACTER(50), PARAMETER :: CVSW = '$Name SMOKEv5.1_Jul2024$' ! CVS revision tag C......... Array that contains the names of the inventory variables needed for C this program