(* * std_lib.sml - Some generally useful functions *) (* Copyright 2003, Trustees of Indiana University * Please see the license in the file ../LICENSE *) fun iota n = if (n = 0) then [] else iota(n-1)@[n-1]