小编Adi*_*tya的帖子

我正在尝试编写一个SML程序来检查矩阵是否是单数.矩阵已表示为列表列表.例[[1,2],[3,4],[15,50]]是有效的,但[[1,2],[1,2,3]]不是.

fun remove (l,r)= 
    let fun iter(front,l,i)= 
      if i=r then front@tl(l) 
      else
        iter(front@[hd(l)],tl(l),i+1)
    in 
    iter([],l,1) end;

fun removed (l,r)=
    let fun iter(l,m)=if tl(l)=[] 
      then m@[remove (hd(l),r)] 
      else iter(tl(l),m@[remove (hd(l),r)])
    in
    iter(tl(l),[]) end;

fun nth (l,i)=let fun iter(l,c)=if i=c then hd(l) else iter(tl(l),c+1) in iter(l,1) end;

fun deter (l)=let fun iter(det,i,j)=if i=(length l)+1 then det else iter (det+j*(nth (hd(l),i))*(deter (removed(l,i))),i+1,j*(~1))
                 in iter(0,1,1) end

函数确定被定义,但是当我给它输入时,会发生未捕获异常空的错误.请帮我调试一下.

谢谢