Abbreviations, automatic: Difference between revisions

m
Line 1,034:
Open in("dias_de_la_semana.txt")( fd )
If ( Not( File error ) )
[1:end]
Loop if (Not (Eof(fd)) )
Using( MAX_LINE ), Split( Readlin(fd) » (days), days of week, " ")
Line 1,043 ⟶ 1,041:
i=1
Loop
Let( temp := Mid( i, 1, Get( days of week )))
aSort(temp)
 
543

edits