Changeset 557


Ignore:
Timestamp:
09/21/17 11:07:33 (7 years ago)
Author:
dubos
Message:

devel : PRINT message if CPP_DYSL

File:
1 moved

Legend:

Unmodified
Added
Removed

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

    r545 r557  
    2121    INTEGER            :: ind 
    2222    REAL(rstd),POINTER :: planetvel(:) 
     23 
     24    #ifdef CPP_DYSL 
     25       IF(is_master) PRINT *,'CPP_DYSL : Using macro-generated compute kernels' 
     26    #endif 
    2327 
    2428    hydrostatic=.TRUE. 
Note: See TracChangeset for help on using the changeset viewer.