main = do
	[l1, l2, l3, r, b, y] <- getContents >>= return . concat . map (map read . words) . lines
	print $ minimum $ map (sum . zipWith (*) [2*(l1+l2),2*(l2+l3),2*(l3+l1)]) [[r,b,y],[y,b,r],[r,y,b]]