From 6e478cfc32f7b117779366ecbd2430fcf6020bbb Mon Sep 17 00:00:00 2001 From: Erik Schnetter Date: Sat, 25 Feb 2006 16:53:00 +0000 Subject: WaveToyMoL: Set the symmetry information for psi darcs-hash:20060225165338-dae7b-4a701d18bc249c116c5715902875c340c91407b3.gz --- CarpetExtra/WaveToyMoL/src/initsymbound.F77 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'CarpetExtra/WaveToyMoL') diff --git a/CarpetExtra/WaveToyMoL/src/initsymbound.F77 b/CarpetExtra/WaveToyMoL/src/initsymbound.F77 index 64cb02ea1..6edb0b2ca 100644 --- a/CarpetExtra/WaveToyMoL/src/initsymbound.F77 +++ b/CarpetExtra/WaveToyMoL/src/initsymbound.F77 @@ -16,7 +16,7 @@ end do call SetCartSymVN (ierr, cctkGH, sym, "WaveToyMoL::phi") if (ierr.ne.0) call CCTK_WARN (0, "internal error") - call SetCartSymVN (ierr, cctkGH, sym, "WaveToyMoL::phidot") + call SetCartSymVN (ierr, cctkGH, sym, "WaveToyMoL::psi") if (ierr.ne.0) call CCTK_WARN (0, "internal error") call SetCartSymVN (ierr, cctkGH, sym, "WaveToyMoL::error") if (ierr.ne.0) call CCTK_WARN (0, "internal error") -- cgit v1.2.3