#!/usr/bin/perl
# paiza POH! vol.2
# result:
# http://p...content-available-to-author-only...a.jp/poh/paizen/result/65cb7f2104cbaa627523285727875758
# author: Leonardone @ NEETSDKASU
@hw = split(' ', <STDIN>);
@sp;
@tb;
for $y (0 .. $h - 1) {
@line = split('', <STDIN>); for $x (0 .. $w - 1) {
if ($line[$x] == '0') {
$sp[$x]++;
$s = $sp[$x];
$t = 1;
for ($i = $x; $i >= 0 && $sp[$i] > 0; $i--) {
if ($sp[$i] < $s) {
$s = $sp[$i];
}
$tb[$s][$t]++;
$t++;
}
} else {
$sp[$x] = 0;
}
}
}
for $x (1 .. $w) {
$tb[$h][$x] += 0;
for ($y = $h - 1; $y > 0; $y--) {
$tb[$y][$x] += $tb[$y + 1][$x];
}
}
for (1 .. $n) {
@st = split(' ', <STDIN>); if ($s <= $h && $t <= $w) {
} else {
}
}
IyEvdXNyL2Jpbi9wZXJsCiMgcGFpemEgUE9IISB2b2wuMgojIHJlc3VsdDoKIyBodHRwOi8vcC4uLmNvbnRlbnQtYXZhaWxhYmxlLXRvLWF1dGhvci1vbmx5Li4uYS5qcC9wb2gvcGFpemVuL3Jlc3VsdC82NWNiN2YyMTA0Y2JhYTYyNzUyMzI4NTcyNzg3NTc1OAojIGF1dGhvcjogTGVvbmFyZG9uZSBAIE5FRVRTREtBU1UKCkBodyA9IHNwbGl0KCcgJywgPFNURElOPik7CiRoID0gaW50KCRod1swXSk7CiR3ID0gaW50KCRod1sxXSk7CgpAc3A7CkB0YjsKZm9yICR5ICgwIC4uICRoIC0gMSkgewoJQGxpbmUgPSBzcGxpdCgnJywgPFNURElOPik7Cglmb3IgJHggKDAgLi4gJHcgLSAxKSB7CgkJaWYgKCRsaW5lWyR4XSA9PSAnMCcpIHsKCQkJJHNwWyR4XSsrOwoJCQkkcyA9ICRzcFskeF07CgkJCSR0ID0gMTsKCQkJZm9yICgkaSA9ICR4OyAkaSA+PSAwICYmICRzcFskaV0gPiAwOyAkaS0tKSB7CgkJCQlpZiAoJHNwWyRpXSA8ICRzKSB7CgkJCQkJJHMgPSAkc3BbJGldOwoJCQkJfQoJCQkJJHRiWyRzXVskdF0rKzsKCQkJCSR0Kys7CgkJCX0KCQl9IGVsc2UgewoJCQkkc3BbJHhdID0gMDsKCQl9Cgl9Cn0KCmZvciAkeCAoMSAuLiAkdykgewoJJHRiWyRoXVskeF0gKz0gMDsKCWZvciAoJHkgPSAkaCAtIDE7ICR5ID4gMDsgJHktLSkgIHsKCQkkdGJbJHldWyR4XSArPSAkdGJbJHkgKyAxXVskeF07Cgl9Cn0KCiRuID0gaW50KDxTVERJTj4pOwpmb3IgKDEgLi4gJG4pIHsKCUBzdCA9IHNwbGl0KCcgJywgPFNURElOPik7CgkkcyA9IGludCgkc3RbMF0pOwoJJHQgPSBpbnQoJHN0WzFdKTsKCWlmICgkcyA8PSAkaCAmJiAkdCA8PSAkdykgewoJCXByaW50ICR0Ylskc11bJHRdLCAiXG4iOwoJfSBlbHNlIHsKCQlwcmludCAiMFxuIjsKCX0KfQ==