From d238d22a9c4048a922be17bd0e22599748d8223c Mon Sep 17 00:00:00 2001
From: Dave Gaskell <gaskelld@spoon.jlab.org>
Date: Tue, 18 May 2021 17:06:37 -0400
Subject: [PATCH] Tweak effective Delta width

---
 event.f | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/event.f b/event.f
index 6fa66f4..14cd460 100644
--- a/event.f
+++ b/event.f
@@ -573,7 +573,8 @@ c	  endif
 	      
 C DJG If doing Deltas final state for pion production, generate Delta mass
 	  if(which_pion.eq.2 .or. which_pion.eq.3) then
-	     targ%Mrec_struck = Mdelta + 0.5*Delta_width*tan((2.*grnd()-1.)*pi/2.)
+c factor of 0.7265 to better match data (PB)
+	     targ%Mrec_struck = Mdelta + 0.5*(0.7265)*Delta_width*tan((2.*grnd()-1.)*pi/2.)
 	  endif
 
 	  vertex%Pm = pfer	!vertex%Em generated at beginning.
-- 
GitLab