value = [() | x <- [(),(),(),()]]