example snobol program added