/[MITgcm]/MITgcm/eesupp/inc/CPP_EEOPTIONS.h
ViewVC logotype

Diff of /MITgcm/eesupp/inc/CPP_EEOPTIONS.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.11 by adcroft, Tue May 18 17:34:46 1999 UTC revision 1.24 by edhill, Fri Mar 3 18:36:53 2006 UTC
# Line 1  Line 1 
1  C $Header$  C $Header$
2    C $Name$
3    
4    CBOP
5    C     !ROUTINE: CPP_EEOPTIONS.h
6    C     !INTERFACE:
7    C     include "CPP_EEOPTIONS.h"
8  C  C
9  C     /==========================================================\  C     !DESCRIPTION:
10  C     | CPP_EEOPTIONS.h                                          |  C     *==========================================================*
11  C     |==========================================================|  C     | CPP\_EEOPTIONS.h                                         |
12    C     *==========================================================*
13  C     | C preprocessor "execution environment" supporting        |  C     | C preprocessor "execution environment" supporting        |
14  C     | flags. Use this file to set flags controlling the        |  C     | flags. Use this file to set flags controlling the        |
15  C     | execution environment in which a model runs - as opposed |  C     | execution environment in which a model runs - as opposed |
# Line 21  C     |       set all options as selecta Line 28  C     |       set all options as selecta
28  C     |       once an experimental configuration has been        |  C     |       once an experimental configuration has been        |
29  C     |       identified, rebuild the code with the appropriate  |  C     |       identified, rebuild the code with the appropriate  |
30  C     |       options set at compile time.                       |  C     |       options set at compile time.                       |
31  C     \==========================================================/  C     *==========================================================*
32    CEOP
33    
34  #ifndef _CPP_EEOPTIONS_H_  #ifndef _CPP_EEOPTIONS_H_
35  #define _CPP_EEOPTIONS_H_  #define _CPP_EEOPTIONS_H_
# Line 44  C     safe, on Sun it is not possible - Line 52  C     safe, on Sun it is not possible -
52  C     undef this option.  C     undef this option.
53  #undef  FMTFTN_IO_THREADSAFE  #undef  FMTFTN_IO_THREADSAFE
54    
 C     Flag used to indicate which flavour of multi-threading  
 C     compiler directives to use. Only set one of these.  
 C     USE_SOLARIS_THREADING  - Takes directives for SUN Workshop  
 C                              compiler.  
 C     USE_KAP_THREADING      - Takes directives for Kuck and  
 C                              Associates multi-threading compiler  
 C                              ( used on Digital platforms ).  
 C     USE_IRIX_THREADING     - Takes directives for SGI MIPS  
 C                              Pro Fortran compiler.  
 C     USE_EXEMPLAR_THREADING - Takes directives for HP SPP series  
 C                              compiler.  
 C     USE_C90_THREADING      - Takes directives for CRAY/SGI C90  
 C                              system F90 compiler.  
 #ifdef TARGET_SUN  
 #define USE_SOLARIS_THREADING  
 #endif  
   
 #ifdef TARGET_DEC  
 #define USE_KAP_THREADING  
 #endif  
   
 #ifdef TARGET_SGI  
 #define USE_IRIX_THREADING  
 #endif  
   
 #ifdef TARGET_HP  
 #define USE_EXEMPLAR_THREADING  
 #endif  
   
 #ifdef TARGET_CRAY_VECTOR  
 #define USE_C90_THREADING  
 #endif  
   
 C--   Define the mapping for the _BARRIER macro  
 C     On some systems low-level hardware support can be accessed through  
 C     compiler directives here.  
 #define _BARRIER CALL BARRIER(myThid)  
   
 C--   Define the mapping for the BEGIN_CRIT() and  END_CRIT() macros.  
 C     On some systems we simply execute this section only using the  
 C     master thread i.e. its not really a critical section. We can  
 C     do this because we do not use critical sections in any critical  
 C     sections of our code!  
 #define _BEGIN_CRIT(a) _BEGIN_MASTER(a)  
 #define _END_CRIT(a)   _END_MASTER(a)  
   
 C--   Define the mapping for the BEGIN_MASTER_SECTION() and  
 C     END_MASTER_SECTION() macros. These are generally implemented by  
 C     simply choosing a particular thread to be "the master" and have  
 C     it alone execute the BEGIN_MASTER..., END_MASTER.. sections.  
 #define _BEGIN_MASTER(a)  IF ( a .EQ. 1 ) THEN  
 #define _END_MASTER(a)    ENDIF  
   
