RosettaCodeData/Task/Metaprogramming/Standard-ML/metaprogramming-1.ml

fun to (a, b) = List.tabulate (b-a,fn i => a+i ) ;
infix 5 to ;