Ignore:
Timestamp:
05/09/19 01:37:55 (5 years ago)
Author:
dubos
Message:

devel : split read_dump_partition into open_local_mesh_file and read_local_mesh

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/devel/src/base/init_grid_param.f90

    r830 r863  
    77    USE grid_param 
    88    USE ioipsl, ONLY : getin 
    9     USE init_unstructured_mod, ONLY : read_dump_partition 
     9    USE init_unstructured_mod, ONLY : open_local_mesh_file 
    1010    LOGICAL :: is_mpi_root 
    1111    CHARACTER(len=255) :: grid_type_var 
    … …  
    2424       !       is_omp_level_master=.TRUE. 
    2525       !       omp_level_size=1 
    26        CALL read_dump_partition 
     26       CALL open_local_mesh_file 
    2727       IF (is_mpi_root) PRINT *,'DYNAMICO mesh is unstructured/LAM.' 
    2828    CASE DEFAULT 
Note: See TracChangeset for help on using the changeset viewer.