a,_,b,_,c,d=$<.read.split.map &:to_i
p a+[b+e=[a,c].min,d].min-e