Write a simple algorithm to calculate the factorial of 9 in Haskell. You can use your own language to write its Pseudo-code.