Integrate[Exp[Exp[x]/2 Log[Sin[x]^2]], x]