[CIG-SEISMO] SPECFEM2D-6.0.0 MPI compile errors using openmpi

[Dylan Mikesell]

Hi Everyone,

I am trying to compile SPECFEM2D-6.0.0 on a new multicore cluster. This 
is the first time I have tried compiling with MPI. My Makefile is below, 
as well as the error I get during compiling. The error occurs while 
compiling assemble_MPI.F90. Does anyone have any ideas? Does it have to 
do with the version of mpif90 I am using?
Thanks,

Dylan Mikesell

$ mpif90 --version
GNU Fortran (GCC) 4.1.2 20080704 (Red Hat 4.1.2-48)


my Makefile:
# GNU gfortran
#F90 = gfortran
#F90 = mpif90 -DUSE_MPI -DUSE_METIS -DUSE_SCOTCH
F90 = mpif90 -DUSE_MPI
CC = gcc
FLAGS_NOCHECK = -std=gnu -fimplicit-none -frange-check -O3 -pedantic 
-pedantic-errors -Wunused -Waliasing -Wampersand -Wline-truncation 
-Wsurprising -Wunderflow -fno-trapping-math
FLAGS_CHECK = $(FLAGS_NOCHECK) -fbounds-check


my Error:
mpif90 -DUSE_MPI  -std=gnu -fimplicit-none -frange-check -O3 -pedantic 
-pedantic-errors -Wunused -Waliasing -Wampersand -Wline-truncation 
-Wsurprising -Wunderflow -fno-trapping-math  -fbounds-check -c -o 
obj/assemble_MPI.o assemble_MPI.F90
  In file assemble_MPI.F90:349

   double precision, 
dimension(max_ibool_interfaces_size_ac+max_ibool_interfaces
                  1
Error: Syntax error in data declaration at (1)
  In file assemble_MPI.F90:349

ace)
     1
Warning: Line truncated at (1)
  In file assemble_MPI.F90:350

        buffer_send_faces_scalar, &
       1
Error: Unclassifiable statement at (1)
  In file assemble_MPI.F90:365

              array_val1(ibool_interfaces_acoustic(i,num_interface))
                                                                   1
Error: Unexpected STATEMENT FUNCTION statement at (1)
  In file assemble_MPI.F90:371

              array_val2(ibool_interfaces_elastic(i,num_interface))
                                                                  1
Error: Unexpected STATEMENT FUNCTION statement at (1)
  In file assemble_MPI.F90:377

              array_val3(ibool_interfaces_poroelastic(i,num_interface))
                                                                      1
Error: Unexpected STATEMENT FUNCTION statement at (1)
  In file assemble_MPI.F90:382

              array_val4(ibool_interfaces_poroelastic(i,num_interface))
                                                                      1
Error: Unexpected STATEMENT FUNCTION statement at (1)
  In file assemble_MPI.F90:385

      call MPI_ISSEND( buffer_send_faces_scalar(1,num_interface), &
                     1
Error: Function 'buffer_send_faces_scalar' at (1) has no IMPLICIT type
  In file assemble_MPI.F90:395

      call MPI_recv ( buffer_recv_faces_scalar(1,num_interface), &
                    1
Error: Function 'buffer_recv_faces_scalar' at (1) has no IMPLICIT type
  In file assemble_MPI.F90:406

              buffer_recv_faces_scalar(ipoin,num_interface)
                                     1
Error: Function 'buffer_recv_faces_scalar' at (1) has no IMPLICIT type
  In file assemble_MPI.F90:412

              buffer_recv_faces_scalar(ipoin,num_interface)
                                     1
Error: Function 'buffer_recv_faces_scalar' at (1) has no IMPLICIT type
  In file assemble_MPI.F90:418

              buffer_recv_faces_scalar(ipoin,num_interface)
                                     1
Error: Function 'buffer_recv_faces_scalar' at (1) has no IMPLICIT type
  In file assemble_MPI.F90:423

              buffer_recv_faces_scalar(ipoin,num_interface)
                                     1
Error: Function 'buffer_recv_faces_scalar' at (1) has no IMPLICIT type
  In file assemble_MPI.F90:780

e)) +
     1
Error: Syntax error in expression at (1)
  In file assemble_MPI.F90:780

)) +
     1
Warning: Line truncated at (1)
  In file assemble_MPI.F90:781

              buffer_recv_faces_vector_pos(ipoin+1:ipoin+2,inum_interface)
             1
Error: Unclassifiable statement at (1)
  In file assemble_MPI.F90:787

e)) +
     1
Error: Syntax error in expression at (1)
  In file assemble_MPI.F90:787

)) +
     1
Warning: Line truncated at (1)
  In file assemble_MPI.F90:788

              buffer_recv_faces_vector_pow(ipoin+1:ipoin+2,inum_interface)
             1
Error: Unclassifiable statement at (1)
make: *** [obj/assemble_MPI.o] Error 1