diff options
Diffstat (limited to 'src/Startup.F')
-rw-r--r-- | src/Startup.F | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Startup.F b/src/Startup.F index c841002..0ea11e4 100644 --- a/src/Startup.F +++ b/src/Startup.F @@ -10,11 +10,12 @@ #include "cctk.h" - subroutine WaveToyF90_Startup + integer function WaveToyF90_Startup () implicit none integer ierr call CCTK_RegisterBanner(ierr, "WaveToyF90: Evolutions of a Scalar Field") + WaveToyF90_Startup = 0 - end subroutine WaveToyF90_Startup + end function WaveToyF90_Startup |