m:-get0(C),C>0,(C=10;put(C)),m.