Commit 06c20e06 authored by Hans-Peter Deifel's avatar Hans-Peter Deifel 🐢

fixup! Implement random WTA generator

parent 26b4f209
......@@ -24,9 +24,9 @@ monoidForStates MaxInt = "Z"
monoidForStates OrWord = "N"
monoidForStates Powerset = "2"
withMonoidForWeights :: (MonoidType m) -> Builder -> Builder
withMonoidForWeights :: MonoidType m -> Builder -> Builder
withMonoidForWeights MaxInt inner = "(Z, max)^(" <> inner <> ")"
withMonoidForWeights OrWord inner = "(N, or)^(" <> inner <> ")"
withMonoidForWeights OrWord inner = "(Word, or)^(" <> inner <> ")"
withMonoidForWeights Powerset inner = "P(" <> inner <> ")"
polynomial :: SymbolSpec -> Builder
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment