Ignore:
Timestamp:
06/12/19 00:27:36 (5 years ago)
Author:
dubos
Message:

devel/unstructured : fixed etat0 + renamed compute => compute_caldyn

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/devel/src/dynamics/compute_pvort_only.F90

    r852 r884  
    11MODULE compute_pvort_only_mod 
    2   USE compute_mod, ONLY : comp_pvort_only 
    32  USE grid_param, ONLY : llm 
    43  IMPLICIT NONE 
    … …  
    1211 
    1312  SUBROUTINE check_interface 
    14     PROCEDURE(comp_pvort_only), POINTER :: ptr 
    15     ptr => compute_pvort_only_unst 
    16     ptr => compute_pvort_only_hex 
     13    USE compute_caldyn_mod 
     14    compute_pvort_only => compute_pvort_only_unst 
     15    compute_pvort_only => compute_pvort_only_hex 
    1716  END SUBROUTINE check_interface 
    1817   
Note: See TracChangeset for help on using the changeset viewer.