defpred S1[ Element of NAT ] means for G being finite _Graph st G .size() = $1 holds
P1[G];
A3: for k being Element of NAT st S1[k] holds
S1[k + 1] by A2;
let G be finite _Graph; :: thesis: P1[G]
A4: G .size() = G .size() ;
A5: S1[ 0 ] by A1;
for k being Element of NAT holds S1[k] from NAT_1:sch 1(A5, A3);
hence P1[G] by A4; :: thesis: verum