Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- module Db = struct
- type student = { sname : string; age : int; semester: int }
- let students = [
- { sname = "Student 1"; age = 19; semester = 1 };
- { sname = "Student 2"; age = 24; semester = 7 };
- { sname = "Student 3"; age = 28; semester = 12 };
- { sname = "Student 4"; age = 23; semester = 4 };
- ]
- let find_student = (*to do*)
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement