sub getInput{
    my @keys = ("A", "B", "C");
    my @vals = split(/ /, <STDIN>);
    my %data = map{$keys[$_] => $vals[$_]}(0..$#keys);

    return \%data;
}

sub ans{
    my %arg = %{$_[0]};
    if ($arg{"A"} + $arg{"B"} >= $arg{"C"}){
        print "Yes\n";
    }else{
        print "No\n";
    }
}

&getInput;
&ans;