Merge pull request #165 from akrherz/gh149_alt

Fix RHEL9 compile

Author: akrherz

config/Makeinc.linux64_gfortran

@@ -9,7 +9,7 @@ MOTIFINC  = -I/usr/X11R6/include
 XWINCDIR  = -I/usr/X11R6/include
 
 COPT = -DUNDERSCORE -D$(OPSYS) $(GEMINC) $(MOTIFINC) $(PYINC) $(WITHPY) -DG_64BIT -g -O2 -fPIC
-FOPT = -fno-second-underscore -fno-range-check -fd-lines-as-comments $(GEMINC) -g -O
+FOPT = -fallow-invalid-boz -fallow-argument-mismatch -fno-second-underscore -fno-range-check -fd-lines-as-comments $(GEMINC) -g -O
 NCII = "-I../libsrc"
 NCOPT = "CPPFLAGS=-DNDEBUG -Df2cFortran -I$(OS_INC)" "FFLAGS=-O -Wno-globals" "CFLAGS=-O $(NCII)" "CXX= "
 JASPEROPT = 'CC=$(CC)' 'CFLAGS=-O' '--disable-libjpeg'

gempak/source/programs/dc/dcuair/dcudcd.f

@@ -242,12 +242,12 @@ SUBROUTINE DCUDCD ( curtim, gemfil, stntbl, iadstn, maxtim,
 C*                              the TTBB message, still decode the following
 C*                              PPBB winds.
 C
-                                ipres =  INDEX ( bultin ( 1: lenbul ), '21212' )
-                                IF  ( ipres .ne. 0 )  THEN
-                                    IF ( part .eq.  'PPBB' )  THEN
-                                       IF ( .not.  zwind ) good  = .true.
-                                    END IF   
-                                END IF    
+								ipres =  INDEX ( bultin ( 1: lenbul ), '21212' )
+								IF  ( ipres .ne. 0 )  THEN
+									IF ( part .eq.  'PPBB' )  THEN
+                                                                           IF ( .not.  zwind ) good  = .true.
+                                                                        END IF
+								END IF
 			    END IF
 			    IF ( good ) THEN
 C