From cce37c4efe5f2e37a309394aa8b9b324f9798beb Mon Sep 17 00:00:00 2001
From: huang474 <huang474@purdue.edu>
Date: Tue, 14 Feb 2017 13:25:32 +0000
Subject: [PATCH] Updated flowery ray function.

---
 src/ejecta/ejecta_emplace.f90 | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ejecta/ejecta_emplace.f90 b/src/ejecta/ejecta_emplace.f90
index 53c59b60..4f9380b9 100644
--- a/src/ejecta/ejecta_emplace.f90
+++ b/src/ejecta/ejecta_emplace.f90
@@ -200,7 +200,7 @@ subroutine ejecta_emplace(user,surf,crater,domain,ejb,ejtble,deltaMtot)
    nfrays = 20
    n1f  = 1.0_DP
    n2f  = 0.5_DP
-   rayf = 7.5_DP
+   rayf = 5.0 !7.5_DP
 
    !write(*,*) mvrld, mvrldsc, n2