skip to main content
paste
bin
.ca
type · paste · share
⌘
K
Family
The bin family
pastebin.ca
hub
Share text and code with expiry and privacy controls.
imagebin.ca
Upload and share images with direct links.
filebin.ca
Drop a file and get a shareable link.
notebin.ca
Write Markdown notes with durable links.
turl.ca
Short, reputation-checked links.
attn.ca
Notifications and alerts for your services.
voicebin.ca
Record and share short voice clips.
dnsbin.ca
Inspect DNS and debug records.
Docs
Sign in
?
All pastes
#29851
Raw
Copy code
Copy link
Edit
Miscellany
public
text
v1 · immutable
#29851
·
published
2005-11-21 02:10 UTC
Lines
Syntax
Wrap
Stripe
off
dark
light
Mono
Size
13px
Tab
2
4
8
Theme
Follow system
Always dark
Always light
rendered paste body
scanSum x = scanSum' 0 x
scanSum' n [] = n
scanSum' n (x:xs) = n + x : scanSum' (n -1) xs