Changeset 5082 for LMDZ6/branches/Amaury_dev/libf/dyn3d_common/gradiv2.F

Timestamp:

Jul 19, 2024, 5:41:58 PM (4 months ago)

Author:

abarral

Message:

(lint) Fix obsolete boolean operators

File:

• LMDZ6/branches/Amaury_dev/libf/dyn3d_common/gradiv2.F (modified) (1 diff)

LMDZ6/branches/Amaury_dev/libf/dyn3d_common/gradiv2.F

@@ -49 +49 @@
       CALL    divergf( klevel, gdx,   gdy , div )
 
-      IF( ld.GT.1 )   THEN
+      IF( ld>1 )   THEN
 
         CALL laplacien ( klevel, div,  div     )