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
|
# Interface definition for thorn Carpet
# $Header: /home/eschnett/C/carpet/Carpet/Carpet/Carpet/interface.ccl,v 1.18 2004/06/08 21:09:25 schnetter Exp $
IMPLEMENTS: Driver
include header: carpet_public.hh in carpet.hh
include header: carpet_public.h in carpet.h
uses include header: defs.hh
uses include header: dist.hh
uses include header: bbox.hh
uses include header: bboxset.hh
uses include header: vect.hh
uses include header: data.hh
uses include header: dh.hh
uses include header: gf.hh
uses include header: ggf.hh
uses include header: gh.hh
uses include header: th.hh
uses include header: operators.hh
# Provide the function to en-/disable prolongation
CCTK_INT FUNCTION EnableProlongating(CCTK_INT IN flag)
PROVIDES FUNCTION EnableProlongating WITH CarpetEnableProlongating LANGUAGE C
# The location of the boundary points
CCTK_INT FUNCTION GetBoundarySpecification \
(CCTK_INT IN size, \
CCTK_INT OUT ARRAY nboundaryzones, \
CCTK_INT OUT ARRAY is_internal, \
CCTK_INT OUT ARRAY is_staggered, \
CCTK_INT OUT ARRAY shiftout)
USES FUNCTION GetBoundarySpecification
# The overall size of the domain
CCTK_INT FUNCTION GetDomainSpecification \
(CCTK_INT IN size, \
CCTK_REAL OUT ARRAY physical_min, \
CCTK_REAL OUT ARRAY physical_max, \
CCTK_REAL OUT ARRAY interior_min, \
CCTK_REAL OUT ARRAY interior_max, \
CCTK_REAL OUT ARRAY exterior_min, \
CCTK_REAL OUT ARRAY exterior_max, \
CCTK_REAL OUT ARRAY spacing)
USES FUNCTION GetDomainSpecification
# Conversion between boundary types
CCTK_INT FUNCTION ConvertFromPhysicalBoundary \
(CCTK_INT IN size, \
CCTK_REAL IN ARRAY physical_min, \
CCTK_REAL IN ARRAY physical_max, \
CCTK_REAL OUT ARRAY interior_min, \
CCTK_REAL OUT ARRAY interior_max, \
CCTK_REAL OUT ARRAY exterior_min, \
CCTK_REAL OUT ARRAY exterior_max, \
CCTK_REAL IN ARRAY spacing)
USES FUNCTION ConvertFromPhysicalBoundary
CCTK_INT FUNCTION ConvertFromExteriorBoundary \
(CCTK_INT IN size, \
CCTK_REAL OUT ARRAY physical_min, \
CCTK_REAL OUT ARRAY physical_max, \
CCTK_REAL OUT ARRAY interior_min, \
CCTK_REAL OUT ARRAY interior_max, \
CCTK_REAL IN ARRAY exterior_min, \
CCTK_REAL IN ARRAY exterior_max, \
CCTK_REAL IN ARRAY spacing)
USES FUNCTION ConvertFromExteriorBoundary
# The true prototype of the routine below:
# int Carpet_Regrid (const cGH * cctkGH,
# gh<dim>::rexts * bbsss,
# gh<dim>::rbnds * obss,
# gh<dim>::rprocs * pss);
CCTK_INT FUNCTION Carpet_Regrid (CCTK_POINTER_TO_CONST IN cctkGH, \
CCTK_POINTER IN bbsss, \
CCTK_POINTER IN obss, \
CCTK_POINTER IN pss, \
CCTK_INT IN force)
USES FUNCTION Carpet_Regrid
|