aboutsummaryrefslogtreecommitdiff
path: root/src/macro/CDCDA_declare.h
blob: a677b316c8ddeb16c5a6849b43f06a4ee2f9831f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
/*@@
  @header   CDCDA_declare.h
  @date     Jul 98
  @author   Gabrielle Allen
  @desc
  Declarations for macro to calculate all second covariant spatial derivative of lapse

  That is alpha_{;ij}
  @enddesc
@@*/

#ifndef CDCDA_DECLARE
#define CDCDA_DECLARE

#include "DA_declare.h"
#include "DDA_declare.h"
#include "CHR2_declare.h"

/* Output variables */ 
#undef  CDCDA_CDXXDA
#define CDCDA_CDXXDA cdcda_cdxxda
#undef  CDCDA_CDXYDA
#define CDCDA_CDXYDA cdcda_cdxyda
#undef  CDCDA_CDXZDA
#define CDCDA_CDXZDA cdcda_cdxzda
#undef  CDCDA_CDYYDA
#define CDCDA_CDYYDA cdcda_cdyyda
#undef  CDCDA_CDYZDA
#define CDCDA_CDYZDA cdcda_cdyzda
#undef  CDCDA_CDZZDA
#define CDCDA_CDZZDA cdcda_cdzzda

#ifdef FCODE

/* Declare output variables */
      CCTK_REAL CDCDA_CDXXDA
      CCTK_REAL CDCDA_CDXYDA
      CCTK_REAL CDCDA_CDXZDA
      CCTK_REAL CDCDA_CDYYDA
      CCTK_REAL CDCDA_CDYZDA
      CCTK_REAL CDCDA_CDZZDA

#endif

#ifdef CCODE

/* Declare output variables */
      double CDCDA_CDXXDA;
      double CDCDA_CDXYDA;
      double CDCDA_CDXZDA;
      double CDCDA_CDYYDA;
      double CDCDA_CDYZDA;
      double CDCDA_CDZZDA;

#endif

#endif