((Subscript[R, EQ])=((Subscript[R, throw])/2))