From 4fe9f81a717896a25c4f982d0658f0514d59e895 Mon Sep 17 00:00:00 2001 From: reisswig Date: Sun, 5 Oct 2008 01:51:48 +0000 Subject: Add capability to store puncture locations in spherical surfaces so that CarpetMask can still exclude the region around the punctures. git-svn-id: http://svn.aei.mpg.de/numrel/AEIThorns/PunctureTracker/trunk@12 a2659f00-0f4f-0410-9214-a4596bbb8a4f --- src/make.code.defn | 2 +- src/puncture_tracker.c | 13 +++++++++++++ 2 files changed, 14 insertions(+), 1 deletion(-) (limited to 'src') diff --git a/src/make.code.defn b/src/make.code.defn index 31baa1c..26c754a 100644 --- a/src/make.code.defn +++ b/src/make.code.defn @@ -1,7 +1,7 @@ # Main make.code.defn file for thorn PunctureTracker -*-Makefile-*- # Source files in this directory -SRCS = puncture_tracker.c +SRCS = puncture_tracker.c paramcheck.cc # Subdirectories containing source files SUBDIRS = diff --git a/src/puncture_tracker.c b/src/puncture_tracker.c index 4e36c1f..9dee438 100644 --- a/src/puncture_tracker.c +++ b/src/puncture_tracker.c @@ -298,6 +298,19 @@ PunctureTracker_SetPositions (CCTK_ARGUMENTS) position_z[n] = pt_loc_z[n]; } + + // store puncture location in spherical surface + if (which_surface_to_store_info[n] != -1) + { + int sn = which_surface_to_store_info[n]; + + sf_origin_x[sn] = position_x[n]; + sf_origin_y[sn] = position_y[n]; + sf_origin_z[sn] = position_z[n]; + + sf_active[sn] = 1; + } + } if ( modify_puncture[0]>=0 && modify_puncture[0]