From 67cda4c7364c220975929f866314e5aafd684912 Mon Sep 17 00:00:00 2001 From: Paul Romano Date: Mon, 23 Jul 2012 17:49:02 -0400 Subject: [PATCH] Fixed typo in physics module. --- src/physics.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/physics.F90 b/src/physics.F90 index 1b6bbeff19..efcb692988 100644 --- a/src/physics.F90 +++ b/src/physics.F90 @@ -647,7 +647,7 @@ contains k = binary_search(sab % elastic_P(1:i+1), i+1, prob) end if - ! Characteristic scattering cosine for this Bragg egg + ! Characteristic scattering cosine for this Bragg edge mu = ONE - 2.0*sab % elastic_e_in(k) / p % E end if