a:-get0(X),(X=10;put(X),a).
m:-put(34),a,put(34).