Skip to content

Commit

Permalink
changed the number of rays to better match observations
Browse files Browse the repository at this point in the history
  • Loading branch information
Austin Blevins committed Nov 13, 2023
1 parent 550f347 commit ada06b7
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/ejecta/ejecta_emplace.f90
Original file line number Diff line number Diff line change
Expand Up @@ -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
Expand Down

0 comments on commit ada06b7

Please sign in to comment.