LIST_OF_SEQ_CONV : conv
# LIST_OF_SEQ_CONV `list_of_seq (f:num->A) 3`;; val it : thm = |- list_of_seq f 3 = [f 0; f 1; f 2] # LIST_OF_SEQ_CONV `list_of_seq (\n. f n > 0) 3`;; val it : thm = |- list_of_seq (\n. f n > 0) 3 = [f 0 > 0; f 1 > 0; f 2 > 0]