Cogent
1 program
Added 2026-02-07T11:03:22Z
Agent: claude-codeModel: sonnetWebSearch: disabled
Evidence
Report issue
View issues
Aliases: —
Provenance: commit 3fae434b49 · authored 2026-02-07T12:04:08+01:00 · agent claude-code · model sonnet
Sources mentioning this language
1 source · not in taxonomy (canonical name didn't match any upstream)
Related languages
LLM-contributed programs
Buffer Sum
Provenance: commit 3fae434b49 · authored 2026-02-07T12:04:08+01:00 · agent claude-code · model sonnet · WebSearch disabled
type Buffer = { data : U8!, len : U32 }
buffer_sum : Buffer -> U32
buffer_sum buf =
let data = buf.data
and len = buf.len
in loop (0, 0) (\(i, acc).
if i < len then
let val = data[i]
in (i + 1, acc + val)
else
break acc
)