EquationSymbolicSolveRequest[List[Equal[DefiniteIntegral[1,x,γ,d],Deriv[λ,x]]],List[x]]-8EquationSymbolicSolveRequest[List[Equal[DefiniteIntegral[1,x,γ,d],Deriv[λ,x]]],List[d]]Solution[{d,ExpressionSetPoint[γ,False,ReservedReal]}]EquationSymbolicSolveRequest[List[Equal[DefiniteIntegral[1,x,γ,d],Deriv[λ,x]]],List[x]]-8EquationSymbolicSolveRequest[List[Equal[γ,λ]],List[λ]]Solution[{λ,ExpressionSetPoint[γ,False,ReservedComplex]}]EquationSymbolicSolveRequest[List[Equal[γ,λ]],List[γ]]Solution[{γ,ExpressionSetPoint[λ,False,ReservedComplex]}]WorksheetAssign[γ,λ]λAssign[γ,λ]