c=lent(I[0]
M=[x*y*lj for x in range (c) for in range (r) if I[r-y-l][x]<1
print(r)
print(c)