theorem Th40:
for
i,
j being
Nat for
G being
Go-board st 1
<= i &
i < len G & 1
<= j &
j < width G holds
LSeg (
((1 / 2) * ((G * (i,j)) + (G * ((i + 1),(j + 1))))),
((1 / 2) * ((G * (i,j)) + (G * (i,(j + 1))))))
c= (Int (cell (G,i,j))) \/ {((1 / 2) * ((G * (i,j)) + (G * (i,(j + 1)))))}