Problem installing roms using openmpi

[pjvidya]

d /home/pjvidya/MyDir/ROMS/Projects/Balaji/BOB/Build; /opt/openmpi/bin/mpif90 -c -frepack-arrays -g -fbounds-check -ffree-form -ffree-line-length-none mod_param.f90
mod_param.f90:119.10:

1(r8), pointer :: time_min(:) ! starting time
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:119.12:

1(r8), pointer :: time_min(:) ! starting time
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:120.10:

1(r8), pointer :: time_max(:) ! ending time
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:120.12:

1(r8), pointer :: time_max(:) ! ending time
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:259.10:

1(r8), pointer :: Xmin_psi(:)
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:259.12:

1(r8), pointer :: Xmin_psi(:)
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:260.10:

1(r8), pointer :: Xmax_psi(:)
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:260.12:

1(r8), pointer :: Xmax_psi(:)
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:261.10:

1(r8), pointer :: Ymin_psi(:)
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:261.12:

1(r8), pointer :: Ymin_psi(:)
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:262.10:

1(r8), pointer :: Ymax_psi(:)
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:262.12:

1(r8), pointer :: Ymax_psi(:)
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:263.10:

1(r8), pointer :: Xmin_rho(:)
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:263.12:

1(r8), pointer :: Xmin_rho(:)
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:264.10:

1(r8), pointer :: Xmax_rho(:)
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:264.12:

1(r8), pointer :: Xmax_rho(:)
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:265.10:

1(r8), pointer :: Ymin_rho(:)
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:265.12:

1(r8), pointer :: Ymin_rho(:)
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:266.10:

1(r8), pointer :: Ymax_rho(:)
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:266.12:

1(r8), pointer :: Ymax_rho(:)
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:267.10:

1(r8), pointer :: Xmin_u(:)
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:267.12:

1(r8), pointer :: Xmin_u(:)
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:268.10:

1(r8), pointer :: Xmax_u(:)
1
Error: Non-numeric character in statement label at (1)
mod_param.f90:268.12:

1(r8), pointer :: Xmax_u(:)
1
Error: Cannot assign to a named constant at (1)
mod_param.f90:269.10:

1(r8), pointer :: Ymin_u(:)
1
Error: Non-numeric character in statement label at (1)
Fatal Error: Error count reached limit of 25.
make: *** [/home/pjvidya/MyDir/ROMS/Projects/Balaji/BOB/Build/mod_param.o] Error 1




********************************
Kindly help me in this regard.

[kate]

This happened in the C preprocessor step - the lines in mod_param.F are like:

Code: Select all

        real(r8), pointer :: time_min(:)         ! starting time 
        real(r8), pointer :: time_max(:)         ! ending time 

I don't know where it's coming from, but there must be a "#define real" or -Dreal being set. Can you show us the cpp command from the build? I've been using openmpi for years and never seen this problem.

[pjvidya]

This happened in the C preprocessor step - the lines in mod_param.F are like:

Code: Select all

        real(r8), pointer :: time_min(:)         ! starting time 
        real(r8), pointer :: time_max(:)         ! ending time 

I don't know where it's coming from, but there must be a "#define real" or -Dreal being set. Can you show us the cpp command from the build? I've been using openmpi for years and never seen this problem.

Using mpich, I overcome the previous error but ended up with the following error

ROMS/Bin/cpp_clean /home/pjvidya/MyDir/ROMS/Projects/Balaji/BOB/Build/mod_scalars.f90
cd /home/pjvidya/MyDir/ROMS/Projects/Balaji/BOB/Build; /home/pjvidya/MyDir/ROMS/Projects/Balaji/lib/mpich/bin/mpif90 -c -frepack-arrays -g -fbounds-check -ffree-form -ffree-line-length-none -ffree-form -ffree-line-length-none mod_scalars.f90
mod_scalars.f90:1409.31:

Idigits(ng)=INT(LOG10(1(Lm(ng),r8)))+1
1
Error: Syntax error in argument list at (1)
mod_scalars.f90:1410.31:

Jdigits(ng)=INT(LOG10(1(Mm(ng),r8)))+1
1
Error: Syntax error in argument list at (1)
mod_scalars.f90:1411.31:

Kdigits(ng)=INT(LOG10(1(N (ng),r8)))+1
1
Error: Syntax error in argument list at (1)
make: *** [/home/pjvidya/MyDir/ROMS/Projects/Balaji/BOB/Build/mod_scalars.o] Error 1

[kate]

This is the exact same problem except with REAL instead of real:

Code: Select all

        Idigits(ng)=INT(LOG10(REAL(Lm(ng),r8)))+1
        Jdigits(ng)=INT(LOG10(REAL(Mm(ng),r8)))+1
#ifdef SOLVE3D
        Kdigits(ng)=INT(LOG10(REAL(N (ng),r8)))+1
#endif

You can change them all to lower case and use mpich or make them all upper case and use openMPI.

Hah, or make them all ReAl and use either one.

[pjvidya]

This is the exact same problem except with REAL instead of real:

Code: Select all

        Idigits(ng)=INT(LOG10(REAL(Lm(ng),r8)))+1
        Jdigits(ng)=INT(LOG10(REAL(Mm(ng),r8)))+1
#ifdef SOLVE3D
        Kdigits(ng)=INT(LOG10(REAL(N (ng),r8)))+1
#endif

You can change them all to lower case and use mpich or make them all upper case and use openMPI.

Hah, or make them all ReAl and use either one.

thanks Kate.

I have solved the problem.
The ROMS doesn't support the ROMS_APPLICATION name as 'real.h'
After changing the ROMS_APPLICATION, the model is successfully installed.

Happy Modeling...!!!

[kate]

Boy, that's a good one! Thanks for getting back to us.