Changeset 363 for IOIPSL/trunk/example/testhist1.f90

Timestamp:

07/25/08 12:58:20 (16 years ago)

Author:

bellier

Message:

Updating for more compliance with CF Metadata Convention.

File:

• IOIPSL/trunk/example/testhist1.f90 (modified) (1 diff)

IOIPSL/trunk/example/testhist1.f90

@@ -127 +127 @@
 ! 4.0 The HIST routines are ended and netCDF is closed
 !-
-!   CALL histclo
-! This line should work but there seems to be a bug
-! in the optional argument on SUN !
-!-
-  CALL histclo(id)
+  CALL histclo ()
 !--------------------
 END PROGRAM testhist1