D[Sqrt[Sin[Sqrt[x]]],x]