我有一个数据如:
3 11 12
15 13 14 15
我是通过以下方式从文件中读到的:
let print data =
List.iter (fun l -> printf "%s@." (String.concat " " l)) data
let read filename =
let ch = open_in filename in
let data = Lexer.lex [] (Lexing.from_channel ch) in
close_in ch;
print data
Out put is
3 11 12
15 13 14 15
- >它是列表中的列表
我的问题是,当我想修改列表中的列表时,它不起作用。例如:
let remove = function
h :: t -> t
;;
let print data =
List.iter (fun l -> remove l; printf "%s@." (String.concat " " l)) data
请帮我修理一下。 非常感谢你
答案 0 :(得分:0)
移动删除电话:
let print data =
List.iter (fun l -> printf "%s@." (String.concat " " (remove l))) data