aboutsummaryrefslogtreecommitdiff
path: root/CarpetExtra/IDHydroToy/src/Startup.F77
diff options
context:
space:
mode:
Diffstat (limited to 'CarpetExtra/IDHydroToy/src/Startup.F77')
-rw-r--r--CarpetExtra/IDHydroToy/src/Startup.F7715
1 files changed, 15 insertions, 0 deletions
diff --git a/CarpetExtra/IDHydroToy/src/Startup.F77 b/CarpetExtra/IDHydroToy/src/Startup.F77
new file mode 100644
index 000000000..d4e87f0af
--- /dev/null
+++ b/CarpetExtra/IDHydroToy/src/Startup.F77
@@ -0,0 +1,15 @@
+c -*-Fortran-*-
+c $Header: /home/eschnett/C/carpet/Carpet/CarpetExtra/IDHydroToy/src/Startup.F77,v 1.1 2001/03/18 22:37:10 eschnett Exp $
+
+#include "cctk.h"
+
+ subroutine IDHydroToy_Startup
+
+ implicit none
+
+ integer ierr
+
+ call CCTK_RegisterBanner
+ $ (ierr, "IDHydroToy: Initial data for a Scalar and a Vector Field")
+
+ end