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