Changeset 1367 for LMDZ4/trunk

Timestamp:

Apr 22, 2010, 9:09:08 AM (15 years ago)

Author:

Ehouarn Millour

Message:

Bug fix: line introduced in previous revision was too long (for fixed format).

EM

File:

• LMDZ4/trunk/libf/phylmd/phys_output_write.h (modified) (1 diff)

LMDZ4/trunk/libf/phylmd/phys_output_write.h

@@ -1152 +1152 @@
        IF (ok_ade .OR. ok_aie) then
           IF (o_ec550aer%flag(iff)<=lev_files(iff)) THEN
-         CALL histwrite_phy(nid_files(iff),o_ec550aer%name,itau_w,ec550aer)
+             CALL histwrite_phy(nid_files(iff),o_ec550aer%name,itau_w,
+     &            ec550aer)
           ENDIF
        ENDIF