Back to home page

MITgcm

 
 

    


File indexing completed on 2018-03-02 18:43:02 UTC

view on githubraw file Latest commit add29e06 on 2018-01-31 20:35:05 UTC
d217ad1db8 Oliv*0001 #ifdef ALLOW_PTRACERS
                0002 #ifdef PTRACERS_ALLOW_DYN_STATE
                0003 
                0004 CBOP
                0005 C    !ROUTINE: PTRACERS_MOD.h
                0006 C    !INTERFACE:
                0007 C #include PTRACERS_MOD.h
                0008 
                0009 C    !DESCRIPTION:
                0010 C Contains passive tracer modules and associated macros
                0011 
                0012 CEOP
                0013 
                0014       use ptracers_dyn_state_mod
                0015       use ptracers_dyn_state_data_mod
                0016 
                0017 C     This macro allows the second-order-moment member of the ptracers
                0018 C     internal state data structure to be used like an simple array.
811d3e9bd3 Jean*0019 C     Names are chosen such that macro expansion does not increase
d217ad1db8 Oliv*0020 C     line length
                0021 #define _Ptracers_som(a,b,c,d,e,f,g) \
811d3e9bd3 Jean*0022         PtrISt(g)%som_P(a,b,c,d,e,f)
d217ad1db8 Oliv*0023 
                0024 #endif /* PTRACERS_ALLOW_DYN_STATE */
                0025 #endif /* ALLOW_PTRACERS */
                0026