Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Logical comparison operators #75

Open
AlexanderRichert-NOAA opened this issue Oct 8, 2024 · 0 comments
Open

Logical comparison operators #75

AlexanderRichert-NOAA opened this issue Oct 8, 2024 · 0 comments
Labels
bug Something isn't working

Comments

@AlexanderRichert-NOAA
Copy link

Description

gfortran (I'm using GCC 13) fails to build because it doesn't like using the '==' comparison operator for logicals in the following files:
rtma_minmaxtrh.fd/maxtbg.fd/maxmin_ak.f
rtma_minmaxtrh.fd/mintbg.fd/maxmin_ak.f

Apparently '.eqv.' is the Fortran standards-compliant way of comparing logicals.

Steps to Reproduce

(cmake build with gcc 13)

Output

/dev/shm/rrfs_utl/rtma_minmaxtrh.fd/mintbg.fd/maxmin_ak.f:482:11:

  482 |         IF(CHRLY_AB == .FALSE.) THEN
      |           1
Error: Logicals at (1) must be compared with .eqv. instead of ==
@AlexanderRichert-NOAA AlexanderRichert-NOAA added the bug Something isn't working label Oct 8, 2024
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
bug Something isn't working
Projects
None yet
Development

No branches or pull requests

1 participant