Skip to content

Latest commit

 

History

History
35 lines (23 loc) · 640 Bytes

README.md

File metadata and controls

35 lines (23 loc) · 640 Bytes

cis194

Homework solutions for UPenn's CIS 194:

http://www.seas.upenn.edu/~cis194/lectures.html

Installation

On a mac:

brew install haskell-stack
stack setup
cd cis194
stack init
stack test

How to run tests

stack test

Using QuickCheck in ghci

:m +Test.QuickCheck
:l src/Cis194/Hw/Week1.hs 

-- define a fx that generates data
let negInts = choose(-10000000, -1)

-- define a Property that runs function and asserts something about result
let toDigitsEmpty x = (toDigits x) == []

-- run QuickCheck to validate property
quickCheck (forAll negInts toDigitsEmpty)