let i1, i2, j1, j2 be Element of NAT ; :: thesis: for G being Go-board st 1 <= i1 & i1 <= len G & 1 <= i2 & i2 <= len G & 1 <= j1 & j1 <= j2 & j2 <= width G holds
(G * i1,j1) `2 <= (G * i2,j2) `2
let G be Go-board; :: thesis: ( 1 <= i1 & i1 <= len G & 1 <= i2 & i2 <= len G & 1 <= j1 & j1 <= j2 & j2 <= width G implies (G * i1,j1) `2 <= (G * i2,j2) `2 )
assume that
A1: ( 1 <= i1 & i1 <= len G ) and
A2: ( 1 <= i2 & i2 <= len G ) and
A3: ( 1 <= j1 & j1 <= j2 ) and
A4: j2 <= width G ; :: thesis: (G * i1,j1) `2 <= (G * i2,j2) `2
A5: 1 <= j2 by A3, XXREAL_0:2;
then (G * i1,j2) `2 = (G * 1,j2) `2 by A1, A4, GOBOARD5:2
.= (G * i2,j2) `2 by A2, A4, A5, GOBOARD5:2 ;
hence (G * i1,j1) `2 <= (G * i2,j2) `2 by A1, A3, A4, SPRECT_3:24; :: thesis: verum