% 子供の世代における血液型の分布をシミュレーションする
% n:人数 f:父親（n人）の血液型 m:母親（n人）の血液型 p:結婚
% childf:次世代の父親（n人）の血液型
% childm:次世代の母親（n人）の血液型

function [childf,childm] = children(n,f,m,p)
    childf = [];
    childm = [];
    for k=1:n
        l = p(k);
        fblood = f(k);
        mblood = m(l);
        cf = born(fblood,mblood);
        cm = born(fblood,mblood);
        childf = [ childf, cf ];
        childm = [ childm, cm ];
    end
end
