Ignore:
Timestamp:
05/06/19 01:49:12 (5 years ago)
Author:
dubos
Message:

devel : towards Fortran driver for unstructured/LAM meshes

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/devel/src/output/output_field.f90

    r714 r856  
    2020  SUBROUTINE output_field_init 
    2121  USE getin_mod 
     22  USE grid_param 
    2223  IMPLICIT NONE 
    2324 
    … …  
    3536     
    3637    IF (xios_output) THEN 
    37       CALL xios_init_write_field 
     38       IF(grid_type == grid_ico) CALL xios_init_write_field 
    3839    ENDIF 
    3940  END SUBROUTINE output_field_init 
Note: See TracChangeset for help on using the changeset viewer.