read SiPerUGJ:
#Umbral Scheme for walks in the 2D square-lattice
#(with unit steps), that avoid retracting and
#rectangular subwalks
lu:=SawUm4(x,t):
lu:=YafeUmSc(lu,F,D):
print(lu):
Tony4(30);
quit: