Maxima (|cos(t) - 1| до 1-cos(t))

Как заставить Maxima упростить |cos(t) - 1| до 1-cos(t) и подобные. Напр. |cos(x^2) - 1| до 1-cos(x^2) и т. д. и т. п.

assume(cos(t)<=1,cos(t)>=-1) не считаю удобным из-за отсутсвия универсальности так как |cos(x^2) - 1| => 1-cos(x^2) уже не работает, что есть вполне логично.