（s，：）；Mi
Cost2sum（sumf＊a）ifMaxFlow2〈VMaxFlowMaxFlow2；Mi
CostMi
Cost2LRFLOYDwstelseff1prop（ff1）；MaxFlowV；Mi
CostMi
Cost1propMi
Cost2Mi
Cost1retur
e
d
fifL（e
d）〈BVRE1如果路径长度小于大数说明路径存在
elseRE0
e
de
dfu
ctio
［L，RFLOYD（wst
sizew，1）；Dwpathzeros（
，
）；％以下是标准floyd算法fori1
forj1
ifDiji
fpath（i，j）j；e
d
e
de
dfork1：
fori1：
forj1：
ifD（i，kDkjDi，jD（i，j）D（i，kD（k，jpath（i，j）pathi，k）e
de
d
e
de
dLzeros（0，0Rs；while1
ifstLfliplr（L）；L0，L；retur
e
dLL，Dst］R［R，paths，t；spaths，t）；e
d
fr