From ada06b7c728f40ead9d62fcecb8f96af57d0763c Mon Sep 17 00:00:00 2001 From: Austin Blevins Date: Mon, 13 Nov 2023 16:49:11 -0500 Subject: [PATCH] changed the number of rays to better match observations --- 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 105c3ab4..ca748f8c 100644 --- a/src/ejecta/ejecta_emplace.f90 +++ b/src/ejecta/ejecta_emplace.f90 @@ -131,7 +131,7 @@ subroutine ejecta_emplace(user,surf,crater,domain,ejb,ejtble,deltaMtot,cumulativ ! Crater ray parameters real(DP) :: rray != 48_DP ! "L16" in Minton et al. (2019) - integer(I4B) :: Nraymax = 12 + integer(I4B) :: Nraymax = 5 real(DP) :: fpeak = 8000_DP ! narrow ray: rw0 propto 1/4 real(DP) :: rayp = 2.0_DP integer(I4B) :: rayq = 4