cloudy  trunk
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Macros Pages
cpu.h
Go to the documentation of this file.
1 /* This file is part of Cloudy and is copyright (C)1978-2017 by Gary J. Ferland and
2  * others. For conditions of distribution and use see copyright notice in license.txt */
3 
4 #ifndef CPU_H_
5 #define CPU_H_
6 
9 /* disable conditional expressions is constant */
10 #ifdef _MSC_VER
11 #pragma warning( disable : 4127 )
12 #endif
13 
14 #define UNUSED /*@unused@*/
15 #ifdef __GNUC__
16 #undef UNUSED
17 #define UNUSED __attribute__ ((unused)) /*@unused@*/
18 #endif
19 
21 #ifndef INT16_MAX
22 # define INT16_MAX 32767
23 #endif
24 #ifndef INT16_MIN
25 # define INT16_MIN (-INT16_MAX - 1)
26 #endif
27 
28 #if SHRT_MAX == INT16_MAX
29  typedef short int int16;
30 #elif INT_MAX == INT16_MAX
31  typedef int int16;
32 #else
33 # error failed to define int16, please report this to gary@pa.uky.edu
34 #endif
35 
36 #ifndef UINT16_MAX
37 # define UINT16_MAX 65535
38 #endif
39 
40 #if USHRT_MAX == UINT16_MAX
41  typedef unsigned short int uint16;
42 #elif UINT_MAX == UINT16_MAX
43  typedef unsigned int uint16;
44 #else
45 # error failed to define uint16, please report this to gary@pa.uky.edu
46 #endif
47 
48 #ifndef INT32_MAX
49 # define INT32_MAX 2147483647L
50 #endif
51 #ifndef INT32_MIN
52 # define INT32_MIN (-INT32_MAX - 1)
53 #endif
54 
55 #if INT_MAX == INT32_MAX
56  typedef int int32;
57 #elif LONG_MAX == INT32_MAX
58  typedef long int int32;
59 #else
60 # error failed to define int32, please report this to gary@pa.uky.edu
61 #endif
62 
63 #ifndef UINT32_MAX
64 # define UINT32_MAX 4294967295UL
65 #endif
66 
67 #if UINT_MAX == UINT32_MAX
68  typedef unsigned int uint32;
69 #elif ULONG_MAX == UINT32_MAX
70  typedef unsigned long int uint32;
71 #else
72 # error failed to define uint32, please report this to gary@pa.uky.edu
73 #endif
74 
75 #if LONG_MAX > INT32_MAX
76 
77 /* this will only be defined on LP64 systems
78  * ILP32 systems may have long long support, but that is not
79  * part of the ISO/ANSI standard, so we don't use it here... */
80 
81 /* INT64_MAX, etc, may be defined as long long, so avoid system definitions! */
82 
83 # undef INT64_MAX
84 # define INT64_MAX 9223372036854775807L
85 
86 # undef INT64_MIN
87 # define INT64_MIN (-INT64_MAX - 1L)
88 
89 # if LONG_MAX == INT64_MAX
90 # define HAVE_INT64 1
91  typedef long int int64;
92 # define INT64_LIT(X) X##L
93 # endif
94 
95 #endif
96 
97 #if defined(HAVE_LONG_LONG) && !defined(HAVE_INT64)
98 
99 /* this is fallback for 32-bit systems */
100 # if LLONG_MAX > INT32_MAX
101 
102 # undef INT64_MAX
103 # define INT64_MAX 9223372036854775807LL
104 
105 # undef INT64_MIN
106 # define INT64_MIN (-INT64_MAX - 1LL)
107 
108 # if LLONG_MAX == INT64_MAX
109 # define HAVE_INT64 1
110  typedef long long int int64;
111 # define INT64_LIT(X) X##LL
112 # endif
113 
114 # endif
115 
116 #endif
117 
118 #if ULONG_MAX > UINT32_MAX
119 
120 # undef UINT64_MAX
121 # define UINT64_MAX 18446744073709551615UL
122 
123 # if ULONG_MAX == UINT64_MAX
124 # define HAVE_UINT64 1
125  typedef unsigned long int uint64;
126 # define UINT64_LIT(X) X##UL
127 # endif
128 
129 #endif
130 
131 #if defined(HAVE_LONG_LONG) && !defined(HAVE_UINT64)
132 
133 /* this is fallback for 32-bit systems */
134 # if ULLONG_MAX > UINT32_MAX
135 
136 # undef UINT64_MAX
137 # define UINT64_MAX 18446744073709551615ULL
138 
139 # if ULLONG_MAX == UINT64_MAX
140 # define HAVE_UINT64 1
141  typedef unsigned long long int uint64;
142 # define UINT64_LIT(X) X##ULL
143 # endif
144 
145 # endif
146 
147 #endif
148 
149 #ifdef __AVX__
150 # ifdef __AVX512F__
151 # define CD_ALIGN 64
152 # else
153 # define CD_ALIGN 32
154 # endif
155 #else
156 # define CD_ALIGN 16
157 #endif
158 
180 #ifdef cray
181 #ifndef __cray
182 #define __cray 1
183 #endif
184 #endif
185 
187 #ifdef __x86_64
188 #ifndef __amd64
189 #define __amd64 1
190 #endif
191 #endif
192 
193 #if defined(_ARCH_PPC) || defined(__POWERPC__) || defined(__powerpc__) || defined(PPC)
194 #ifndef __ppc__
195 #define __ppc__ 1
196 #endif
197 #endif
198 
204 #if defined(unix) || defined(__unix__)
205 #ifndef __unix
206 #define __unix 1
207 #endif
208 #endif
209 
211 #if defined(linux) || defined(__linux)
212 #ifndef __linux__
213 #define __linux__ 1
214 #endif
215 #endif
216 
218 #ifdef __ECC
219 #ifndef __ICC
220 #define __ICC __ECC
221 #endif
222 #endif
223 
225 #undef __GNUC_EXCL__
226 #if defined(__GNUC__) && ! ( defined(__ICC) || defined(__PATHSCALE__) || defined(__OPENCC__) || defined(__clang__) )
227 #define __GNUC_EXCL__ 1
228 #endif
229 
230 /* make sure __func__ is defined, this can be removed once C++11 is in effect */
231 #ifndef HAVE_FUNC
232 # undef __func__
233 # ifdef __FUNCTION__
234 # define __func__ __FUNCTION__
235 # else
236 # define __func__ DEBUG_ENTRY.name()
237 # endif
238 #endif
239 
240 /* safe, small, numbers for the float and double */
243 /*FLT_MAX is 3.40e38 on wintel, so BIGFLOAT is 3.40e36 */
247 
249 const double BIGDOUBLE = DBL_MAX/100.;
250 const double SMALLDOUBLE = DBL_MIN*100.;
251 
252 const int STDLEN = 32;
253 
264 
265 // the C++ openmodes below give the exact equivalent of the C modes "r", "w", "a", etc.
266 // the "+" sign in the C mode has been replaced by "p", so, e.g., mode_rpb is equivalent to "r+b"
267 const ios_base::openmode mode_r = ios_base::in;
268 const ios_base::openmode mode_w = ios_base::out | ios_base::trunc;
269 const ios_base::openmode mode_a = ios_base::out | ios_base::app;
270 const ios_base::openmode mode_rp = ios_base::in | ios_base::out;
271 const ios_base::openmode mode_wp = ios_base::in | ios_base::out | ios_base::trunc;
272 const ios_base::openmode mode_ap = ios_base::in | ios_base::out | ios_base::app;
273 
274 const ios_base::openmode UNUSED mode_rb = mode_r | ios_base::binary;
275 const ios_base::openmode UNUSED mode_wb = mode_w | ios_base::binary;
276 const ios_base::openmode UNUSED mode_ab = mode_a | ios_base::binary;
277 const ios_base::openmode UNUSED mode_rpb = mode_rp | ios_base::binary;
278 const ios_base::openmode UNUSED mode_wpb = mode_wp | ios_base::binary;
279 const ios_base::openmode UNUSED mode_apb = mode_ap | ios_base::binary;
280 
281 #include "mpi_utilities.h"
282 
283 FILE* open_data( const char* fname, const char* mode, access_scheme scheme=AS_DEFAULT );
284 void open_data( fstream& stream, const char* fname, ios_base::openmode mode, access_scheme scheme=AS_DEFAULT );
285 MPI_File open_data( const char* fname, int mode, access_scheme scheme=AS_DEFAULT );
286 void check_data( const char* fname, access_scheme scheme=AS_DEFAULT );
287 
288 /* this class is deliberately kept global so that the constructor is executed before
289  * any of the user code; this assures a correct FP environment right from the start */
290 class t_cpu_i
291 {
294  union
295  {
296  char c[4];
297  int32 i;
298  } endian;
299 
301  double test_double;
302 
304 # ifdef HAVE_INT64
305  int64 Double_SNaN_Value;
306 # else
308 # endif
309 
310 # ifdef __unix
311  struct sigaction p_action;
312  struct sigaction p_default;
313 # endif
314 
317 
321  long n_use_CPU;
323  bool p_lgMPI;
330  long n_rank;
334  vector<string> chSearchPath;
339  map<string,string> md5sum_expct;
340 
341  void enable_traps() const;
342  static void signal_handler(int sig);
343 
344  vector<string> p_exit_status;
345 
346  void getPathList( const char* fname, vector<string>& PathList, access_scheme scheme, bool lgRead ) const;
347  void getMD5sums( const char* fname );
348 public:
349  t_cpu_i();
350 
351  bool big_endian() const { return ( endian.i == 0x12345678 ); }
352  bool little_endian() const { return ( endian.i == 0x78563412 ); }
353 
354  sys_float min_float() const { return test_float; }
355  double min_double() const { return test_double; }
356 
357 # ifdef __unix
358  const struct sigaction* action() const { return &p_action; }
359  const struct sigaction* deflt() const { return &p_default; }
360 # endif
361 
362  void set_signal_handlers();
363 
364  void setAssertAbort(bool val)
365  {
366  p_lgAssertAbort = val;
367 #ifdef CATCH_SIGNAL
368 # ifdef __unix
369  if( val )
370  sigaction( SIGABRT, deflt(), NULL );
371  else
372  sigaction( SIGABRT, action(), NULL );
373 # endif
374 # ifdef _MSC_VER
375  if( val )
376  signal( SIGABRT, SIG_DFL );
377  else
378  signal( SIGABRT, &signal_handler );
379 # endif
380 #endif
381  }
382  bool lgAssertAbort() const { return p_lgAssertAbort; }
383 
384  void set_nCPU(long n) { n_avail_CPU = n; }
385  long nCPU() const { return n_avail_CPU; }
386  void set_used_nCPU(long n) { n_use_CPU = n; }
387  long used_nCPU() const { return n_use_CPU; }
388  bool lgMPI() const { return p_lgMPI; }
389  void set_MPISingleRankMode( bool mode ) { p_lgMPISingleRankMode = mode; }
391  void set_nRANK(long n) { n_rank = n; }
392  long nRANK() const { return n_rank; }
393  bool lgMaster() const { return ( n_rank == 0 ); }
394  bool lgMPI_talk() const { return lgMaster() || lgMPISingleRankMode(); }
395  const char *host_name() const { return HostName; }
396  void printDataPath() const;
397  char chDirSeparator() const { return p_chDirSeparator; }
398  bool firstOpen() const { return ( nFileDone == 0 ); }
399  const string& chExitStatus(exit_type s) const { return p_exit_status[s]; }
400 
401  friend FILE* open_data( const char* fname, const char* mode, access_scheme scheme );
402  friend void open_data( fstream& stream, const char* fname, ios_base::openmode mode, access_scheme scheme );
403  friend MPI_File open_data( const char* fname, int mode, access_scheme scheme );
404  friend void check_data( const char* fname, access_scheme scheme );
405 
406  friend void set_NaN(sys_float &x);
407  friend void set_NaN(sys_float x[], long n);
408  friend void set_NaN(double &x);
409  friend void set_NaN(double x[], long n);
410 };
411 class t_cpu
412 {
413  static t_cpu_i *m_i;
414 public:
416  {
417  return *m_i;
418  }
419  t_cpu();
420  ~t_cpu();
421 };
422 // Generate a (static) instance of this variable in *every* file.
423 static t_cpu cpu;
424 
425 // The static (class) pointer is set in the first of these. Obviously
426 // this is not thread safe...
427 
428 // Better engineered variants are available in Alexandrescu's book;
429 // better yet to reduce the number of globals and file-statics so
430 // this can just be initialized at the start of main().
431 
433 void set_NaN(sys_float &x);
434 void set_NaN(sys_float x[], /* x[n] */
435  long n);
436 void set_NaN(double &x);
437 void set_NaN(double x[], /* x[n] */
438  long n);
439 
441 bool MyIsnan(const sys_float &x);
442 bool MyIsnan(const double &x);
443 
444 /* Apply compiler directive saying that current routine does not
445  return as modifier, as in "NORETURN void MyExit() { ... }" */
446 #ifdef _MSC_VER
447 #define NORETURN __declspec(noreturn) /*@noreturn@*/
448 #elif defined(__GNUC__) || ( defined(__INTEL_COMPILER) && defined(__linux__) )
449 #define NORETURN __attribute__ ((noreturn)) /*@noreturn@*/
450 #else
451 #define NORETURN /*@noreturn@*/
452 #endif
453 
454 #ifdef _MSC_VER
455 #define ALIGNED(X) __declspec(align(X))
456 #else
457 #define ALIGNED(X) __attribute__ ((aligned(X)))
458 #endif
459 
460 #define RESTRICT
461 #define UNLIKELY(x) (x)
462 #ifdef __GNUC__
463 #if (__GNUC__ >= 3)
464 #undef UNLIKELY
465 #define UNLIKELY(x) __builtin_expect((x),0)
466 #endif
467 #undef RESTRICT
468 #define RESTRICT __restrict
469 #else
470 #endif
471 
472 /* Some hackery needed to test if a preprocessor macro is empty. Use as follows:
473  * #if EXPAND(SOME_DODGY_MACRO) == 1
474  * get here if SOME_DODGY_MACRO expands to empty string
475  * #endif */
476 #define DO_EXPAND(VAL) VAL ## 1
477 #define EXPAND(VAL) DO_EXPAND(VAL)
478 
479 /* Define __COMP and __COMP_VER macros for all systems */
480 /* the Intel compiler */
481 /* this needs to be before g++ since icc also sets __GNUC__ */
482 #if defined __INTEL_COMPILER
483 # define __COMP "icc"
484 # define __COMP_VER __INTEL_COMPILER
485 
486 /* PathScale EKOPath compiler */
487 /* this needs to be before g++ since pathCC also sets __GNUC__ */
488 #elif defined __PATHSCALE__
489 # define __COMP "pathCC"
490 # define __COMP_VER __PATHCC__ * 100 + __PATHCC_MINOR__ * 10 + __PATHCC_PATCHLEVEL__
491 
492 /* Open64 compiler */
493 /* this needs to be before g++ since openCC also sets __GNUC__ */
494 #elif defined __OPENCC__
495 # define __COMP "Open64"
496 # if EXPAND(__OPENCC_PATCHLEVEL__) == 1
497 # define __COMP_VER __OPENCC__ * 100 + __OPENCC_MINOR__ * 10
498 # else
499 # define __COMP_VER __OPENCC__ * 100 + __OPENCC_MINOR__ * 10 + __OPENCC_PATCHLEVEL__
500 # endif
501 
502 /* LLVM clang++ */
503 /* this needs to be before g++ since clang++ also sets __GNUC__ */
504 #elif defined __clang__
505 # define __COMP "clang++"
506 # define __COMP_VER __clang_major__ * 100 + __clang_minor__ * 10 + __clang_patchlevel__
507 
508 /* g++ */
509 #elif defined __GNUC__
510 # define __COMP "g++"
511 # if defined(__GNUC_PATCHLEVEL__)
512 # define __COMP_VER (__GNUC__ * 10000 + __GNUC_MINOR__ * 100 + __GNUC_PATCHLEVEL__)
513 # else
514 # define __COMP_VER (__GNUC__ * 10000 + __GNUC_MINOR__ * 100)
515 # endif
516 
517 #elif defined __PGI
518 # define __COMP "Portland Group"
519 # if defined(__PGIC__)
520 # define __COMP_VER (__PGIC__ * 100 + __PGIC_MINOR__ * 10 + __PGIC_PATCHLEVEL__)
521 # else
522 # define __COMP_VER 0
523 # endif
524 
525 /* SGI MIPSpro */
526 /* this needs to be after g++, since g++ under IRIX also sets _COMPILER_VERSION */
527 #elif defined(__sgi) && defined(_COMPILER_VERSION)
528 # define __COMP "MIPSpro"
529 # define __COMP_VER _COMPILER_VERSION
530 
531 /* HP */
532 #elif defined __HP_aCC
533 # define __COMP "HP aCC"
534 # define __COMP_VER __HP_aCC
535 
536 /* DEC - this one may be broken for C++, no way to test it... */
537 #elif defined __DECC
538 # define __COMP "DEC CC"
539 # define __COMP_VER __DECC_VER
540 
541 /* MS VS */
542 #elif defined _MSC_VER
543 # define __COMP "vs"
544 # define __COMP_VER _MSC_VER
545 
546 /* Oracle Solaris Studio */
547 #elif defined __SUNPRO_CC
548 # define __COMP "Solaris Studio"
549 # define __COMP_VER __SUNPRO_CC
550 
551 /* unknown */
552 #else
553 # define __COMP "unknown"
554 # define __COMP_VER 0
555 #endif
556 
557 /* ---------------------------- OS ---------------------------- */
558 /* linux */
559 #if defined __linux__
560 # if defined __i386
561 # define __OS "Linux (IA32)"
562 # elif defined __amd64
563 # define __OS "Linux (AMD64)"
564 # elif defined __ia64
565 # define __OS "Linux (IA64)"
566 # elif defined __ppc__
567 # define __OS "Linux (PowerPC)"
568 # else
569 # define __OS "Linux (other)"
570 # endif
571 
572 /* macintosh */
573 #elif defined macintosh
574 # define __OS "Mac OS 9"
575 
576 /* macintosh */
577 #elif defined __MACOSX__
578 # define __OS "Mac OS X"
579 
580 /* apple mac, ... */
581 #elif defined __APPLE__
582 # define __OS "Apple MacOS"
583 
584 /* HP */
585 #elif defined hpux
586 # define __OS "HP-UX"
587 
588 /* Oracle Solaris */
589 #elif defined __sun
590 # define __OS "Solaris"
591 
592 /* IBM AIX */
593 #elif defined _AIX
594 # define __OS "AIX"
595 
596 /* Compaq alpha */
597 #elif defined ultrix
598 # define __OS "Ultrix"
599 
600 /* the BSD variants */
601 #elif defined __FreeBSD__
602 # define __OS "FreeBSD"
603 
604 #elif defined __NetBSD__
605 # define __OS "NetBSD"
606 
607 #elif defined __OpenBSD__
608 # define __OS "OpenBSD"
609 
610 /* Windows64 */
611 /* this needs to be before _WIN32 since Windows64 also sets _WIN32 */
612 #elif defined _WIN64
613 # define __OS "Win64"
614 
615 /* Windows */
616 #elif defined _WIN32
617 # define __OS "Win32"
618 
619 /* Cygwin */
620 #elif defined __CYGWIN__
621 # define __OS "Cygwin"
622 
623 /* SGI */
624 #elif defined __sgi
625 # define __OS "IRIX"
626 
627 /* unknown */
628 #else
629 # define __OS "unknown"
630 #endif
631 
632 /* don't perform this check when we are generating dependencies */
633 #ifndef MM
634 /* bomb out if the compiler is broken.... */
635 # if defined(__GNUC_EXCL__) && ((__GNUC__ == 2 && __GNUC_MINOR__ == 96) || (__GNUC__ == 3 && __GNUC_MINOR__ == 4))
636 # error "This g++ version cannot compile Cloudy and must not be used! Please update g++ to a functional version. See http://wiki.nublado.org/wiki/CompileCode for more details."
637 # endif
638 
639 # if __INTEL_COMPILER >= 1200 && __INTEL_COMPILER < 1300
640 # error "This icc version cannot compile Cloudy and must not be used! Please use a functional version of icc, or g++. See http://wiki.nublado.org/wiki/CompileCode for more details."
641 # endif
642 #endif
643 
644 #ifdef _MSC_VER
645 #pragma warning( default : 4127 )/* disable warning that conditional expression is constant*/
646 #endif
647 
648 #endif /* CPU_H_ */
long nRANK() const
Definition: cpu.h:392
long n_rank
Definition: cpu.h:330
const ios_base::openmode mode_wp
Definition: cpu.h:271
map< string, string > md5sum_expct
Definition: cpu.h:339
FILE * open_data(const char *fname, const char *mode, access_scheme scheme)
Definition: cpu.cpp:751
void set_used_nCPU(long n)
Definition: cpu.h:386
static void signal_handler(int sig)
Definition: cpu.cpp:540
bool p_lgMPISingleRankMode
Definition: cpu.h:328
double test_double
Definition: cpu.h:301
const double BIGDOUBLE
Definition: cpu.h:249
friend void check_data(const char *fname, access_scheme scheme)
Definition: cpu.cpp:838
union t_cpu_i::@4 endian
void set_NaN(sys_float &x)
Definition: cpu.cpp:862
friend void set_NaN(sys_float &x)
Definition: cpu.cpp:862
const realnum SMALLFLOAT
Definition: cpu.h:246
t_cpu_i & i()
Definition: cpu.h:415
int32 Double_SNaN_Value[2]
Definition: cpu.h:307
const double SMALLDOUBLE
Definition: cpu.h:250
void getPathList(const char *fname, vector< string > &PathList, access_scheme scheme, bool lgRead) const
Definition: cpu.cpp:560
access_scheme
Definition: cpu.h:262
Definition: cpu.h:290
const ios_base::openmode UNUSED mode_wb
Definition: cpu.h:275
const int STDLEN
Definition: cpu.h:252
static t_cpu_i * m_i
Definition: cpu.h:413
void setAssertAbort(bool val)
Definition: cpu.h:364
long used_nCPU() const
Definition: cpu.h:387
void * MPI_File
Definition: mpi_utilities.h:74
const ios_base::openmode UNUSED mode_rpb
Definition: cpu.h:277
bool big_endian() const
Definition: cpu.h:351
bool MyIsnan(const sys_float &x)
Definition: cpu.cpp:933
void set_nRANK(long n)
Definition: cpu.h:391
double min_double() const
Definition: cpu.h:355
char HostName[STDLEN]
Definition: cpu.h:332
void getMD5sums(const char *fname)
Definition: cpu.cpp:609
exit_type
Definition: cddefines.h:142
bool little_endian() const
Definition: cpu.h:352
~t_cpu()
Definition: cpu.cpp:56
bool lgAssertAbort() const
Definition: cpu.h:382
friend FILE * open_data(const char *fname, const char *mode, access_scheme scheme)
Definition: cpu.cpp:751
long n_avail_CPU
Definition: cpu.h:319
const ios_base::openmode mode_a
Definition: cpu.h:269
const ios_base::openmode mode_r
Definition: cpu.h:267
long n_use_CPU
Definition: cpu.h:321
int nFileDone
Definition: cpu.h:337
float realnum
Definition: cddefines.h:124
float sys_float
Definition: cddefines.h:127
t_cpu_i()
Definition: cpu.cpp:65
const realnum BIGFLOAT
Definition: cpu.h:244
void printDataPath() const
Definition: cpu.cpp:552
bool lgMaster() const
Definition: cpu.h:393
int32 Float_SNaN_Value
Definition: cpu.h:303
long max(int a, long b)
Definition: cddefines.h:821
bool firstOpen() const
Definition: cpu.h:398
bool lgMPI_talk() const
Definition: cpu.h:394
char p_chDirSeparator
Definition: cpu.h:336
long min(int a, long b)
Definition: cddefines.h:766
const ios_base::openmode UNUSED mode_wpb
Definition: cpu.h:278
vector< string > p_exit_status
Definition: cpu.h:344
const ios_base::openmode mode_ap
Definition: cpu.h:272
const ios_base::openmode UNUSED mode_rb
Definition: cpu.h:274
const ios_base::openmode mode_w
Definition: cpu.h:268
sys_float min_float() const
Definition: cpu.h:354
void set_signal_handlers()
Definition: cpu.cpp:505
bool lgMPI() const
Definition: cpu.h:388
const ios_base::openmode UNUSED mode_ab
Definition: cpu.h:276
bool p_lgAssertAbort
Definition: cpu.h:316
void set_MPISingleRankMode(bool mode)
Definition: cpu.h:389
void set_nCPU(long n)
Definition: cpu.h:384
char c[4]
Definition: cpu.h:296
Definition: cpu.h:411
const ios_base::openmode UNUSED mode_apb
Definition: cpu.h:279
long nCPU() const
Definition: cpu.h:385
int32 i
Definition: cpu.h:297
void enable_traps() const
Definition: cpu.cpp:330
sys_float test_float
Definition: cpu.h:300
static t_cpu cpu
Definition: cpu.h:423
bool p_lgMPI
Definition: cpu.h:323
vector< string > chSearchPath
Definition: cpu.h:334
const ios_base::openmode mode_rp
Definition: cpu.h:270
t_cpu()
Definition: cpu.cpp:49
char chDirSeparator() const
Definition: cpu.h:397
bool lgMPISingleRankMode() const
Definition: cpu.h:390
const char * host_name() const
Definition: cpu.h:395
const string & chExitStatus(exit_type s) const
Definition: cpu.h:399
void check_data(const char *fname, access_scheme scheme)
Definition: cpu.cpp:838
#define UNUSED
Definition: cpu.h:14