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