scheme :: HILBERT2:sch 2
HPInd{ P1[ set ] } :
provided
A1: P1[ VERUM ] and
A2: for n being Element of NAT holds P1[ prop n] and
A3: for r, s being Element of HP-WFF st P1[r] & P1[s] holds
( P1[r '&' s] & P1[r => s] )