source("http://macosa.dima.unige.it/r.R")
HF=3.5; BF=3.5
Planeww(-1,22, -1,32)
for(C in 1:30) for(R in 1:20) if((R+C)/10==floor(R+C)/10) text(R,C,"#")