blob: 3839de6bbe680e740170ccb9ba62ce63119536eb (
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
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
|
/*@@
@file Startup.c
@date Wed May 22 02:09:19 2002
@author
@desc
Register the startup banner.
The external variables are also declared here. These are
the arrays containing the variable indexes and right hand sides,
and the number of each type of variable currently in use (the
parameters only give the maximum possible for each type).
@enddesc
@version $Header$
@@*/
#include "cctk.h"
#include "ExternalVariables.h"
static const char *rcsid = "$Header$";
CCTK_FILEVERSION(AlphaThorns_MoL_Startup_c);
/********************************************************************
******************** External Variables **********************
********************************************************************/
CCTK_INT *EvolvedVariableIndex = NULL;
CCTK_INT *RHSVariableIndex = NULL;
CCTK_INT *ConstrainedVariableIndex = NULL;
CCTK_INT *SandRVariableIndex = NULL;
CCTK_INT MoLNumEvolvedVariables = 0;
CCTK_INT MoLNumConstrainedVariables = 0;
CCTK_INT MoLNumSandRVariables = 0;
/********************************************************************
********************* Local Data Types ***********************
********************************************************************/
/********************************************************************
********************* Local Routine Prototypes *********************
********************************************************************/
/********************************************************************
***************** Scheduled Routine Prototypes *********************
********************************************************************/
int MoL_Startup(void);
/********************************************************************
********************* Other Routine Prototypes *********************
********************************************************************/
/********************************************************************
********************* Local Data *****************************
********************************************************************/
/********************************************************************
********************* External Routines **********************
********************************************************************/
/*@@
@routine MoL_Startup
@date Wed May 22 02:17:17 2002
@author Ian Hawke
@desc
Register the startup banner with the flesh.
@enddesc
@calls
@calledby
@history
@endhistory
@@*/
int MoL_Startup(void)
{
const char *banner = "MoL: Generalized time integration.";
CCTK_RegisterBanner(banner);
return 0;
}
/********************************************************************
********************* Local Routines *************************
********************************************************************/
|
