diff --git a/modules/urqmd/urqmdInterface.F b/modules/urqmd/urqmdInterface.F index ec2bd092a8386393368a6789df73b3efa3253160..446221dfc2b2f311b11a4c0080e42ba02fab7296 100644 --- a/modules/urqmd/urqmdInterface.F +++ b/modules/urqmd/urqmdInterface.F @@ -432,16 +432,3 @@ c~ xsegymin=0.25d0 end -c -c M. Reininghaus, 2020-04-08 -c - integer function ReadSigmaLn(ia, ib, ic) - implicit none - - include 'comres.f' - - integer :: ia, ib, ic - - ReadSigmaLn = SigmaLn(ia, ib, ic) - - end function ReadSigmaLn