Update factorizar.hs

Aeroventilas