sin (Subscript[θ, r])=sin(90°-(Subscript[θ, c]))=cos (Subscript[θ, c])where(Subscript[θ, c])=(sin^(-1))((Subscript[n, clad])/(Subscript[n, core]))