blob: d4e87f0afe32adbbb2dbc6b0bb75a1735126fce1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
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
|