(Subscript[θ, 2])=(tan^(-1))(\[LeftBracketingBar](((Subscript[BR, (Subscript[t, q])])-(Subscript[BR, (Subscript[t, q-1])]))/((Subscript[t, q])-(Subscript[t, q-1])))\[RightBracketingBar])