(let ((p2 ((fileVal "finiteField") 2))) ((p2 'gip) 5)) ( #6(1 0 1 1 1 1) #6(1 1 0 1 1 1) #6(1 1 1 0 1 1) #6(1 1 1 1 0 1) #6(1 0 0 1 0 1) #6(1 0 1 0 0 1))