Ignore:
Timestamp:
10/13/17 15:55:07 (7 years ago)
Author:
dubos
Message:

trunk : upgrading to devel

File:
1 edited

Legend:

Unmodified
Added
Removed

  • codes/icosagcm/trunk/src/dynamics/caldyn.f90

    r548 r580  
    22  USE icosa 
    33  PRIVATE 
     4  SAVE 
    45  CHARACTER(LEN=255),SAVE :: caldyn_type 
    56!$OMP THREADPRIVATE(caldyn_type) 
    6    
    7   PUBLIC init_caldyn, caldyn, caldyn_BC 
     7  
     8  PUBLIC init_caldyn, caldyn, caldyn_BC, dysl 
    89   
    910CONTAINS 
    … …  
    2829    END SELECT 
    2930         
    30        
    3131  END SUBROUTINE init_caldyn 
    3232 
Note: See TracChangeset for help on using the changeset viewer.