main = do m:n:k:_ <- fmap (map read . words) getLine matr <- fmap (map (map (read . return)) . lines) getContents print $ sum [1 | n' <- [1..n], n'' <- [0..n - n'], m' <- [1..m], m'' <- [0..m - m'], let f = (. drop) . (.) . take, sum (f n' n'' matr >>= f m' m'') == k]