consider X being non empty set such that
A1: the Instructions of S c= [:NAT,(NAT *),(X *):] by Def17;
x in the Instructions of S ;
then x `1_3 in NAT by A1, RECDEF_2:2;
hence InsCode x is natural ; :: thesis: verum