NetworkFlow

<< DiscreteMath`Combinatorica`

?NetworkFlow

g  =  Cycle[5]

NetworkFlow[g,  1,  3]

The following function call hung and had to be aborted.

NetworkFlow[g,  1,  1]