このディレクトリの索引

度数(_副目標,_度数) :-
        findall(1,_副目標,L),
        length(L,_度数).