MITgcm |
|
|
|
|||
File indexing completed on 2018-03-02 18:37:33 UTC
view on githubraw file Latest commit add29e06 on 2018-01-31 20:35:05 UTC19ba53617e Jean*0001 #include "ATM_COMMON_OPTIONS.h" 0002 0003 C !INTERFACE: ========================================================== 0004 SUBROUTINE ATM_DIAGNOSTICS_INIT(myThid ) 0005 0006 C !DESCRIPTION: 0007 C define diagnostics for atmosheric physics packages 0008 0009 C !USES: =============================================================== 0010 IMPLICIT NONE 0011 #include "SIZE.h" 0012 #include "EEPARAMS.h" 0013 0014 C !INPUT PARAMETERS: =================================================== 0015 C myThid :: thread number 0016 INTEGER myThid 0017 CEOP 0018 0019 #ifdef ALLOW_ATM_COMMON 0020 #ifdef ALLOW_DIAGNOSTICS 0021 0022 C !LOCAL VARIABLES: b6432c788b Jean*0023 c INTEGER diagNum 0024 c INTEGER diagMate 0025 c CHARACTER*8 diagName 0026 c CHARACTER*16 diagCode 0027 c CHARACTER*16 diagUnits 0028 c CHARACTER*(80) diagTitle 19ba53617e Jean*0029 0030 C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| 0031 C Define diagnostics Names : 0032 0033 C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| 0034 0035 #endif /* ALLOW_DIAGNOSTICS */ 0036 #endif /* ALLOW_ATM_COMMON */ 0037 0038 RETURN 0039 END
| [ Source navigation ] | [ Diff markup ] | [ Identifier search ] | [ general search ] |
|
This page was automatically generated from https://github.com/MITgcm/MITgcm by the 2.2.1-MITgcm-0.1 LXR engine. The LXR team |
|