diff options
Diffstat (limited to 'CarpetExtra/IDHydroToy/src/Startup.F77')
-rw-r--r-- | CarpetExtra/IDHydroToy/src/Startup.F77 | 15 |
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 |