Changeset 1445 for LMDZ5/branches/LMDZ5V1.0-dev/libf/cosp

Timestamp:

Oct 22, 2010, 10:49:17 AM (14 years ago)

Author:

jghattas

Message:

Deleted call flush : this function should not be used, does not exist
at vargas.

File:

• LMDZ5/branches/LMDZ5V1.0-dev/libf/cosp/icarus.F (modified) (1 diff)

LMDZ5/branches/LMDZ5V1.0-dev/libf/cosp/icarus.F

@@ -450 +450 @@
               write (6,*) 'rangevec:'
               write (6,*) rangevec
-              call flush(6)
               STOP
         endif