Can't build on Ubuntu 21.04

[d3v-null]

Hey there! Unfortunately my drivers aren't supported on Ubuntu 20.04, so I have no option but to use Ubuntu 21.04.

I'm able to build regular casacore just fine with

mkdir build
cd build
cmake .. -DDATA_DIR=/var/lib/casacore/data -DUSE_FFTW3=ON -DUSE_HDF5=ON -DUSE_THREADS=ON -DUSE_OPENMP=ON -DCMAKE_BUILD_TYPE=Release -DBUILD_TESTING=OFF -DBUILD_PYTHON=OFF -DUseCcache=1 -DHAS_CXX11=1
make -j

However, when running the same commands in carta casacore, I get a bunch of fortran errors.

cmake .. -DUSE_FFTW3=ON -DUSE_HDF5=ON -DUSE_THREADS=ON -DUSE_OPENMP=ON -DCMAKE_BUILD_TYPE=Release -DBUILD_TESTING=OFF -DBUILD_PYTHON=OFF -DUseCcache=1 -DHAS_CXX11=1 -DCMAKE_INSTALL_PREFIX=/opt/carta-casacore

CMake Deprecation Warning at CMakeLists.txt:20 (cmake_policy):
  The OLD behavior for policy CMP0048 will be removed from a future version
  of CMake.

  The cmake-policies(7) manual explains that the OLD behaviors of all
  policies are deprecated and that a policy should be set to OLD only under
  specific short-term circumstances.  Projects should be ported to the NEW
  behavior and not rely on setting a policy to OLD.


-- Searching for ccache.
-- Using namespace casacore.
-- Could NOT find SOFA (missing: SOFA_LIBRARY) 
-- A library with LAPACK API found.
CMake Warning (dev) at imageanalysis/CMakeLists.txt:389:
  Syntax Warning in cmake code at column 43

  Argument not separated from preceding token by whitespace.
This warning is for project developers.  Use -Wno-dev to suppress it.

-- CMAKE_SYSTEM .......... = Linux-5.11.0-18-generic
-- CMAKE_BUILD_TYPE ...... = Release
-- Modules to be built ... = casa;tables;scimath_f;scimath;measures;meas;fits;ms;msfits;derivedmscal;lattices;mirlib;coordinates;images
-- BUILD_SHARED_LIBS ..... = ON
-- ENABLE_RPATH .......... = ON
-- CMAKE_INSTALL_NAME_DIR  = /opt/carta-casacore/lib
-- ENABLE_TABLELOCKING ... = ON
-- USE_THREADS ........... = YES
-- USE_OPENMP ............ = ON
-- USE_MPI ............... = OFF
-- USE_STACKTRACE ........ = OFF
-- HAVE_O_DIRECT ......... = 1
-- CMAKE_CXX_COMPILER .... = /usr/bin/c++
-- CMAKE_CXX_FLAGS ....... = -fcx-fortran-rules  -std=c++11 -fsigned-char -std=c++11 -fopenmp -pthread
-- DATA directory ........ = /var/lib/casacore/data
-- DL library? ........... = /usr/lib/x86_64-linux-gnu/libdl.so
-- Pthreads library? ..... = /usr/lib/x86_64-linux-gnu/libpthread.so
-- Readline library? ..... = /usr/lib/x86_64-linux-gnu/libreadline.so;/usr/lib/x86_64-linux-gnu/libncurses.so
-- BLAS library? ......... = /usr/lib/x86_64-linux-gnu/libblas.so
-- LAPACK library? ....... = /usr/lib/x86_64-linux-gnu/liblapack.so;/usr/lib/x86_64-linux-gnu/libblas.so
-- WCS library? .......... = /usr/lib/x86_64-linux-gnu/libwcs.so;/usr/lib/x86_64-linux-gnu/libm.so
-- SOFA library? ......... = SOFA_LIBRARY-NOTFOUND
-- CFitsio library? ...... = /usr/local/lib/libcfitsio.so;/usr/lib/x86_64-linux-gnu/libm.so
-- ADIOS2 library? ....... = 
-- HDF5 library? ......... = optimized;/usr/lib/x86_64-linux-gnu/hdf5/serial/lib/libhdf5.so;debug;/usr/lib/x86_64-linux-gnu/hdf5/serial/lib/libhdf5.so
-- FFTW3 library? ........ = /usr/lib/x86_64-linux-gnu/libfftw3f_threads.so;/usr/lib/x86_64-linux-gnu/libfftw3_threads.so;/usr/lib/x86_64-linux-gnu/libfftw3f.so;/usr/lib/x86_64-linux-gnu/libfftw3.so
-- GSL library? .......... = -L/usr/lib/x86_64-linux-gnu -lgsl -lgslcblas -lm
-- GSL CXXFLAGS? ......... = 
-- BUILD_DEPRECATED ...... = OFF
-- BUILD_PYTHON .......... = OFF
-- BUILD_PYTHON3 ......... = OFF
-- Configuring done
-- Generating done
-- Build files have been written to: /home/dev/code/carta-casacore/build

