else rqd

In #Fivenum you wrote (VBA/{{trans|Phix}})

   If l Mod 2 = 1 Then
       median = tbl(m)
   End If
   median = (tbl(m - 1) + tbl(m)) / 2

to match the Phix output I think that should be

   If l Mod 2 = 1 Then
       median = tbl(m)
   Else
       median = (tbl(m - 1) + tbl(m)) / 2
   End If