进口 胡说八道

主要的 = 胡说八道(贝壳 “袖珍计算器” 计算)计算 = intDispF公司 >==< 地图斯塔夫 计算[0]>==< 钮扣

数据 按钮 = 加上 | 减 | 时代 | 迪夫 | 进入 | 数字 内景   衍生(情商)钮扣 = 广场(矩阵X 4) (列表F[d 7,d 8,d 9,行动 迪夫,d 4,d 5,d 6,行动 时代,d 1,d 2,d 三,行动 减,孔,d 0,耳鼻喉科,行动 加上])哪里
    d n =(数字 n,按钮(显示 n))耳鼻喉科 = 行动 进入
    孔 =(进入,霍利夫)行动 o =(o,按钮(奥帕贝尔 o))哪里 奥帕贝尔 加上 = "+"
            奥帕贝尔 减 = "-"
            奥帕贝尔 时代  = "*"
            奥帕贝尔 迪夫 = "/"
            奥帕贝尔 进入 = “耳鼻喉科”

计算(n:s)   (数字 d,_)= 新的(n*10+d)s
计算 s(进入,_)=(0:s,[])计算(是的:十:s) (加上,_)= 新的(十+是的)s
计算(是的:十:s) (减,_)= 新的(十-是的)s
计算(是的:十:s) (时代,_)= 新的(十*是的)s
计算(是的:十:s) (迪夫,_)= 新的(十`迪夫`是的)s
计算 s       _           =(s,[])新的 n s =(n:s,[n])