blob: 17f8601e8e5b86c14438cf18a67c449ecc781c45 (
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
58
|
/* $Header$ */
#include <math.h>
#include <limits.h>
#include <stdlib.h>
#include <string.h>
#include <stdio.h>
#include "util_ErrorCodes.h"
#include "cctk.h"
#include "../InterpLocalUniform.h"
#include "../common/structs.h"
#include "../common/fetch.h"
#include "../common/evaluate.h"
#include "../common/store.h"
/* function prototype */
#define FUNCTION_NAME LocalInterp_ULagrange_1d_cube20
#include "../template.h"
#define N_DIMS 1
#define MOLECULE_MIN_M -1
#define MOLECULE_MAX_M 1
#define MOLECULE_SIZE 3
/* which derivative ops do we support? */
#define HAVE_OP_I
#define HAVE_OP_DX
#define HAVE_OP_DXX
#define XYZ x
#define FP_XYZ fp x
#define STRIDE_IJK stride_i
#define JACOBIAN_MIJK_STRIDE Jacobian_mi_stride
#define DATA_STRUCT data_struct_1d_cube_size3
#define COEFFS_STRUCT coeffs_struct_1d_cube_size3
#define FETCH_DATA_REAL LocalInterp_fetch_1d_cube3_r
#define FETCH_DATA_REAL4 LocalInterp_fetch_1d_cube3_r4
#define FETCH_DATA_REAL8 LocalInterp_fetch_1d_cube3_r8
#define FETCH_DATA_REAL16 LocalInterp_fetch_1d_cube3_r16
#define FETCH_DATA_COMPLEX LocalInterp_fetch_1d_cube3_c
#define FETCH_DATA_COMPLEX8 LocalInterp_fetch_1d_cube3_c8
#define FETCH_DATA_COMPLEX16 LocalInterp_fetch_1d_cube3_c16
#define FETCH_DATA_COMPLEX32 LocalInterp_fetch_1d_cube3_c32
#define EVALUATE_MOLECULE LocalInterp_eval_1d_cube3
#define STORE_COEFFS LocalInterp_store_1d_cube3
/* note pathnames are all relative to "../template.c" */
#define COEFFS_I_COMPUTE_FILE_NAME "Lagrange/1d.coeffs/1d.cube.order2.smooth0/coeffs-I.compute.c"
#define COEFFS_DX_COMPUTE_FILE_NAME "Lagrange/1d.coeffs/1d.cube.order2.smooth0/coeffs-dx.compute.c"
#define COEFFS_DXX_COMPUTE_FILE_NAME "Lagrange/1d.coeffs/1d.cube.order2.smooth0/coeffs-dxx.compute.c"
/* actual code */
#include "../template.c"
|