aboutsummaryrefslogtreecommitdiff
path: root/src/Startup.F
diff options
context:
space:
mode:
Diffstat (limited to 'src/Startup.F')
-rw-r--r--src/Startup.F22
1 files changed, 22 insertions, 0 deletions
diff --git a/src/Startup.F b/src/Startup.F
new file mode 100644
index 0000000..44c7084
--- /dev/null
+++ b/src/Startup.F
@@ -0,0 +1,22 @@
+ /*@@
+ @file Startup.F90
+ @date
+ @author Gabrielle Allen
+ @desc
+ Register banner
+ @enddesc
+ @version $Header$
+ @@*/
+
+#include "cctk.h"
+
+ integer function WaveToyF90_Startup()
+
+ implicit none
+
+ integer ierr
+ call CCTK_RegisterBanner(ierr, "WaveToyF90: Evolutions of a Scalar Field")
+
+ WaveToyF90_Startup = 0
+
+ end function WaveToyF90_Startup