Update BeamForces.f90

fix typo