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,r,b],[b,y,r]]