From the hub, tagged: "SHA1"

SHA-1 Hash in Pure Prolog

This post is external to PrologHub

Very particular circumstances led me to wanting a pure-Prolog implementation of SHA-1; if you're in the same boat, this may be useful!