function redarms (m1, m2, n, armwidth, trunkColor)

    theta = 130;
    eta = 80;
    A1 = [cosd(eta) -cosd(theta); sind(eta) -sind(theta)];
    A2 = [-sind(theta) cosd(theta); -sind(theta) cosd(theta)];
    newm = (m2-m1) /2;
    rotation1 = A1 * newm;
    rotation2 = A2 * newm;

    mm1 = m1 + (rotation1*.9);
    mm2 = m1 + (rotation2*.9)/2;
   
    armColor = [1, .4, .6];

    if n >= 0
       
        % left branch
        line([m1(1) mm1(1)],[m1(2) mm1(2)], 'Linewidth', 2, 'Color', [1, 0, .2]); 
        hold on
        % right branch
        line([m1(1) mm2(1)],[m1(2) mm2(2)], 'Linewidth', 4, 'Color', [1, 0, .2]);
        hold on
        %add branches!!
        if mod(n,2) == 1;
            redarms(mm1,mm2, n-1, armwidth, armColor);
            redarms(mm2,mm1, n-1, armwidth, armColor);
        elseif mod(n,2) == 0;
            pinkarms(mm1,mm2, n-1, armwidth, armColor);
            pinkarms(mm2,mm1, n-1, armwidth, armColor);
        end
    end
end