make -j

[  0%] Built target patch_stdcasa_variant
[ 21%] Built target casa_casa
[ 21%] Built target casahdf5support
[ 23%] Built target casa_mirlib
[ 40%] Built target casa_tables
[ 42%] Building Fortran object casa6/casatools/casacore/scimath_f/CMakeFiles/casa_scimath_f.dir/fftpak.f.o
[ 42%] Building Fortran object casa6/casatools/casacore/scimath_f/CMakeFiles/casa_scimath_f.dir/dfftpak.f.o
[ 42%] Building Fortran object casa6/casatools/casacore/scimath_f/CMakeFiles/casa_scimath_f.dir/lawson.f.o
[ 42%] Built target tomf
[ 42%] Built target showtablelock
[ 42%] Built target tablefromascii
[ 42%] Built target lsmf
f951: Warning: Nonexistent include directory ‘/opt/casa/03/include’ [-Wmissing-include-dirs]
f951: Warning: Nonexistent include directory ‘/opt/casa/03/include’ [-Wmissing-include-dirs]
f951: Warning: Nonexistent include directory ‘/opt/casa/03/include’ [-Wmissing-include-dirs]
[ 42%] Built target taql
[ 42%] Built target showtableinfo
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:45:72:

   45 |    30           H(L) = H(L) + A(I,L)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:60:72:

   60 |    60       A(I,LMAX) = TMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:66:72:

   66 |    80     CALL H12 (2,J,J+1,M,A(1,J),1,H(J),B,1,MDB,NB)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:85:72:

   85 |   120       TMP = TMP + B(I,JB)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:86:72:

   86 |   130     RNORM(JB) = SQRT(TMP)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:92:72:

   92 |           DO 150 I = 1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:93:72:

   93 |   150       B(I,JB) = SZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:102:72:

  102 |   170     CALL H12 (1,I,KP1,N,A(I,1),MDA,G(I),A,MDA,1,I-1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:117:72:

  117 |   190         SM = SM + A(I,J)*DBLE(B(J,JB))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:119:72:

  119 |   210       B(I,JB) = (B(I,JB)-SM1)/A(I,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:123:72:

  123 |   220         B(J,JB) = SZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:125:72:

  125 |   230         CALL H12 (2,I,KP1,N,A(I,1),MDA,G(I),B(1,JB),1,MDB,1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:161:72:

  161 |    10     X(J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:179:72:

  179 |    20         W(IW)=G(J,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:181:72:

  181 |    30     W(IW)=H(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:186:72:

  186 |    40     W(IW)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:209:72:

  209 |    60     FAC=FAC-H(I)*W(IW)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:219:72:

  219 |    80         X(J)=X(J)+G(I,J)*W(IW)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:220:72:

  220 |    90     X(J)=X(J)*FAC
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:222:72:

  222 |   100     XNORM=XNORM+X(J)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:315:72:

  315 |    20     INDEX(I)=I
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:334:72:

  334 |    40         SM=SM+A(L,J)*B(L)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:335:72:

  335 |    50     W(J)=SM
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:362:72:

  362 |    90     UNORM=UNORM+A(L,J)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:371:72:

  371 |   120     ZZ(L)=B(L)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:394:72:

  394 |   150     B(L)=ZZ(L)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:405:72:

  405 |   160     CALL H12 (2,NSETP,NPP1,M,A(1,J),1,UP,A(1,JJ),1,MDA,1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:410:72:

  410 |   180     A(L,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:458:72:

  458 |   250     X(L)=X(L)+ALPHA*(ZZ(IP)-X(L))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:476:72:

  476 |   280     CALL G2 (CC,SS,B(J-1),B(J))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:498:72:

  498 |   310     ZZ(I)=B(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:508:72:

  508 |   340     X(I)=ZZ(IP)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:520:72:

  520 |   360     SM=SM+B(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:523:72:

  523 |   380     W(J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:534:72:

  534 |   410         ZZ(II)=ZZ(II)-A(II,JJ)*ZZ(IP+1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:536:72:

  536 |   430     ZZ(IP)=ZZ(IP)/A(IP,JJ)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 430 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:580:72:

  580 |    10     CL=AMAX1(ABS(U(1,J)),CL)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:587:72:

  587 |    30     SM=SM+(DBLE(U(1,J))*CLINV)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:617:72:

  617 |    90         I3=I3+ICE
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:624:72:

  624 |   110         I4=I4+ICE
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:696:72:

  696 |    10     X(J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:714:72:

  714 |    20         W(IW)=G(J,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:716:72:

  716 |    30     W(IW)=H(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:721:72:

  721 |    40     W(IW)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:744:72:

  744 |    60     FAC=FAC-H(I)*W(IW)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:754:72:

  754 |    80         X(J)=X(J)+G(I,J)*W(IW)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:755:72:

  755 |    90     X(J)=X(J)*FAC
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:757:72:

  757 |   100     XNORM=XNORM+X(J)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:843:72:

  843 |    20     INDEX(I)=I
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:862:72:

  862 |    40         SM=SM+A(L,J)*B(L)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:863:72:

  863 |    50     W(J)=SM
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:890:72:

  890 |    90     UNORM=UNORM+A(L,J)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:899:72:

  899 |   120     ZZ(L)=B(L)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:922:72:

  922 |   150     B(L)=ZZ(L)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:933:72:

  933 |   160     CALL DH12 (2,NSETP,NPP1,M,A(1,J),1,UP,A(1,JJ),1,MDA,1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:938:72:

  938 |   180     A(L,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:986:72:

  986 |   250     X(L)=X(L)+ALPHA*(ZZ(IP)-X(L))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1004:72:

 1004 |   280     CALL DG2 (CC,SS,B(J-1),B(J))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1026:72:

 1026 |   310     ZZ(I)=B(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1036:72:

 1036 |   340     X(I)=ZZ(IP)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1048:72:

 1048 |   360     SM=SM+B(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1051:72:

 1051 |   380     W(J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1062:72:

 1062 |   410         ZZ(II)=ZZ(II)-A(II,JJ)*ZZ(IP+1)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1064:72:

 1064 |   430     ZZ(IP)=ZZ(IP)/A(IP,JJ)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 430 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1109:72:

 1109 |    10     CL=DMAX1(ABS(U(1,J)),CL)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1115:72:

 1115 |    30     SM=SM+(DBLE(U(1,J))*CLINV)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1145:72:

 1145 |    90         I3=I3+ICE
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:1152:72:

 1152 |   110         I4=I4+ICE
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:886:45:

  886 |       CALL DH12 (1,NPP1,NPP1+1,M,A(1,J),1,UP,DUMMY,1,1,0)
      |                                             1
Error: Rank mismatch in argument ‘c’ at (1) (rank-1 and scalar)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/lawson.f:358:44:

  358 |       CALL H12 (1,NPP1,NPP1+1,M,A(1,J),1,UP,DUMMY,1,1,0)
      |                                            1
Error: Rank mismatch in argument ‘c’ at (1) (rank-1 and scalar)
make[2]: *** [casa6/casatools/casacore/scimath_f/CMakeFiles/casa_scimath_f.dir/build.make:342: casa6/casatools/casacore/scimath_f/CMakeFiles/casa_scimath_f.dir/lawson.f.o] Error 1
make[2]: *** Waiting for unfinished jobs....
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/dfftpak.f:732:72:

  732 |       CALL DRFTB1 (N,R,WSAVE,WSAVE(N+1),WSAVE(2*N+1))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/dfftpak.f:214:72:

  214 |       CALL DRFTF1 (N,R,WSAVE,WSAVE(N+1),WSAVE(2*N+1))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/dfftpak.f:82:72:

   82 |       CALL DRFTI1 (N,WSAVE(N+1),WSAVE(2*N+1))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/dfftpak.f:1284:72:

 1284 |       CALL DEFFT1 (N,WSAVE(2*N+1),WSAVE(3*N+1))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/dfftpak.f:2213:72:

 2213 |       CALL DCFTI1 (N,WSAVE(IW1),WSAVE(IW2))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/dfftpak.f:2341:72:

 2341 |       CALL DCFTF1 (N,C,WSAVE,WSAVE(IW1),WSAVE(IW2))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/dfftpak.f:2806:72:

 2806 |       CALL DCFTB1 (N,C,WSAVE,WSAVE(IW1),WSAVE(IW2))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)
make[2]: *** [casa6/casatools/casacore/scimath_f/CMakeFiles/casa_scimath_f.dir/build.make:147: casa6/casatools/casacore/scimath_f/CMakeFiles/casa_scimath_f.dir/dfftpak.f.o] Error 1
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4392:72:

 4392 |          DO 101 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 101 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4403:72:

 4403 |          DO 103 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 103 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4414:72:

 4414 |          DO 104 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 104 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4443:72:

 4443 |          DO 101 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 101 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4454:72:

 4454 |          DO 107 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 107 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4464:72:

 4464 |          DO 103 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 103 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4474:72:

 4474 |          DO 104 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 104 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4502:72:

 4502 |          DO 101 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 101 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4519:72:

 4519 |          DO 103 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 103 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4538:72:

 4538 |          DO 104 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 104 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4578:72:

 4578 |          DO 101 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 101 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4595:72:

 4595 |          DO 107 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 107 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4613:72:

 4613 |          DO 103 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 103 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4631:72:

 4631 |          DO 104 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 104 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4670:72:

 4670 |          DO 101 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 101 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4691:72:

 4691 |          DO 103 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 103 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4714:72:

 4714 |          DO 104 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 104 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4761:72:

 4761 |          DO 101 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 101 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4782:72:

 4782 |          DO 107 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 107 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4804:72:

 4804 |          DO 103 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 103 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4826:72:

 4826 |          DO 104 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 104 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4873:72:

 4873 |          DO 101 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 101 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4906:72:

 4906 |          DO 103 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 103 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4939:72:

 4939 |          DO 104 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 104 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5000:72:

 5000 |          DO 101 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 101 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5033:72:

 5033 |          DO 107 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 107 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5065:72:

 5065 |          DO 103 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 103 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5097:72:

 5097 |          DO 104 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 104 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5159:72:

 5159 |          DO 110 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5168:72:

 5168 |          DO 112 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 112 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5179:72:

 5179 |          DO 117 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 117 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5189:72:

 5189 |          DO 113 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 113 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5203:72:

 5203 |                DO 114 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 114 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5216:72:

 5216 |          DO 119 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 119 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5228:72:

 5228 |          DO 137 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 137 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5237:72:

 5237 |          DO 134 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 134 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5249:72:

 5249 |          DO 130 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 130 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5258:72:

 5258 |          DO 122 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 122 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5268:72:

 5268 |                DO 124 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 124 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5301:72:

 5301 |          DO 110 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5310:72:

 5310 |          DO 112 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 112 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5321:72:

 5321 |          DO 117 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 117 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5331:72:

 5331 |          DO 113 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 113 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5345:72:

 5345 |                DO 114 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 114 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5359:72:

 5359 |          DO 149 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 149 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5367:72:

 5367 |          DO 119 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 119 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5379:72:

 5379 |          DO 147 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 147 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5388:72:

 5388 |          DO 144 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 144 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5399:72:

 5399 |          DO 137 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 137 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5408:72:

 5408 |          DO 134 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 134 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5419:72:

 5419 |          DO 130 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 130 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5428:72:

 5428 |          DO 122 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 122 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5438:72:

 5438 |                DO 124 M1=1,M1D,IM1
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 124 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5582:72:

 5582 |       IF (N-2) 300,102,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5625:72:

 5625 |       IF (N-2) 102,101,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5805:72:

 5805 |       IF (N-2) 101,102,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5861:72:

 5861 |       IF (N-2) 102,101,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6049:72:

 6049 |       IF (N-2) 106,101,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6120:72:

 6120 |       IF (N-2) 200,101,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6321:72:

 6321 |       IF (J-4) 102,102,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6327:72:

 6327 |       IF (NR) 101,105,101
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6511:72:

 6511 |       IF (N-2) 106,101,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6615:72:

 6615 |       IF (N-2) 200,101,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6721:72:

 6721 |       IF (IDO-2) 107,105,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6845:72:

 6845 |       IF (IDO-2) 107,105,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:7277:72:

 7277 |       IF (IDO-2) 107,105,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:7400:72:

 7400 |       IF (IDO-2) 107,105,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:7872:72:

 7872 |       DO 118 I=1,M
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 118 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:7881:72:

 7881 |       DO 122 I=1,M
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 122 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8019:72:

 8019 |       DO 118 I=1,M
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 118 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8038:72:

 8038 |       DO 122 I=1,M
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 122 at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8069:72:

 8069 |       IF (J-4) 102,102,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8075:72:

 8075 |       IF (NR) 101,105,101
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8132:72:

 8132 |       IF (N-2) 200,102,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8218:72:

 8218 |       IF (N-2) 101,102,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8305:72:

 8305 |       IF (IDO-2) 107,105,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8343:72:

 8343 |       IF (IDO-2) 107,105,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8501:72:

 8501 |       IF (IDO-2) 107,105,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8566:72:

 8566 |       IF (IDO-2) 107,105,102
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:9820:72:

 9820 |       IF (J-4) 102,102,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:9826:72:

 9826 |       IF (NR) 101,105,101
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:10356:72:

10356 |       IF (N-2) 200,102,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:10414:72:

10414 |       IF (N-2) 200,102,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8253:58:

 8253 |       CALL RFFTMF(LOT,1,NP1,LOT,XH,LNXH,WSAVE(NS2+1),LNSV,WORK,
      |                                                          1
Error: Rank mismatch in argument ‘work’ at (1) (rank-1 and scalar)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:8167:58:

 8167 |       CALL RFFTMF(LOT,1,NP1,LOT,XH,LNXH,WSAVE(NS2+1),LNSV,WORK,
      |                                                          1
Error: Rank mismatch in argument ‘work’ at (1) (rank-1 and scalar)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:10437:50:

10437 |       CALL RFFT1F(NP1,1,XH,LNXH,WSAVE(NS2+1),LNSV,WORK,
      |                                                  1
Error: Rank mismatch in argument ‘work’ at (1) (rank-1 and scalar)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:10379:50:

10379 |       CALL RFFT1F(NP1,1,XH,LNXH,WSAVE(NS2+1),LNSV,WORK,LNWK,IER1)
      |                                                  1
Error: Rank mismatch in argument ‘work’ at (1) (rank-1 and scalar)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6660:58:

 6660 |       CALL RFFTMF(LOT,JUMP,NM1,INC,X,LENX,WSAVE(N+1),LNSV,WORK,
      |                                                          1
Error: Rank mismatch in argument ‘work’ at (1) (rank-1 and scalar)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6560:58:

 6560 |       CALL RFFTMF(LOT,JUMP,NM1,INC,X,LENX,WSAVE(N+1),LNSV,WORK,
      |                                                          1
Error: Rank mismatch in argument ‘work’ at (1) (rank-1 and scalar)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6150:49:

 6150 |       CALL RFFT1F(NM1,INC,X,LENX,WSAVE(N+1),LNSV,WORK,
      |                                                 1
Error: Rank mismatch in argument ‘work’ at (1) (rank-1 and scalar)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6081:49:

 6081 |       CALL RFFT1F(NM1,INC,X,LENX,WSAVE(N+1),LNSV,WORK,
      |                                                 1
Error: Rank mismatch in argument ‘work’ at (1) (rank-1 and scalar)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5526:72:

 5526 |    52    CALL CMF2KF (LOT,IDO,L1,NA,C,JUMP,INC,CH,1,LOT,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5528:72:

 5528 |    62    CALL CMF2KF (LOT,IDO,L1,NA,CH,1,LOT,C,JUMP,INC,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5530:72:

 5530 |    53    CALL CMF3KF (LOT,IDO,L1,NA,C,JUMP,INC,CH,1,LOT,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5532:72:

 5532 |    63    CALL CMF3KF (LOT,IDO,L1,NA,CH,1,LOT,C,JUMP,INC,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5534:72:

 5534 |    54    CALL CMF4KF (LOT,IDO,L1,NA,C,JUMP,INC,CH,1,LOT,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5536:72:

 5536 |    64    CALL CMF4KF (LOT,IDO,L1,NA,CH,1,LOT,C,JUMP,INC,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5538:72:

 5538 |    55    CALL CMF5KF (LOT,IDO,L1,NA,C,JUMP,INC,CH,1,LOT,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5540:72:

 5540 |    65    CALL CMF5KF (LOT,IDO,L1,NA,CH,1,LOT,C,JUMP,INC,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5543:72:

 5543 |      1     1,LOT,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5546:72:

 5546 |      1     JUMP,INC,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5474:72:

 5474 |    52    CALL CMF2KB (LOT,IDO,L1,NA,C,JUMP,INC,CH,1,LOT,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5476:72:

 5476 |    62    CALL CMF2KB (LOT,IDO,L1,NA,CH,1,LOT,C,JUMP,INC,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5478:72:

 5478 |    53    CALL CMF3KB (LOT,IDO,L1,NA,C,JUMP,INC,CH,1,LOT,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5480:72:

 5480 |    63    CALL CMF3KB (LOT,IDO,L1,NA,CH,1,LOT,C,JUMP,INC,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5482:72:

 5482 |    54    CALL CMF4KB (LOT,IDO,L1,NA,C,JUMP,INC,CH,1,LOT,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5484:72:

 5484 |    64    CALL CMF4KB (LOT,IDO,L1,NA,CH,1,LOT,C,JUMP,INC,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5486:72:

 5486 |    55    CALL CMF5KB (LOT,IDO,L1,NA,C,JUMP,INC,CH,1,LOT,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5488:72:

 5488 |    65    CALL CMF5KB (LOT,IDO,L1,NA,CH,1,LOT,C,JUMP,INC,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5491:72:

 5491 |      1     LOT,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5494:72:

 5494 |      1     JUMP,INC,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4001:72:

 4001 |    52    CALL C1F2KF (IDO,L1,NA,C,INC2,CH,2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4003:72:

 4003 |    62    CALL C1F2KF (IDO,L1,NA,CH,2,C,INC2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4005:72:

 4005 |    53    CALL C1F3KF (IDO,L1,NA,C,INC2,CH,2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4007:72:

 4007 |    63    CALL C1F3KF (IDO,L1,NA,CH,2,C,INC2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4009:72:

 4009 |    54    CALL C1F4KF (IDO,L1,NA,C,INC2,CH,2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4011:72:

 4011 |    64    CALL C1F4KF (IDO,L1,NA,CH,2,C,INC2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4013:72:

 4013 |    55    CALL C1F5KF (IDO,L1,NA,C,INC2,CH,2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4015:72:

 4015 |    65    CALL C1F5KF (IDO,L1,NA,CH,2,C,INC2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4018:72:

 4018 |      1     2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:4021:72:

 4021 |      1     INC2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:3948:72:

 3948 |    52    CALL C1F2KB (IDO,L1,NA,C,INC2,CH,2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:3950:72:

 3950 |    62    CALL C1F2KB (IDO,L1,NA,CH,2,C,INC2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:3952:72:

 3952 |    53    CALL C1F3KB (IDO,L1,NA,C,INC2,CH,2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:3954:72:

 3954 |    63    CALL C1F3KB (IDO,L1,NA,CH,2,C,INC2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:3956:72:

 3956 |    54    CALL C1F4KB (IDO,L1,NA,C,INC2,CH,2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:3958:72:

 3958 |    64    CALL C1F4KB (IDO,L1,NA,CH,2,C,INC2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:3960:72:

 3960 |    55    CALL C1F5KB (IDO,L1,NA,C,INC2,CH,2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:3962:72:

 3962 |    65    CALL C1F5KB (IDO,L1,NA,CH,2,C,INC2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:3965:72:

 3965 |      1     WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘cc’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:3968:72:

 3968 |      1     INC2,WA(IW))
      |                                                                        1
Error: Type mismatch in argument ‘ch’ at (1); passed COMPLEX(4) to REAL(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:692:72:

  692 |       CALL RFFTB1_OLD (N,R,WSAVE,WSAVE(N+1),WSAVE(2*N+1))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(4) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:218:72:

  218 |       CALL RFFTF1_OLD (N,R,WSAVE,WSAVE(N+1),WSAVE(2*N+1))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(4) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:92:72:

   92 |       CALL RFFTI1_OLD (N,WSAVE(N+1),WSAVE(2*N+1))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(4) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:1134:72:

 1134 |       CALL EZFFT1 (N,WSAVE(2*N+1),WSAVE(3*N+1))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(4) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:1479:72:

 1479 |       CALL SINT1(N,X,WSAVE,WSAVE(IW1),WSAVE(IW2),WSAVE(IW3))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(4) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:2081:72:

 2081 |       CALL CFFTI1 (N,WSAVE(IW1),WSAVE(IW2))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(4) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:2201:72:

 2201 |       CALL CFFTF1 (N,C,WSAVE,WSAVE(IW1),WSAVE(IW2))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(4) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:2631:72:

 2631 |       CALL CFFTB1 (N,C,WSAVE,WSAVE(IW1),WSAVE(IW2))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(4) to INTEGER(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5944:33:

 5944 |       CALL COSTB1 (N,INC,X,WSAVE,WORK,IER1)
      |                                 1
Error: Rank mismatch in argument ‘work’ at (1) (scalar and rank-1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:5983:32:

 5983 |       CALL COSTF1(N,INC,X,WSAVE,WORK,IER1)
      |                                1
Error: Rank mismatch in argument ‘work’ at (1) (scalar and rank-1)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6209:72:

 6209 |       CALL MCSTB1(LOT,JUMP,N,INC,X,WSAVE,WORK,WORK(IW1),IER1)
      |                                                                        1
Error: Type mismatch in argument ‘dsum’ at (1); passed REAL(4) to REAL(8)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:6253:72:

 6253 |       CALL MCSTF1(LOT,JUMP,N,INC,X,WSAVE,WORK,WORK(IW1),IER1)
      |                                                                        1
Error: Type mismatch in argument ‘dsum’ at (1); passed REAL(4) to REAL(8)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:9377:72:

 9377 |      1     WSAVE(LWSAV+1),MWSAV,R,L*M, IER1)
      |                                                                        1
Error: Type mismatch in argument ‘c’ at (1); passed REAL(4) to COMPLEX(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:9539:72:

 9539 |      1     WSAVE(LWSAV+1),MWSAV,R,L*M, IER1)
      |                                                                        1
Error: Type mismatch in argument ‘c’ at (1); passed REAL(4) to COMPLEX(4)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:10495:72:

10495 |       CALL MSNTB1(LOT,JUMP,N,INC,X,WSAVE,WORK,WORK(IW1),WORK(IW2),IER1)
      |                                                                        1
Error: Type mismatch in argument ‘dsum’ at (1); passed REAL(4) to REAL(8)
/home/dev/code/carta-casacore/casa6/casatools/casacore/scimath_f/fftpak.f:10540:72:

10540 |       CALL MSNTF1(LOT,JUMP,N,INC,X,WSAVE,WORK,WORK(IW1),WORK(IW2),IER1)
      |                                                                        1
Error: Type mismatch in argument ‘dsum’ at (1); passed REAL(4) to REAL(8)
make[2]: *** [casa6/casatools/casacore/scimath_f/CMakeFiles/casa_scimath_f.dir/build.make:173: casa6/casatools/casacore/scimath_f/CMakeFiles/casa_scimath_f.dir/fftpak.f.o] Error 1
make[1]: *** [CMakeFiles/Makefile2:10073: casa6/casatools/casacore/scimath_f/CMakeFiles/casa_scimath_f.dir/all] Error 2
make: *** [Makefile:160: all] Error 2

[d3v-null]

builds fine on Ubuntu 20.04 in WSL.

cmake .. -DUSE_FFTW3=ON -DUSE_HDF5=ON -DUSE_THREADS=ON -DUSE_OPENMP=ON -DCMAKE_BUILD_TYPE=Release -DBUILD_TESTING=OFF -DBUILD_PYTHON=OFF -DUseCcache=1 -DHAS_CXX11=1 -DCMAKE_INSTALL_PREFIX=/opt/carta-casacore -DDATA_DIR=/var/lib/casacore/data

CMake Deprecation Warning at CMakeLists.txt:20 (cmake_policy):
  The OLD behavior for policy CMP0048 will be removed from a future version
  of CMake.

  The cmake-policies(7) manual explains that the OLD behaviors of all
  policies are deprecated and that a policy should be set to OLD only under
  specific short-term circumstances.  Projects should be ported to the NEW
  behavior and not rely on setting a policy to OLD.


-- Searching for ccache.
-- Using namespace casacore.
-- Could NOT find SOFA (missing: SOFA_LIBRARY) 
-- A library with LAPACK API found.
CMake Warning (dev) at imageanalysis/CMakeLists.txt:389:
  Syntax Warning in cmake code at column 43

  Argument not separated from preceding token by whitespace.
This warning is for project developers.  Use -Wno-dev to suppress it.

-- CMAKE_SYSTEM .......... = Linux-5.4.72-microsoft-standard-WSL2
-- CMAKE_BUILD_TYPE ...... = Release
-- Modules to be built ... = casa;tables;scimath_f;scimath;measures;meas;fits;ms;msfits;derivedmscal;lattices;mirlib;coordinates;images
-- BUILD_SHARED_LIBS ..... = ON
-- ENABLE_RPATH .......... = ON
-- CMAKE_INSTALL_NAME_DIR  = /opt/carta-casacore/lib
-- ENABLE_TABLELOCKING ... = ON
-- USE_THREADS ........... = YES
-- USE_OPENMP ............ = ON
-- USE_MPI ............... = OFF
-- USE_STACKTRACE ........ = OFF
-- HAVE_O_DIRECT ......... = 1
-- CMAKE_CXX_COMPILER .... = /usr/bin/c++
-- CMAKE_CXX_FLAGS ....... = -fcx-fortran-rules  -std=c++11 -fsigned-char -std=c++11 -fopenmp -pthread
-- DATA directory ........ = /var/lib/casacore/data
-- DL library? ........... = /usr/lib/x86_64-linux-gnu/libdl.so
-- Pthreads library? ..... = /usr/lib/x86_64-linux-gnu/libpthread.so
-- Readline library? ..... = /usr/lib/x86_64-linux-gnu/libreadline.so;/usr/lib/x86_64-linux-gnu/libncurses.so
-- BLAS library? ......... = /usr/lib/x86_64-linux-gnu/libopenblas.so
-- LAPACK library? ....... = /usr/lib/x86_64-linux-gnu/libopenblas.so
-- WCS library? .......... = /usr/lib/x86_64-linux-gnu/libwcs.so;/usr/lib/x86_64-linux-gnu/libm.so
-- SOFA library? ......... = SOFA_LIBRARY-NOTFOUND
-- CFitsio library? ...... = /usr/local/lib/libcfitsio.so;/usr/lib/x86_64-linux-gnu/libm.so
-- ADIOS2 library? ....... = 
-- HDF5 library? ......... = optimized;/usr/lib/x86_64-linux-gnu/hdf5/serial/lib/libhdf5.so;debug;/usr/lib/x86_64-linux-gnu/hdf5/serial/lib/libhdf5.so
-- FFTW3 library? ........ = /usr/lib/x86_64-linux-gnu/libfftw3f_threads.so;/usr/lib/x86_64-linux-gnu/libfftw3_threads.so;/usr/lib/x86_64-linux-gnu/libfftw3f.so;/usr/lib/x86_64-linux-gnu/libfftw3.so
-- GSL library? .......... = -L/usr/lib/x86_64-linux-gnu -lgsl -lgslcblas -lm
-- GSL CXXFLAGS? ......... = 
-- BUILD_DEPRECATED ...... = OFF
-- BUILD_PYTHON .......... = OFF
-- BUILD_PYTHON3 ......... = OFF
-- Configuring done
-- Generating done
-- Build files have been written to: /home/derwent/CIRA/Code/carta-casacore/build

[veggiesaurus]

According to the gfortran documentation you can get around this using -std=legacy or -fallow-argument-mismatch. This workaround is used in Unidata/netcdf-fortran#212, for example.

The issue is listed at casacore/casacore#1017.