Limit[Cot[5 x] Sin[4 x], x -> 0]