Transportation problem: Difference between revisions
m
→{{header|REXX}}: another fix - good to have testers out there :-(
(→{{header|REXX}}: flagged as needing improvement, REXX program gets a syntax error.) |
Walterpachl (talk | contribs) m (→{{header|REXX}}: another fix - good to have testers out there :-() |
||
Line 3,910:
=={{header|REXX}}==
<lang rexx>/* REXX ***************************************************************
* Solve the Transportation Problem using Vogel's Approximation
Line 4,027 ⟶ 4,017:
Parse Arg r c
sh=min(source.r,demand.c)
source.r
demand.c
m.r.c=sh
If source.r=0 Then Do
| |||