diff --git a/sammy/src/ang/mang2.f b/sammy/src/ang/mang2.f index 31bde7b59d0795dea1dfd9f078a62c5b310f2a4d..a220e490dc6ff0bf00a55c7848600ee7972f83a3 100644 --- a/sammy/src/ang/mang2.f +++ b/sammy/src/ang/mang2.f @@ -82,7 +82,7 @@ C C C *** purpose -- broaden total cross section linearly in Energy from C *** Theta-Dtheta to Theta+Dtheta. This is not really correct, but -C *** corresponds to what FGP did in RFUNC. +C *** corresponds to what FGP (Francis Perey?) did in RFUNC. C N = Jjdat call grid%initialize()