Advertisement
Guest User

Untitled

a guest
Oct 21st, 2014
174
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.15 KB | None | 0 0
  1. update' :: VariableName -> Value -> Store' -> Store'
  2. update' i x m = m' where
  3. m'::VariableName -> Value
  4. m' v | v==i = x
  5. | otherwise = m v
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement