SML：为什么返回类型是单位？

问题描述

所以我写了一个函数（为了避免混淆，我会简单描述一下）

   fun function1 (l,a1,a2,suma,b2,sumb,d)   = 
   while(a1<a2 andalso k>d) do
     let 
       
       val k = Real.fromInt(a2-a1)
       val suma = suma - Real.fromInt(List.nth(l,a1))  
       val sumb = sumb - Real.fromInt(List.nth(l,b2)) 
       val a1 = a1+1
       val b2 = b2-1
   in  
       if suma<0.0 andalso ( (~sumf)/(N*k) )>1.0 andalso k>d
           then  k
       else if sumb<0.0 andalso ((~sumb)/(N*k))>1.0 andalso k>d
           then  k
       else d   
   end;

系统说：

val function1 = fn : int list * int * int * real * int * real * real -> unit

I don't get the return type. I want to return a real like d & k . Why it's unit??

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

sml smlnj