EquationSymbolicSolveRequest[List[Equal[Cos[T],Divide[E,Sin[k]]]],List[k]]Solution[{k,ExpressionSetPoint[ExpressionWithCondition[Sum[ASin[Divide[E,Cos[T]]],Product[2,PI,&N_3]],And[LessOrEqual[Product[E,Sec[T]],1],GreaterOrEqual[Product[E,Sec[T]],-1],NotEqual[E,0]]],False,ReservedReal]}]Solution[{k,ExpressionSetPoint[ExpressionWithCondition[Sum[Negative[ASin[Divide[E,Cos[T]]]],Product[2,PI,&N_4],PI],And[LessOrEqual[Product[E,Sec[T]],1],GreaterOrEqual[Product[E,Sec[T]],-1],NotEqual[E,0]]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Cos[T],Divide[E,Sin[k]]]],List[T]]Solution[{T,ExpressionSetPoint[ExpressionWithCondition[Sum[ACos[Divide[E,Sin[k]]],Product[2,PI,&N_1]],And[NotEqual[k,Product[PI,&N_3]],NotEqual[k,Product[PI,&N_4]]]],False,ReservedReal]}]Solution[{T,ExpressionSetPoint[ExpressionWithCondition[Sum[Negative[ACos[Divide[E,Sin[k]]]],Product[2,PI,&N_2]],And[NotEqual[k,Product[PI,&N_3]],NotEqual[k,Product[PI,&N_4]]]],False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[Cos[T],Divide[E,Sin[k]]]],List[E]]Solution[{E,ExpressionSetPoint[ExpressionWithCondition[Product[Sin[k],Cos[T]],And[NotEqual[k,Product[PI,&N_7]],NotEqual[k,Product[PI,&N_8]]]],False,ReservedReal]}]