let n be Element of NAT ; :: thesis: ( n <= 4 implies n is State of SuccTuring )
assume A1: n <= 4 ; :: thesis: n is State of SuccTuring
the States of SuccTuring = SegM 4 by Def18;
hence n is State of SuccTuring by A1, Th1; :: thesis: verum