簡単
let remove x num = snd (List.partition (fun a -> a=x) num);;