Untitled

mail@pastecode.io avatar
unknown
haskell
2 years ago
303 B
3
Indexable
Never
data ResultStoreAPI mode = ResultStoreAPI {
    healthCheckApi :: mode :- HealthcheckAPI
  , modelResultApi :: mode :- NamedRoutes  ModelResultSubAPI
  } deriving Generic

data ModelResultSubAPI mode = ModelResultSubAPI {
    getModelResult :: mode :- Get '[JSON, BSON] ModelResult
  } deriving Generic