Skip to content

Fortran errors #32

@wgnoehring

Description

@wgnoehring

Building atomistica fails because Fortran code cannot be compiled.
I am using gfortran version 10.2.1.

The compiler complains that REAL(8) are passed to functions which
expect INT(4). The solution would probably be to promote the INT(4)
variables to REAL(8). However, I am not sure what is going on in the
code and whether it is safe to do so.

Notice that there are also some warnings about deprecated arithmetic IF
statements.

Error message below:

atomistica/src/potentials/coulomb/fft3-public.f:165:72:

  165 |       IF (J-4) 102,102,103
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
atomistica/src/potentials/coulomb/fft3-public.f:171:72:

  171 |       IF (NR) 101,105,101
      |                                                                        1
Warning: Fortran 2018 deleted feature: Arithmetic IF statement at (1)
atomistica/src/potentials/coulomb/fft3-public.f:12:72:

   12 |       CALL CFFTB1 (N,C,WSAVE,WSAVE(IW1),WSAVE(IW2))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)
atomistica/src/potentials/coulomb/fft3-public.f:83:72:

   83 |       CALL CFFTF1 (N,C,WSAVE,WSAVE(IW1),WSAVE(IW2))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)
atomistica/src/potentials/coulomb/fft3-public.f:154:72:

  154 |       CALL CFFTI1 (N,WSAVE(IW1),WSAVE(IW2))
      |                                                                        1
Error: Type mismatch in argument ‘ifac’ at (1); passed REAL(8) to INTEGER(4)

Metadata

Metadata

Assignees

No one assigned

    Labels

    No labels
    No labels

    Type

    No type

    Projects

    No projects

    Milestone

    No milestone

    Relationships

    None yet

    Development

    No branches or pull requests

    Issue actions