#elements of a projective space
ps := ProjectiveSpace(6,7);
ElementsOfIncidenceStructure(ps,1);
ElementsOfIncidenceStructure(ps,2);
ElementsOfIncidenceStructure(ps,3);
ElementsOfIncidenceStructure(ps,4);
ElementsOfIncidenceStructure(ps,5);
ElementsOfIncidenceStructure(ps,6);
ElementsOfIncidenceStructure(ps,7);
quit;
quit;
