function [map] = blocked_map(n,Station)
for r = 1:n:size(Station.terrain,1)
    for c = 1:n:size(Station.terrain,2)
        map(r,c) = blocked_path(c,r,Station);
    end
end