blob: 20523da31b0121a8506440555d69a250f787cfde (
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$ */
#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_U_LagrMD_1d_cube10
#include "../template.h"
#define N_DIMS 1
#define MOLECULE_MIN_M 0
#define MOLECULE_MAX_M 1
#define MOLECULE_SIZE 2
/* which derivative ops do we support? */
#define HAVE_OP_I
#define HAVE_OP_DX
/* n.b. no 2nd derivatives for linear interpolation! */
#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_size2
#define COEFFS_STRUCT coeffs_struct_1d_cube_size2
#define FETCH_DATA_REAL LocalInterp_fetch_1d_cube2_r
#define FETCH_DATA_REAL4 LocalInterp_fetch_1d_cube2_r4
#define FETCH_DATA_REAL8 LocalInterp_fetch_1d_cube2_r8
#define FETCH_DATA_REAL16 LocalInterp_fetch_1d_cube2_r16
#define FETCH_DATA_COMPLEX LocalInterp_fetch_1d_cube2_c
#define FETCH_DATA_COMPLEX8 LocalInterp_fetch_1d_cube2_c8
#define FETCH_DATA_COMPLEX16 LocalInterp_fetch_1d_cube2_c16
#define FETCH_DATA_COMPLEX32 LocalInterp_fetch_1d_cube2_c32
#define EVALUATE_MOLECULE LocalInterp_eval_1d_cube2
#define STORE_COEFFS LocalInterp_store_1d_cube2
/* note pathnames are all relative to "../template.c" */
#define COEFFS_I_COMPUTE_FILE_NAME "Lagrange-maximum-degree/1d.coeffs/1d.cube.order1.smooth0/coeffs-I.compute.c"
#define COEFFS_DX_COMPUTE_FILE_NAME "Lagrange-maximum-degree/1d.coeffs/1d.cube.order1.smooth0/coeffs-dx.compute.c"
/* actual code */
#include "../template.c"
|
