AH
for line in File.ReadAllLines argv.[0]
replacer line |> ignore
Size: a a a
AH
VS
Lr
VS
AH
Lr
AH
AH
AH
AH
DB
DB
let findIndexOfMinLength (strings: string array) =
assert (strings <> null && strings.Length > 0)
let mutable minIndex = 0
for i=0 to strings.Length-1 do
if strings.[i].Length < strings.[minIndex].Length then
minIndex <- i
minIndex
AH
AH
AH
AH
AH
I