((1/f)=(n-1)((1/(Subscript[R, 1]))-(1/(Subscript[R, 2]))),
or
f=(1/((n-1)))((((Subscript[R, 1])(Subscript[R, 2]))/((Subscript[R, 2])-(Subscript[R, 1]))))=((Subscript[R, eff])/((n-1))),(5a)(1/f)=(n-1)((1/R)),
or
f=(R/((n-1)))=((Subscript[R, eff])/((n-1))),(5b)(Subscript[R, eff])={((((Subscript[R, 1])(Subscript[R, 2]))/((Subscript[R, 2])-(Subscript[R, 1]))),for   a   lens   with   two   curved   sidesR,for   a   lens   with   one   curved   side)(5c))