Update test.hs

asd