Limit[(2 Sinh[2x]-4x)/(x-Sin[x]),x->0]