OCaml日年运营商计划

Question

编写一个在例11.38的yearday类型上正常工作的相等运算符（call it = /）。 （您可能需要查找管理闰年发生的规则。）

例11.38：type yearday = YMD of int * int * int | YD of int * int;;

我很难在OCaml工作，很想知道如何做到这一点。

Answer 1

编写运算符的语法是let (=/) a b = ...。

对于您的问题，您需要将YMD和YD值转换为通用值（例如，YD）