オイラー数を算出するプログラム例です

eulernum.d

import std.stdio;
import std.string;
import std.conv;
import std.algorithm;
import std.array;

/// 任意のマスクにマッチする回数を数える
int filter(const(int[][]) data, const(int[][]) mask)
{
    int count = 0;
    foreach (y; 0..data.length) {
        foreach (x; 0..data[y].length) {
            // マスクに一致ていたらtrue
            bool mask_ac = true;
            
            maskloop: foreach (my; 0..mask.length) {
                foreach (mx; 0..mask[my].length) {
                  // 範囲チェック
                  if (y + my >= data.length || x + mx >= data[y].length) {
                    if (mask[my][mx] == 1) {
                      mask_ac = false;
                      break maskloop;
                    }
                    continue;
                  }
                  if (mask[my][mx] == 1 && data[y + my][x + mx] != 1) {
                    mask_ac = false;
                    break maskloop;
                  }
                }
            }
            if (mask_ac) { count++; }
        }
    }
    
    return count;
}

void main(string[] args)
{
    if (args.length <= 1) {
        stderr.writefln("Usage: %s <imgfile>", args[0]);
        return;
    }
    
    auto file = File(args[1], "r");
    scope(exit) file.close();
    
    int[][] data = [];
    foreach (line; file.byLine) {
        data ~= line.strip.split(",").to!(int[]);
    }
    
    auto v = data.filter([[1]]);
	auto e = data.filter([[1, 1]]) + data.filter([[1], [1]]);
	auto d = data.filter([[1, 0], [0, 1]]) + data.filter([[0, 1], [1, 0]]);
	auto t = data.filter([[1, 1], [1, 0]]) + data.filter([[1, 0], [1, 1]]) +
             data.filter([[0, 1], [1, 1]]) + data.filter([[1, 1], [0, 1]]);
    auto f = data.filter([[1, 1], [1, 1]]);
	writef("V-->%d\n",v);
	writef("E-->%d\n",e);
	writef("D-->%d\n",d);
	writef("T-->%d\n",t);
	writef("F-->%d\n",f);
	
	auto g4 = v-e+f;
	auto g8 = v-e-d+t-f;
	
	writef("４連結オイラー数G4-->%d\n",g4);
	writef("８連結オイラー数G8-->%d\n",g8);
    
}

sample_input1.csv

sample_input2.csv