Changeset 26 for XMLIO_SERVER/trunk/src/XMLIO/mod_axis_definition.f90

Timestamp:

03/27/09 18:02:59 (15 years ago)

Author:

ymipsl

Message:

Mise à jour importante :

• ajout de la grille type LMDZ
• ajout des context
• ajout de namelist pour parametrer l'utilisation du server : avec/sans MPI, en utlisant ou pas OASIS

File:

• XMLIO_SERVER/trunk/src/XMLIO/mod_axis_definition.f90 (modified) (1 diff)

XMLIO_SERVER/trunk/src/XMLIO/mod_axis_definition.f90

@@ -6 +6 @@
 CONTAINS
 
+  SUBROUTINE axis_definition__swap_context(saved_axis_definition)      
+  IMPLICIT NONE
+    TYPE(axis_group),POINTER :: saved_axis_definition
+    
+    axis_definition=>saved_axis_definition
+    
+  END SUBROUTINE axis_definition__swap_context 
+
   SUBROUTINE axis_definition__Init
   USE mod_axis_group
   IMPLICIT NONE
   
-    ALLOCATE(axis_definition)
     CALL axis_group__new(axis_definition,"axis_definition")