F#如何实现移除列表中指定元素的第一个匹配项

你的递归实现核心问题出在最后一个匹配分支的传参错误：

• 递归调用时传入了原始完整列表l，而非需要继续遍历的尾列表t，导致递归无法向后推进
• 递归调用时第二个参数传了当前节点值h，而非始终需要移除的目标值x，递归过程中丢失了要删除的目标
  这两个问题叠加后，代码只能判断列表首元素是否匹配目标值，根本无法完成后续遍历。

let rec remove l x =
    match l with
    | [] -> []
    | h::t when h = x -> t
    | h::t -> h :: remove t x

修正后的代码完全匹配「仅移除第一个匹配元素」的需求，执行逻辑如下：

• 空列表场景直接返回空列表，不存在可移除的元素
• 遍历到当前头元素等于目标删除值时，直接返回剩余尾列表：此时第一个匹配项已经被移除，后续元素不会再执行删除判断，自然保留后续所有重复元素
• 当前头元素不匹配目标值时，将当前头元素拼接在「尾列表执行移除操作的返回结果」头部，递归传入尾列表t和固定的目标删除值x，继续向后查找第一个匹配项

• 执行remove [1; 6; 1] 1，返回结果[6; 1]，符合预期
• 执行remove [6; 7; 6] 7，返回结果[6; 6]，符合预期
• 执行remove [2; 5; 3; 5; 9] 5，返回结果[2; 3; 5; 9]，仅删除第一个出现的5，后续重复的5被保留

内容的提问来源于stack exchange，提问作者kelperg1