(Subscript[R, s])=((((Subscript[η, 1])cos(Subscript[θ, 1])-(Subscript[η, 2])cos(Subscript[θ, 2]))/((Subscript[η, 1])cos(Subscript[θ, 1])+(Subscript[η, 2])cos(Subscript[θ, 2]))))   for   S-polarized   light(Subscript[R, p])=((((Subscript[η, 1])cos(Subscript[θ, 2])-(Subscript[η, 2])cos(Subscript[θ, 1]))/((Subscript[η, 1])cos(Subscript[θ, 2])+(Subscript[η, 2])cos(Subscript[θ, 1]))))   for   P-polarized   light(Subscript[R, totol])=((((Subscript[R, S])+(Subscript[R, P]))/2))   for   unpolarized   light.