Define opdracht 7, move some code from Tests.hs to Assigment.hs