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
|
(* Copyright 2004 Sascha Husa, Ian Hinder, Christiane Lechner
This file is part of Kranc.
Kranc is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
Kranc is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with Kranc; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*)
BeginPackage["Kranc`"];
(* CodeGen.m *)
{INV, SQR, CUB, QAD, IfThen, Parenthesis, Scalar, ToReal,
sqrt, exp, log, pow, atan2, cos, sin, tan, acos, asin, atan,
cosh, sinh, tanh, acosh, asinh, atanh, fmax, fmin, fabs,
kmadd, kmsub, knmadd, knmsub, kpos, kneg, kadd, ksub, kmul, kdiv,
kacos, kacosh, kasin, kasinh, katan, katanh, kcos, kcosh, kfabs,
kfmax, kfmin, ksqrt, kexp, klog, kpow, ksin, ksinh, ktan, ktanh,
dir1, dir2, dir3, dt, dx, dy, dz,
khalf, kthird, ktwothird, kfourthird, keightthird};
(* Helpers.m *)
dummy;
(* CalculationFunction.m *)
{GridFunctions, Shorthands, Equations, t, DeclarationIncludes,
LoopPreIncludes, GroupImplementations, PartialDerivatives, NoSimplify,
Boundary, Interior, InteriorNoSync, Where, AddToStencilWidth,
Everywhere, normal1, normal2, normal3, INV, SQR, CUB, QAD, dot, pow,
exp, dt, dx, dy, dz, idx, idy, idz, t, MinMod, VanLeer}
{ConditionalOnKeyword, ConditionalOnKeywords, CollectList, Interior,
InteriorNoSync, Boundary, BoundaryWithGhosts, Where, PreDefinitions,
AllowedSymbols, Parameters, ConditionalOnTextuals, ApplyBCs};
(* Differencing.m *)
{Name, Definitions, shift, spacing, SBPDerivative};
(* KrancThorn.m *)
ThornOptions =
{Calculations -> {},
ConservationCalculations -> {},
DeclaredGroups -> {},
ODEGroups -> {},
Implementation -> None,
InheritedImplementations -> {},
EvolutionTimelevels -> 3,
DefaultEvolutionTimelevels -> None,
RealParameters -> {},
IntParameters -> {},
KeywordParameters -> {},
InheritedRealParameters -> {},
InheritedIntParameters -> {},
InheritedKeywordParameters -> {},
ExtendedRealParameters -> {},
ExtendedIntParameters -> {},
ExtendedKeywordParameters -> {},
PartialDerivatives -> {},
ReflectionSymmetries -> {},
ZeroDimensions -> {},
UseLoopControl -> False, (* ignored *)
UseDGFE -> False,
UseOpenCL -> False,
UseVectors -> False,
ProhibitAssignmentToGridFunctionsRead -> False,
IncludeFiles -> {},
CSE -> False,
UseJacobian -> False};
(* Thorn.m *)
{AccumulatorBase, ThornImplementation, Name, Type, Extend, Default,
Comment, Range, Implementation, Group, SchedulePoint, Language,
RequiredGroups, ProvidedGroups,
SynchronizedGroups, StorageGroups, Timelevels, MaxTimelevels,
VariableType, GridType, Dim, Size,
Visibility, Variables, Implementations, Value, AllowedValues,
UsedParameters, Description, ExtendedParameters, NewParameters,
Directory, Configuration, Interface, Param, Schedule, Sources, Makefile,
Filename,
Contents, ThornName, BaseImplementation, EvolvedGFs, EvolvedArrays, PrimitiveGFs,
Groups, Calculation, GridFunctions, Shorthands, Equations, Parameter,
Value, UsesFunctions, ArgString, Conditional, Conditionals, D1, D2, D3, D11, D22,
D33, D21, D31, D32, Textual, TriggerGroups, Include, RHSGroups, Tags,
Steerable, Never, Always, Recover, Primitives};
{ExcisionGFs};
(* TensorTools.m *)
{D1, D2, D3, D11, D22, D33, D21, D31, D32, D12, D13, D23, dot, Eps, Zero3}
(* ConservationCalculation.m *)
{flux, slopeL, slopeR, slope};
EndPackage[];
|
