ค้นหาจำนวนของรูปสี่เหลี่ยมในอาร์เรย์ 2D ไบต์

0000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000
0000001111111111111100000000000000000011111111111111100000000000000000
0000001111111111111100000000000000000011111111111111100000000000000000
0000001111111111111100000000000000000011111111111111100000000000000000
0000001111111111111100000000000000000011111111111111100000000000000000
0000000000000000000000000000000000000011111111111111100000000000000000
0000000000000000000000000000000000000011111111111111100000000000000000
0000000000011111100000000000000000000011111111111111100000000000000000
0000000000011111100000000000000000000011111111111111100000000000000000
0000000000011111100000000000000000000011111111111111100000000000000000
0000000000000000000000000000000000000011111111111111100000000000000000
0000000000000000000000000000000000000011111111111111100000000000000000
0000000000000111111000000000000000000011111111111111100000000000000000
0000000000000100001000000111111000000011111111111111100000000010000000
0000000000000100001000000111111000000000000000000000011000000000000000
0000000000000111111000000111111000000000000000000000011000000000000000
0000000000000000000000000000111111000000000000000000000000000000000000
0000000000000000000000000000111111000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000000000

คุณจะได้รับอาร์เรย์ 2 มิติที่มีขนาดไบต์ mx n มีการรับประกันว่าไบต์ทั้งหมดเป็น 1 หรือ 0 ของ ค้นหาจำนวนของรูปสี่เหลี่ยมผืนผ้าที่แทนด้วย 1 เมื่อดูใน 2d ดังที่แสดงด้านบน

เฉพาะรูปสี่เหลี่ยมที่เติมเต็มเท่านั้นที่จะถูกพิจารณาเพื่อนับ
รูปสี่เหลี่ยมผืนผ้าจะต้องล้อมรอบด้วย 0 เว้นแต่ว่าพวกเขาอยู่บนขอบ

ตัวอย่างเช่นในอาร์เรย์ด้านบนมี 5 รูปสี่เหลี่ยมที่ถูกต้อง

คุณสามารถใช้ภาษาใดก็ได้

GolfScript, 107 ตัวอักษร

.n?):L;'1'/{,}%{1$+)}*;][]\{:A{{+}+[1L.~)-1]%&}+1$\,.@^\[[[A]]+{|}*]+}/{.{L%}{%$..&1$,1$,/*$=}:C~\{L/}C&},,

อินพุตต้องถูกกำหนดบน STDIN

ตัวอย่าง:

11
01
-
0

111
111
-
1

100
001
001
-
2

11100
10101
11100
-
1

101
010
101
-
5