It's a program that you give 3 numbers and it needs to order them crescently, I also created the function three that multiplies numbers by 3. That's what I tried to do:
ordertriple :: (Integer, Integer, Integer) -> (Integer, Integer, Integer)
ordertriple (x, y, z)
| x < y && x < z && y < z = (three x, three y, three z)
| x < y && x < z && z < y = (three x, three z, three y)
| y < x && y < z && x < z = (three y, three x, three z)
| y < x && y < z && z < x = (three y, three z, three x)
| z < x && z < y && y < x = (three z, three x, three y)
| otherwise = (three z, three y, three x)