CarpetExtra/SpaceTimeToy/src/Startup.F77


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

c     -*-Fortran-*-
c     $Header:$
      
#include "cctk.h"
      
      subroutine SpaceTimeToy_Startup
      
      implicit none
      
      integer ierr
      
      call CCTK_RegisterBanner
     $     (ierr, "SpaceTimeToy: Evolutions of two Scalar Fields")
      
      end