Advertisement
Guest User

Untitled

a guest
Nov 11th, 2019
97
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.19 KB | None | 0 0
  1. contarCirculosPrimos :: Integer -> Integer
  2. contarCirculosPrimos n = longitud1 (listaCirculosPrimos n)
  3.  
  4. longitud1 :: [Circulo] -> Integer
  5. longitud1 [] = 0
  6. longitud1 (x:xs) = 1 + longitud1 xs
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement