--Ideal of Flag4
R=QQ[p_{0},p_{1},p_{2},p_{3},p_{0,1},p_{0,2},p_{0,3},p_{1,2},p_{1,3},p_{2,3},p_{0,1,2},p_{0,1,3},p_{0,2,3},p_{1,2,3}];
Iflag4=ideal(p_{2, 3}*p_{0, 1, 3}-p_{1, 3}*p_{0, 2, 3}+p_{0, 3}*p_{1, 2,
       3},p_{2, 3}*p_{0, 1, 2}-p_{1, 2}*p_{0, 2, 3}+p_{0, 2}*p_{1, 2, 3},p_{1,
       3}*p_{0, 1, 2}-p_{1, 2}*p_{0, 1, 3}+p_{0, 1}*p_{1, 2, 3},p_{0, 3}*p_{0,
       1, 2}-p_{0, 2}*p_{0, 1, 3}+p_{0, 1}*p_{0, 2, 3},p_{3}*p_{0, 1,
       2}-p_{2}*p_{0, 1, 3}+p_{1}*p_{0, 2, 3}-p_{0}*p_{1, 2, 3},p_{0, 3}*p_{1,
       2}-p_{0, 2}*p_{1, 3}+p_{0, 1}*p_{2, 3},p_{3}*p_{1, 2}-p_{2}*p_{1,
       3}+p_{1}*p_{2, 3},p_{3}*p_{0, 2}-p_{2}*p_{0, 3}+p_{0}*p_{2,
       3},p_{3}*p_{0, 1}-p_{1}*p_{0, 3}+p_{0}*p_{1, 3},p_{2}*p_{0,
       1}-p_{1}*p_{0, 2}+p_{0}*p_{1, 2});



--Ideal of Flag_5
QQ[p_0, p_1, p_2, p_3, p_4,
       p_{0, 1}, p_{0, 2}, p_{1, 2}, p_{0, 3}, p_{1, 3}, p_{2, 3}, p_{0, 4},
       p_{1, 4}, p_{2, 4}, p_{3, 4}, p_{0, 1, 2}, p_{0, 1, 3}, p_{0, 2, 3},
       p_{1, 2, 3}, p_{0, 1, 4}, p_{0, 2, 4}, p_{1, 2, 4}, p_{0, 3, 4}, p_{1, 3,
       4}, p_{2, 3, 4}, p_{0, 1, 2, 3}, p_{0, 1, 2, 4}, p_{0, 1, 3, 4}, p_{0, 2,
       3, 4}, p_{1, 2, 3, 4}];

