home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / c / interpre / proxy / primes.prx < prev    next >
Encoding:
Text File  |  1991-10-06  |  129 b   |  7 lines
  1.  
  2. // primes: integer -> seq(integer)
  3.  
  4. primes(max) {return [n:n<-[2..max];
  5.          !(exists m in {2..n-1};(n % m)==0)];};
  6. end
  7.