type date = {month int; day : int} For example, March 31st would be represented as {month = 3; day 31}. Our goal in the %3! next few exercises is to implement a map whose keys have type date. Obviously it's possible to represent invalid dates with type date-for example, {month=6%3; day=50 } would be June 50th, which is not a real date. The behavior of your code in the exercises below is unspecified for invalid dates. To create a map over dates, we need a module that we can pass as input to Map.Make. That module will need to match the Map.OrderedType signature. Create such a module. Here is some code to get you started: module Date = struct type t = date let compare ... end Recall the specification of compare in Map.OrderedType as you write your Date.compare function.

Computer Networking: A Top-Down Approach (7th Edition)
7th Edition
ISBN:9780133594140
Author:James Kurose, Keith Ross
Publisher:James Kurose, Keith Ross
Chapter1: Computer Networks And The Internet
Section: Chapter Questions
Problem R1RQ: What is the difference between a host and an end system? List several different types of end...
icon
Related questions
Question

please use ocaml for the programming language. DO NOT code in any other language ONLY OCAML 

Exercise: date order [**]
Here is a type for dates:
type date = {month : int; day : int}
For example, March 31st would be represented as {month
= 3; day
31}. Our goal in the
%3!
next few exercises is to implement a map whose keys have type date.
Obviously it's possible to represent invalid dates with type date-for example, { month=6;
day=50 } would be June 50th, which is not a real date. The behavior of your code in the
exercises below is unspecified for invalid dates.
To create a map over dates, we need a module that we can pass as input to Map.Make. That
module will need to match the Map.OrderedType signature. Create such a module. Here is
some code to get you started:
module Date = struct
type t = date
let compare ...
end
Recall the specification of compare in Map.OrderedType as you write your Date.compare
function.
Transcribed Image Text:Exercise: date order [**] Here is a type for dates: type date = {month : int; day : int} For example, March 31st would be represented as {month = 3; day 31}. Our goal in the %3! next few exercises is to implement a map whose keys have type date. Obviously it's possible to represent invalid dates with type date-for example, { month=6; day=50 } would be June 50th, which is not a real date. The behavior of your code in the exercises below is unspecified for invalid dates. To create a map over dates, we need a module that we can pass as input to Map.Make. That module will need to match the Map.OrderedType signature. Create such a module. Here is some code to get you started: module Date = struct type t = date let compare ... end Recall the specification of compare in Map.OrderedType as you write your Date.compare function.
Expert Solution
trending now

Trending now

This is a popular solution!

steps

Step by step

Solved in 2 steps

Blurred answer
Recommended textbooks for you
Computer Networking: A Top-Down Approach (7th Edi…
Computer Networking: A Top-Down Approach (7th Edi…
Computer Engineering
ISBN:
9780133594140
Author:
James Kurose, Keith Ross
Publisher:
PEARSON
Computer Organization and Design MIPS Edition, Fi…
Computer Organization and Design MIPS Edition, Fi…
Computer Engineering
ISBN:
9780124077263
Author:
David A. Patterson, John L. Hennessy
Publisher:
Elsevier Science
Network+ Guide to Networks (MindTap Course List)
Network+ Guide to Networks (MindTap Course List)
Computer Engineering
ISBN:
9781337569330
Author:
Jill West, Tamara Dean, Jean Andrews
Publisher:
Cengage Learning
Concepts of Database Management
Concepts of Database Management
Computer Engineering
ISBN:
9781337093422
Author:
Joy L. Starks, Philip J. Pratt, Mary Z. Last
Publisher:
Cengage Learning
Prelude to Programming
Prelude to Programming
Computer Engineering
ISBN:
9780133750423
Author:
VENIT, Stewart
Publisher:
Pearson Education
Sc Business Data Communications and Networking, T…
Sc Business Data Communications and Networking, T…
Computer Engineering
ISBN:
9781119368830
Author:
FITZGERALD
Publisher:
WILEY