Changeset 82 for codes/icosagcm/trunk/src/icosa_gcm.f90

Timestamp:

08/03/12 02:14:05 (12 years ago)

Author:

ymipsl

Message:

improvment of the output and CF conformity

YM

File:

• codes/icosagcm/trunk/src/icosa_gcm.f90 (modified) (2 diffs)

codes/icosagcm/trunk/src/icosa_gcm.f90

@@ -23 +23 @@
   CALL compute_domain
   CALL init_transfert
+  CALL init_writefield
 !  CALL allocate_field(sum_ne,field_T,type_real)
 !  CALL allocate_field_glo(sum_ne_glo,field_T,type_real)
@@ -78 +79 @@
 !  CALL WriteField("sum_ne",sum_ne)
   CALL write_apbp
+  CALL create_time_counter_header
   CALL timeloop
 
   CALL close_files
+  CALL close_time_counter
   CALL finalize_mpipara