Here’s a simple API in Haskell using Servant and Polysemy: willGuimont/status-checker.

And another one: willGuimont/exercises_api