Guest User

Untitled

a guest
Aug 18th, 2018
90
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.16 KB | None | 0 0
  1. Calculating interest in Haskell
  2. interest :: Float -> Float -> Float
  3. interest capital rate = capital * rate * 0.01
  4.  
  5. finalvalue :: Float -> Float -> Float
  6. finalvalue capital rate = capital + interest capital rate
  7.  
  8. finalvalue2 :: Float -> Float -> Float
  9. finalvalue2 capital rate = finalvalue capital rate + interest finalvalue capital rate rate
  10.  
  11. Couldn't match expected type `Float'
  12. against inferred type `Float -> Float -> Float'
  13. In the first argument of `interest', namely `finalvalue'
  14. In the second argument of `(+)', namely
  15. `interest finalvalue capital rate rate'
  16. In the expression:
  17. finalvalue capital rate + interest finalvalue capital rate rate
  18.  
  19. interest finalvalue capital rate rate
  20.  
  21. finalvalue2 :: Float -> Float -> Float
  22. finalvalue2 capital rate =
  23. finalvalue capital rate + interest (finalvalue capital rate) rate
  24.  
  25. finalvalue2 :: Float -> Float -> Float
  26. finalvalue2 capital rate =
  27. finalvalue capital rate + interest finalvalue capital rate rate
  28. ^^^^^^^^^^
  29.  
  30. finalvalue2 :: Float -> Float -> Float
  31. finalvalue2 capital rate = finalvalue capital rate + interest (finalvalue capital rate) rate
Add Comment
Please, Sign In to add comment