Changeset 356 for codes/icosagcm/trunk/src/metric.f90

Timestamp:

09/03/15 13:45:52 (9 years ago)

Author:

dubos

Message:

Moved Schmidt transform after grid optimization ; pass correct mesh info to XIOS

File:

• codes/icosagcm/trunk/src/metric.f90 (modified) (3 diffs)

codes/icosagcm/trunk/src/metric.f90

@@ -55 +55 @@
 CONTAINS
 
-  SUBROUTINE remap_schmidt
+  SUBROUTINE remap_schmidt_glo ! FIXME : not called any more
     USE spherical_geom_mod
     USE getin_mod
@@ -82 +82 @@
        END DO
     END DO
-  END SUBROUTINE remap_schmidt
+  END SUBROUTINE remap_schmidt_glo
 
   SUBROUTINE allocate_metric
@@ -858 +858 @@
 !    CALL compute_face
     CALL compute_face_projection
-    CALL remap_schmidt
+!    CALL remap_schmidt_glo ! replaced by call to remap_schmidt_loc in set_geometry
 
     CALL set_index