Add primefactors.hs

Signed-off-by: Daniel Tomlinson <dan@tomlinson.io>
Remove data.list import
Use variable max