diff options
| -rw-r--r-- | README.md | 2 | ||||
| -rw-r--r-- | ch03/3_b_9.hs | 9 |
2 files changed, 10 insertions, 1 deletions
@@ -61,7 +61,7 @@ more visible in the list the first exercise of a group is in bold italics. | 3_b_6 | yes | 70 | | | 3_b_7 | yes | | | | 3_b_8 | yes | | | -| 3_b_9 | | | | +| 3_b_9 | yes | | | | 3_b_10 | | | | | 3_b_11 | | | | | 3_b_12 | | | | diff --git a/ch03/3_b_9.hs b/ch03/3_b_9.hs new file mode 100644 index 0000000..c6595de --- /dev/null +++ b/ch03/3_b_9.hs @@ -0,0 +1,9 @@ +-- Consider three two-dimensional points a, b, and c. If we look at the angle +-- formed by the line segment from a to b and the line segment from b to c, it +-- either turns left, turns right, or forms a straight line. Define a Direction +-- data type that lets you represent these possibilities. + +data Direction = DLeft + | DRight + | DStraight + deriving (Show) |