Jonathan Carroll on Nostr: #haskell leapyear = liftA2 (>) (gcd 80) (gcd 50) filter leapyear [1890..1920] ...
#haskell
leapyear = liftA2 (>) (gcd 80) (gcd 50)
filter leapyear [1890..1920]
[1892,1896,1904,1908,1912,1916,1920]
Published at
2024-08-19 09:21:14Event JSON
{
"id": "950280aa5b1e363fde3f19dbaa6ae7ccd20856c58da7fd931094c5c6cae75c0d",
"pubkey": "b7f4998efbebfd0d675e0671c492f7610c7cef16e7619798bc7e7611cbeb10c6",
"created_at": 1724059274,
"kind": 1,
"tags": [
[
"e",
"06a34b82680cdb0829fff8a3e1d5c3ccb0e7de17494e3d5a26ee7f7662edf867",
"wss://relay.mostr.pub",
"reply"
],
[
"t",
"haskell"
],
[
"proxy",
"https://fosstodon.org/users/jonocarroll/statuses/112987948596211146",
"activitypub"
]
],
"content": "#haskell \n\nleapyear = liftA2 (\u003e) (gcd 80) (gcd 50)\nfilter leapyear [1890..1920]\n[1892,1896,1904,1908,1912,1916,1920]",
"sig": "ab37ddb45013cb0627d02d8d266082e237ab5f6b41c8e50859a5058b27345d8fd7eec365055e29d6ac09d02f7917af7f3da140f770eb013f6c2478eed9b4cf15"
}
