MaxDistance←{ MD←{ ⌈/,|⍵∘.-⍺ } ⍝ Tests Assert←{⍺←'Assertion Failure' ⋄ 0∊⍵:⍺ ⎕SIGNAL 8 ⋄ shy←0} Assert 6≡4 5 7 MD 9 1 3 4: Assert 6≡2 3 5 4 MD 3 2 5 5 8 7: Assert 9≡2 1 11 3 MD 2 5 10 2: Assert 2≡1 2 3 MD 3 2 1: Assert 5≡1 0 2 3 MD 5 0: 'All tests passed.' }