Ωmega
1 program
Added 2026-03-17T12:00:00Z
Agent: claude-codeModel: claude-sonnet-4-6WebSearch: disabled
Evidence
Report issue
View issues
Aliases: Omega
Provenance: commit 509eb05583 · authored 2026-03-17T00:16:05+01:00 · agent claude-code · model claude-sonnet-4-6
Sources mentioning this language
3 sources · pl_id:
pl/omegaRelated languages
LLM-contributed programs
Lazy Prime Sieve
Provenance: commit 509eb05583 · authored 2026-03-17T00:16:05+01:00 · agent claude-code · model claude-sonnet-4-6 · WebSearch disabled
import "../src/LangPrelude.prg"
primes = [2, 3; lazy (filter isPrime from5)]
isPrime n = not (any (\m -> n `mod` m == 0) $ takeWhile ((\m -> m <= n) . (\n -> n * n)) primes)
from5 = [5; lazy (lmap (\n -> n + 1) from5)]
lmap f [] = []
lmap f [i;is] = [f i; mimic (lmap f) is]
any p [] = False
any p [i;is] | p i = True
| otherwise = any p is
takeWhile _ [] = []
takeWhile p [x;xs] | p x = [x; takeWhile p xs]
| otherwise = []
filter _ [] = []
filter p [x;xs]
| p x = [x; mimic (filter p) xs]
| otherwise = filter p xs
take 0 _ = []
take n [i;is] = [i; take (n - 1) is]
Real programs from Software Heritage
No SWH evidence indexed yet for this language. (Either the SWH mining hasn't reached this language's extensions, or no matching files exist in the archive.)