ORB5  v4.9.4
precomp.h
Go to the documentation of this file.
1!-- Debug level
2!-- 0 no debug
3!-- 1
4#define DEBUG 0
5
6!-- TIMER
7!-- 0 off
8!-- 1 on
9#define ADDTIMER 0
10
11!-- Type of call to "continuous_heating"
12#define CHECK_POWER_NUM 1
13#define APPLY_POWER_NUM 2
14#define USE_INTEL_FFT 0
15!--
16!#define HEAP 1
17!#define LINK_ITM 0
18
19! Concatenate arguments after macro expansion (see https://gcc.gnu.org/onlinedocs/cpp/Argument-Prescan.html#Argument-Prescan)
20#ifdef __GFORTRAN__
21#define CONCAT1(a) a
22#define CONCAT(a,b) CONCAT1(a)b
23#else
24#define CONCAT1(a,b) a ## b
25#define CONCAT(a,b) CONCAT1(a,b)
26#endif
27
28#ifdef POPENMP
29#define pomp $omp
30#endif
31
32#ifdef NO_MPI_F08
33#define MPI_comm_TYPE integer
34#define MPI_datatype_TYPE integer
35#define MPI_info_TYPE integer
36#define MPI_request_TYPE integer
37#define MPI_status_TYPE integer, dimension(MPI_STATUS_SIZE)
38#define USE_MPI use mpi
39#else
40#define MPI_comm_TYPE type(mpi_comm)
41#define MPI_datatype_TYPE type(mpi_datatype)
42#define MPI_info_TYPE type(mpi_info)
43#define MPI_request_TYPE type(mpi_request)
44#define MPI_status_TYPE type(mpi_status)
45#define USE_MPI use mpi_f08
46#endif
larmor::of
type(sorting_class), dimension(:), allocatable, save of
Definition: larmor.F90:33
USE_MPI
#define USE_MPI
MPI_info_TYPE
#define MPI_info_TYPE
MPI_datatype_TYPE
#define MPI_datatype_TYPE
CONCAT
#define CONCAT(a, b)
MPI_status_TYPE
#define MPI_status_TYPE
MPI_comm_TYPE
#define MPI_comm_TYPE
CONCAT1
#define CONCAT1(a, b)
MPI_request_TYPE
#define MPI_request_TYPE