Home Explore Help
Sign In
CNI
/
HaskellCourse
3
0
Fork 0
Files Issues 0 Pull Requests 0 Wiki
Tree: 3f12d02369
Branches Tags
HaskellCourse
/
hpal.hs

hpal.hs 80 B
History Raw

12345678 
  1. r _ = 1
    2. 

  2. 

  3. ispal n = True
    4. 

  4. 

  5. hpal n = 
    6. 

  6. 	if ispal n
    7. 

  7. 	then 0
    8. 

  8. 	else 1 + hpal (n + r n)
    9.