So this is a user defined datatype day of each day of the week (ie: Sunday, Monday, etc.)

```
let is_weekend_day (d:day) : bool = 
   begin match d with
     | Sunday -> true
     | Saturday -> true 
     | _ -> false
   end

```

Is there any way to condense the code? 

```
ie: Sunday || Saturday -> true 

the problem with this is that it's not in syntax, but having 2 additional       
lines seems like such a waste of space!

```