55  C--   Control MPI based parallel processing  C--   Control MPI based parallel processing
56  #undef  ALLOW_USE_MPI  CXXX We no longer select the use of MPI via this file (CPP_EEOPTIONS.h)
57  #undef  ALWAYS_USE_MPI  CXXX To use MPI, use an appropriate genmake2 options file or use
58    CXXX genmake2 -mpi .
59    CXXX #undef  ALLOW_USE_MPI
60    CXXX #undef  ALWAYS_USE_MPI
61    
62  C--   Control use of communication that might overlap computation.  C--   Control use of communication that might overlap computation.
63  C     Under MPI selects/deselects "non-blocking" sends and receives.  C     Under MPI selects/deselects "non-blocking" sends and receives.
# Line 111  C     Under MPI selects/deselects "block Line 69  C     Under MPI selects/deselects "block
69  #define ALLOW_SYNC_COMMUNICATION  #define ALLOW_SYNC_COMMUNICATION
70  #undef  ALWAYS_USE_SYNC_COMMUNICATION  #undef  ALWAYS_USE_SYNC_COMMUNICATION
71    
72    C--   Control use of JAM routines for Artic network
73    C     These invoke optimized versions of "exchange" and "sum" that
74    C     utilize the programmable aspect of Artic cards.
75    #undef  LETS_MAKE_JAM
76    #undef  JAM_WITH_TWO_PROCS_PER_NODE
77    
78  C--   Control storage of floating point operands  C--   Control storage of floating point operands
79  C     On many systems it improves performance only to use  C     On many systems it improves performance only to use
80  C     8-byte precision for time stepped variables.  C     8-byte precision for time stepped variables.
# Line 121  C     set size. However, on vector CRAY Line 85  C     set size. However, on vector CRAY
85  C     performance.  C     performance.
86  #define REAL4_IS_SLOW  #define REAL4_IS_SLOW
87    
 #ifdef REAL4_IS_SLOW  
 #define real Real*8  
 #define REAL Real*8  
 #define _RS  Real*8  
 #define _RL  Real*8  
 #define RS_IS_REAL8  
 #define _EXCH_XY_R4(a,b)       CALL EXCH_XY_R8 ( a, b )  
 #define _EXCH_XYZ_R4(a,b)      CALL EXCH_XYZ_R8 ( a, b )  
 #define _GLOBAL_SUM_R4(a,b,c)  CALL GLOBAL_SUM_R8( a, b )  
 #define _GLOBAL_MAX_R4(a,b,c)  CALL GLOBAL_MAX_R8( a, b )  
 #endif  
   
 #ifndef REAL4_IS_SLOW  
 #define real Real*4  
 #define REAL Real*8  
 #define _RS  Real*4  
 #define _RL  Real*8  
 #define RS_IS_REAL4  
 #define _EXCH_XY_R4(a,b)       CALL EXCH_XY_R4 ( a, b )  
 #define _EXCH_XYZ_R4(a,b)      CALL EXCH_XYZ_R4 ( a, b )  
 #define _GLOBAL_SUM_R4(a,b,c)  CALL GLOBAL_SUM_R4( a, b )  
 #define _GLOBAL_MAX_R4(a,b,c)  CALL GLOBAL_MAX_R4( a, b )  
 #endif  
   
 #define _EXCH_XY_R8(a,b)       CALL EXCH_XY_R8 ( a, b )  
 #define _EXCH_XYZ_R8(a,b)      CALL EXCH_XYZ_R8 ( a, b )  
 #define _GLOBAL_SUM_R8(a,b,c)  CALL GLOBAL_SUM_R8( a, b )  
 #define _GLOBAL_MAX_R8(a,b,c)  CALL GLOBAL_MAX_R8( a, b )  
   
88  C--   Control use of "double" precision constants.  C--   Control use of "double" precision constants.
89  C     Use D0 where it means REAL*8 but not where it means REAL*16  C     Use D0 where it means REAL*8 but not where it means REAL*16
90  #define D0 d0  #define D0 d0
 #ifdef REAL_D0_IS_16BYTES  
 #define D0  
 #endif  
91    
92  C--   Control XY periodicity in processor to grid mappings  C--   Control XY periodicity in processor to grid mappings
93  C     Note: Model code does not need to know whether a domain is  C     Note: Model code does not need to know whether a domain is
# Line 167  C           filled in some way. Line 99  C           filled in some way.
99  #define CAN_PREVENT_X_PERIODICITY  #define CAN_PREVENT_X_PERIODICITY
100  #define CAN_PREVENT_Y_PERIODICITY  #define CAN_PREVENT_Y_PERIODICITY
101    
 C--   Substitue for 1.D variables  
 C     Sun compilers do not use 8-byte precision for literals  
 C     unless .Dnn is specified. CRAY vector machines use 16-byte  
 C     precision when they see .Dnn which runs very slowly!  
 #ifdef REAL_D0_IS_16BYTES  
 #define _d  
 #define _F64( a ) a  
 #endif  
 #ifndef REAL_D0_IS_16BYTES  
 #define _d D  
 #define _F64( a ) DFLOAT( a )  
 #endif  
   
102  #endif /* _CPP_EEOPTIONS_H_ */  #endif /* _CPP_EEOPTIONS_H_ */
103    
104    #include "CPP_EEMACROS.h"
105    
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.24
  ViewVC Help
Powered by ViewVC 1.1.22