let arreglo [1..100]
let sumaRara = [[x,y]| x<-arreglo,y<-arreglo, x+y == 7]

[[1,6],[2,5],[3,4],[4,3],[5,2],[6,1]]