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
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
|
#ifndef OPERATOR_PROTOTYPES
#define OPERATOR_PROTOTYPES
#include <cstdlib>
#include <cctk.h>
#include <vect.hh>
#include <bbox.hh>
namespace CarpetLib {
using namespace std;
static inline
size_t
index3 (size_t const i, size_t const j, size_t const k,
size_t const exti, size_t const extj, size_t const extk)
{
#ifndef CARPET_OPTIMISE
assert (static_cast <ptrdiff_t> (i) >= 0 and i < exti);
assert (static_cast <ptrdiff_t> (j) >= 0 and j < extj);
assert (static_cast <ptrdiff_t> (k) >= 0 and k < extk);
#endif
return i + exti * (j + extj * k);
}
static int const dim3 = 3;
typedef vect <bool, dim3> bvect3;
typedef vect <int, dim3> ivect3;
typedef bbox <int, dim3> ibbox3;
static int const reffact2 = 2;
template <typename T>
void
copy_3d (T const * restrict const src,
ivect3 const & srcext,
T * restrict const dst,
ivect3 const & dstext,
ibbox3 const & srcbbox,
ibbox3 const & dstbbox,
ibbox3 const & regbbox);
template <typename T>
void
prolongate_3d_o1_rf2 (T const * restrict const src,
ivect3 const & srcext,
T * restrict const dst,
ivect3 const & dstext,
ibbox3 const & srcbbox,
ibbox3 const & dstbbox,
ibbox3 const & regbbox);
template <typename T>
void
prolongate_3d_o3_rf2 (T const * restrict const src,
ivect3 const & srcext,
T * restrict const dst,
ivect3 const & dstext,
ibbox3 const & srcbbox,
ibbox3 const & dstbbox,
ibbox3 const & regbbox);
template <typename T>
void
prolongate_3d_o5_rf2 (T const * restrict const src,
ivect3 const & srcext,
T * restrict const dst,
ivect3 const & dstext,
ibbox3 const & srcbbox,
ibbox3 const & dstbbox,
ibbox3 const & regbbox);
template <typename T>
void
restrict_3d_rf2 (T const * restrict const src,
ivect3 const & srcext,
T * restrict const dst,
ivect3 const & dstext,
ibbox3 const & srcbbox,
ibbox3 const & dstbbox,
ibbox3 const & regbbox);
template <typename T>
void
interpolate_3d_2tl (T const * restrict const src1,
CCTK_REAL const t1,
T const * restrict const src2,
CCTK_REAL const t2,
ivect3 const & srcext,
T * restrict const dst,
CCTK_REAL const t,
ivect3 const & dstext,
ibbox3 const & srcbbox,
ibbox3 const & dstbbox,
ibbox3 const & regbbox);
template <typename T>
void
interpolate_3d_3tl (T const * restrict const src1,
CCTK_REAL const t1,
T const * restrict const src2,
CCTK_REAL const t2,
T const * restrict const src3,
CCTK_REAL const t3,
ivect3 const & srcext,
T * restrict const dst,
CCTK_REAL const t,
ivect3 const & dstext,
ibbox3 const & srcbbox,
ibbox3 const & dstbbox,
ibbox3 const & regbbox);
template <typename T>
void
prolongate_3d_cc_rf2_std2prim (T const * restrict const src,
ivect3 const & srcext,
T * restrict const dst,
ivect3 const & dstext,
ibbox3 const & srcbbox,
ibbox3 const & dstbbox,
ibbox3 const & regbbox);
template <typename T>
void
prolongate_3d_cc_rf2_prim2std (T const * restrict const src,
ivect3 const & srcext,
T * restrict const dst,
ivect3 const & dstext,
ibbox3 const & srcbbox,
ibbox3 const & dstbbox,
ibbox3 const & regbbox);
template <typename T>
void
restrict_3d_cc_rf2 (T const * restrict const src,
ivect3 const & srcext,
T * restrict const dst,
ivect3 const & dstext,
ibbox3 const & srcbbox,
ibbox3 const & dstbbox,
ibbox3 const & regbbox);
} // namespace CarpetLib
#endif // #ifndef OPERATOR_PROTOTYPES
|
