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