14.6 - | x == y = True | otherwise = False regular...

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
--14.6 data Shape = Circle Float | Rectangle Float Float | Triangle Float Float Float regular :: Shape -> Bool regular (Circle _ ) = True regular (Rectangle x y)
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: | x == y = True | otherwise = False regular (Triangle x y z) | x == y && x == z = True | otherwise = False...
View Full Document

This note was uploaded on 11/10/2010 for the course CS 332F taught by Professor Russel during the Spring '10 term at California State University Los Angeles .

Ask a homework question - tutors are online