我正在用 sml 编写这个函数
fun removeNodeswithNoIncoming((x:int,y)::xs,element:int) =
if x=element then
removeNodeswithNoIncoming (xs , element)
else
(x,y) :: removeNodeswithNoIncoming (xs , element)
| removeNodeswithNoIncoming(nil,element) = nil;
该函数采用元组列表 [(0,0),(0,1)(1,2)] 和另一个元素 0 如果元组的第一个元素与第二个参数相同，则将其从列表中删除对于上面的列表应该是 [(1,2)]
不幸的是，该代码不适用于上述输入。尽管还有其他输入可以使用
- removeNodeswithNoIncomingEdge([(0,1),(0,2),(1,2)],0);
stdIn:30.1-30.30 Error: unbound variable or constructor: removeNodeswithNoIncomi
ngEdge
- removeNodeswithNoIncomingEdge([(0,1),(0,2),(1,2),(1,4)],0);
stdIn:1.2-1.31 Error: unbound variable or constructor: removeNodeswithNoIncoming
Edge