Iflag5=ideal(p_{2, 3, 4}*p_{0, 1, 3, 4}-p_{1, 3, 4}*p_{0, 2, 3, 4}+p_{0, 3, 4}*p_{1, 2, 3, 4},p_{2, 3,
      4}*p_{0, 1, 2, 4}-p_{1, 2, 4}*p_{0, 2, 3, 4}+p_{0, 2, 4}*p_{1, 2, 3, 4},p_{1, 3, 4}*p_{0, 1, 2,
      4}-p_{1, 2, 4}*p_{0, 1, 3, 4}+p_{0, 1, 4}*p_{1, 2, 3, 4},p_{0, 3, 4}*p_{0, 1, 2, 4}-p_{0, 2, 4}*p_{0,
      1, 3, 4}+p_{0, 1, 4}*p_{0, 2, 3, 4},p_{3, 4}*p_{0, 1, 2, 4}-p_{2, 4}*p_{0, 1, 3, 4}+p_{1, 4}*p_{0, 2,
      3, 4}-p_{0, 4}*p_{1, 2, 3, 4},p_{2, 3, 4}*p_{0, 1, 2, 3}-p_{1, 2, 3}*p_{0, 2, 3, 4}+p_{0, 2, 3}*p_{1,
      2, 3, 4},p_{1, 3, 4}*p_{0, 1, 2, 3}-p_{1, 2, 3}*p_{0, 1, 3, 4}+p_{0, 1, 3}*p_{1, 2, 3, 4},p_{0, 3,
      4}*p_{0, 1, 2, 3}-p_{0, 2, 3}*p_{0, 1, 3, 4}+p_{0, 1, 3}*p_{0, 2, 3, 4},p_{1, 2, 4}*p_{0, 1, 2,
      3}-p_{1, 2, 3}*p_{0, 1, 2, 4}+p_{0, 1, 2}*p_{1, 2, 3, 4},p_{0, 2, 4}*p_{0, 1, 2, 3}-p_{0, 2, 3}*p_{0,
      1, 2, 4}+p_{0, 1, 2}*p_{0, 2, 3, 4},p_{0, 1, 4}*p_{0, 1, 2, 3}-p_{0, 1, 3}*p_{0, 1, 2, 4}+p_{0, 1,
      2}*p_{0, 1, 3, 4},p_{3, 4}*p_{0, 1, 2, 3}-p_{2, 3}*p_{0, 1, 3, 4}+p_{1, 3}*p_{0, 2, 3, 4}-p_{0,
      3}*p_{1, 2, 3, 4},p_{2, 4}*p_{0, 1, 2, 3}-p_{2, 3}*p_{0, 1, 2, 4}+p_{1, 2}*p_{0, 2, 3, 4}-p_{0,
      2}*p_{1, 2, 3, 4},p_{1, 4}*p_{0, 1, 2, 3}-p_{1, 3}*p_{0, 1, 2, 4}+p_{1, 2}*p_{0, 1, 3, 4}-p_{0,
      1}*p_{1, 2, 3, 4},p_{0, 4}*p_{0, 1, 2, 3}-p_{0, 3}*p_{0, 1, 2, 4}+p_{0, 2}*p_{0, 1, 3, 4}-p_{0,
      1}*p_{0, 2, 3, 4},p_4*p_{0, 1, 2, 3}-p_3*p_{0, 1, 2, 4}+p_2*p_{0, 1, 3, 4}-p_1*p_{0, 2, 3, 4}+p_0*p_{1,
      2, 3, 4},p_{1, 2, 4}*p_{0, 3, 4}-p_{0, 2, 4}*p_{1, 3, 4}+p_{0, 1, 4}*p_{2, 3, 4},p_{1, 2, 3}*p_{0, 3,
      4}-p_{0, 2, 3}*p_{1, 3, 4}+p_{0, 1, 3}*p_{2, 3, 4},p_{3, 4}*p_{1, 2, 4}-p_{2, 4}*p_{1, 3, 4}+p_{1,
      4}*p_{2, 3, 4},p_{1, 2, 3}*p_{0, 2, 4}-p_{0, 2, 3}*p_{1, 2, 4}+p_{0, 1, 2}*p_{2, 3, 4},p_{3, 4}*p_{0,
      2, 4}-p_{2, 4}*p_{0, 3, 4}+p_{0, 4}*p_{2, 3, 4},p_{1, 2, 3}*p_{0, 1, 4}-p_{0, 1, 3}*p_{1, 2, 4}+p_{0,
      1, 2}*p_{1, 3, 4},p_{0, 2, 3}*p_{0, 1, 4}-p_{0, 1, 3}*p_{0, 2, 4}+p_{0, 1, 2}*p_{0, 3, 4},p_{3,
      4}*p_{0, 1, 4}-p_{1, 4}*p_{0, 3, 4}+p_{0, 4}*p_{1, 3, 4},p_{2, 4}*p_{0, 1, 4}-p_{1, 4}*p_{0, 2,
      4}+p_{0, 4}*p_{1, 2, 4},p_{2, 3}*p_{0, 1, 4}-p_{1, 3}*p_{0, 2, 4}+p_{0, 3}*p_{1, 2, 4}+p_{1, 2}*p_{0,
      3, 4}-p_{0, 2}*p_{1, 3, 4}+p_{0, 1}*p_{2, 3, 4},p_{3, 4}*p_{1, 2, 3}-p_{2, 3}*p_{1, 3, 4}+p_{1,
      3}*p_{2, 3, 4},p_{2, 4}*p_{1, 2, 3}-p_{2, 3}*p_{1, 2, 4}+p_{1, 2}*p_{2, 3, 4},p_{1, 4}*p_{1, 2,
      3}-p_{1, 3}*p_{1, 2, 4}+p_{1, 2}*p_{1, 3, 4},p_{0, 4}*p_{1, 2, 3}-p_{0, 3}*p_{1, 2, 4}+p_{0, 2}*p_{1,
      3, 4}-p_{0, 1}*p_{2, 3, 4},p_4*p_{1, 2, 3}-p_3*p_{1, 2, 4}+p_2*p_{1, 3, 4}-p_1*p_{2, 3, 4},p_{3,
      4}*p_{0, 2, 3}-p_{2, 3}*p_{0, 3, 4}+p_{0, 3}*p_{2, 3, 4},p_{2, 4}*p_{0, 2, 3}-p_{2, 3}*p_{0, 2,
      4}+p_{0, 2}*p_{2, 3, 4},p_{1, 4}*p_{0, 2, 3}-p_{1, 3}*p_{0, 2, 4}+p_{1, 2}*p_{0, 3, 4}+p_{0, 1}*p_{2,
      3, 4},p_{0, 4}*p_{0, 2, 3}-p_{0, 3}*p_{0, 2, 4}+p_{0, 2}*p_{0, 3, 4},p_4*p_{0, 2, 3}-p_3*p_{0, 2,
      4}+p_2*p_{0, 3, 4}-p_0*p_{2, 3, 4},p_{3, 4}*p_{0, 1, 3}-p_{1, 3}*p_{0, 3, 4}+p_{0, 3}*p_{1, 3, 4},p_{2,
      4}*p_{0, 1, 3}-p_{1, 3}*p_{0, 2, 4}+p_{0, 3}*p_{1, 2, 4}+p_{0, 1}*p_{2, 3, 4},p_{1, 4}*p_{0, 1,
      3}-p_{1, 3}*p_{0, 1, 4}+p_{0, 1}*p_{1, 3, 4},p_{0, 4}*p_{0, 1, 3}-p_{0, 3}*p_{0, 1, 4}+p_{0, 1}*p_{0,
      3, 4},p_{2, 3}*p_{0, 1, 3}-p_{1, 3}*p_{0, 2, 3}+p_{0, 3}*p_{1, 2, 3},p_4*p_{0, 1, 3}-p_3*p_{0, 1,
      4}+p_1*p_{0, 3, 4}-p_0*p_{1, 3, 4},p_{3, 4}*p_{0, 1, 2}-p_{1, 2}*p_{0, 3, 4}+p_{0, 2}*p_{1, 3, 4}-p_{0,
      1}*p_{2, 3, 4},p_{2, 4}*p_{0, 1, 2}-p_{1, 2}*p_{0, 2, 4}+p_{0, 2}*p_{1, 2, 4},p_{1, 4}*p_{0, 1,
      2}-p_{1, 2}*p_{0, 1, 4}+p_{0, 1}*p_{1, 2, 4},p_{0, 4}*p_{0, 1, 2}-p_{0, 2}*p_{0, 1, 4}+p_{0, 1}*p_{0,
      2, 4},p_{2, 3}*p_{0, 1, 2}-p_{1, 2}*p_{0, 2, 3}+p_{0, 2}*p_{1, 2, 3},p_{1, 3}*p_{0, 1, 2}-p_{1,
      2}*p_{0, 1, 3}+p_{0, 1}*p_{1, 2, 3},p_{0, 3}*p_{0, 1, 2}-p_{0, 2}*p_{0, 1, 3}+p_{0, 1}*p_{0, 2,
      3},p_4*p_{0, 1, 2}-p_2*p_{0, 1, 4}+p_1*p_{0, 2, 4}-p_0*p_{1, 2, 4},p_3*p_{0, 1, 2}-p_2*p_{0, 1,
      3}+p_1*p_{0, 2, 3}-p_0*p_{1, 2, 3},p_{2, 3}*p_{1, 4}-p_{1, 3}*p_{2, 4}+p_{1, 2}*p_{3, 4},p_{2, 3}*p_{0,
      4}-p_{0, 3}*p_{2, 4}+p_{0, 2}*p_{3, 4},p_{1, 3}*p_{0, 4}-p_{0, 3}*p_{1, 4}+p_{0, 1}*p_{3, 4},p_{1,
      2}*p_{0, 4}-p_{0, 2}*p_{1, 4}+p_{0, 1}*p_{2, 4},p_4*p_{2, 3}-p_3*p_{2, 4}+p_2*p_{3, 4},p_4*p_{1,
      3}-p_3*p_{1, 4}+p_1*p_{3, 4},p_{1, 2}*p_{0, 3}-p_{0, 2}*p_{1, 3}+p_{0, 1}*p_{2, 3},p_4*p_{0,
      3}-p_3*p_{0, 4}+p_0*p_{3, 4},p_4*p_{1, 2}-p_2*p_{1, 4}+p_1*p_{2, 4},p_3*p_{1, 2}-p_2*p_{1, 3}+p_1*p_{2,
      3},p_4*p_{0, 2}-p_2*p_{0, 4}+p_0*p_{2, 4},p_3*p_{0, 2}-p_2*p_{0, 3}+p_0*p_{2, 3},p_4*p_{0, 1}-p_1*p_{0,
      4}+p_0*p_{1, 4},p_3*p_{0, 1}-p_1*p_{0, 3}+p_0*p_{1, 3},p_2*p_{0, 1}-p_1*p_{0, 2}+p_0*p_{1, 2});