Changeset 3604 for trunk/LMDZ.COMMON/libf

Timestamp:

Jan 29, 2025, 10:04:35 AM (45 hours ago)

Author:

jbclement

Message:

Mars PCM:
Bug correction introduced in r3574: the program has to be in a fixed-form Fortran format.
JBC

File:

• trunk/LMDZ.COMMON/libf/dyn3dpar/gcm.F (modified) (1 diff)

trunk/LMDZ.COMMON/libf/dyn3dpar/gcm.F

@@ -166 +166 @@
                   stop
               case default
-                  error stop 'The argument given to the program '
-     &//'is unknown!'
+                  error stop 'The argument given to the program is '
+     &//'unknown!'
           end select
       endif