Transportation problem: Difference between revisions
m
→{{header|REXX}}: slight improvement for default case in sourcelines
Walterpachl (talk | contribs) m (→{{header|REXX}}: another fix - good to have testers out there :-() |
Walterpachl (talk | contribs) m (→{{header|REXX}}: slight improvement for default case in sourcelines) |
||
Line 4,040:
init:
If lines(fid)=0 Then Do
Say 'Input file not specified or not found. Using default input instead.'
in.1=sourceline(4)
Do i=1 To 5▼
Parse Var in.1 numSources .
in.i=sourceline(i+3)
End
|