数据 设置 一 空的 :: 设置 一 单子 :: 一 -> 设置 一 插入 :: 一 -> 设置 一 -> 设置 一 联盟 , 交叉 , 差异 :: 设置 一 -> 设置 一 -> 设置 一 补充 :: 设置 一 -> 设置 一 成员 :: 一 -> 设置 一 -> 布尔 到列表 :: 设置 一 -> [ 一 ]
等式 一
订单 一
数据 设置 一 = 设置 [ 一 ]
数据 设置 一 = 清空 | 节点 一 ( 设置 一 ) ( 设置 一 )
数据 设置 一 = 设置 ( 一 -> 布尔 )
数据 设置 一 = 设置 [ 一 ] --不变量:无重复 空的 = 设置 [] 单子 x个 = 设置 [ x个 ] 插入 x个 ( 设置 X轴 ) | x个 ` 元素 ` X轴 = 设置 X轴 | 否则 = 设置 ( x个 : X轴 ) 成员 x个 ( 设置 X轴 ) = x个 ` 元素 ` X轴
数据 设置 一 = 清空 | 节点 一 ( 设置 一 ) ( 设置 一 ) --不变量:左侧较小的元素, --向右偏大 空的 = 清空 单子 x个 = 节点 x个 清空 清空 插入 x个 清空 = 单子 x个 插入 x个 ( 节点 年 我 第页 ) | x个 == 年 = 节点 年 我 第页 | x个 < 年 = 节点 年 ( 插入 x个 我 ) 第页 | x个 > 年 = 节点 年 我 ( 插入 x个 年 ) 成员 x个 清空 = False(错误) 成员 x个 ( 节点 年 我 第页 ) = x个 == 年 || 成员 x个 ( 如果 x个 < 年 然后 我 其他的 第页 )
数据 设置 一 = 设置 ( 一 -> 布尔 ) 空的 = 设置 ( 常数 False(错误) ) 单子 x个 = 设置 ( == x个 ) 插入 x个 秒 = 联盟 ( 单子 x个 ) 秒 成员 x个 ( 设置 (f) ) = (f) x个
联盟 ( 设置 (f) ) ( 设置 克 ) = 设置 ( \ x个 -> (f) x个 || 克 x个 ) 交叉 ( 设置 (f) ) ( 设置 克 ) = 设置 ( \ x个 -> (f) x个 && 克 x个 ) 补充 ( 设置 (f) ) = 设置 ( 不 . (f) ) 差异 第1页 s2秒 = 交叉 第1页 ( 补充 s2秒 )
补充
到列表
类型 地区 = 点 -> 布尔 类型 点 = ( 双精度 , 双精度 )
收集
插入