Update num15.hs

Fixed bug