% 子供の血液型を選ぶ
% f:父親の血液型（文字列） m:母親の血液型（文字列）
% c:子供の血液型（文字列）

function c = born(f,m)
    if (rand <= 0.5)
        fs = extractBetween(f,1,1);
    else
        fs = extractBetween(f,2,2);
    end
    if (rand <= 0.5)
        ms = extractBetween(m,1,1);
    else
        ms = extractBetween(m,2,2);
    end
    c = fs+ms; % 文字列の結合
end
