Use Liqwid-Labs/plutarch

- Removed `Utils.Value` -- not being used/better is provided with
  liqwid-plutarch-extra
- uses `Liqwid-Labs/plutarch`
- uses `Liqwid-Labs/plutarch-numeric`
- uses `Liqwid-Labs/plutarch-safemoney`
- uses `Liqwid-Labs/liqwid-plutarch-extra`

agora/Agora/Proposal/Scripts.hs

@@ -44,10 +44,13 @@ import Plutarch.Api.V1 (
   PTxInfo (PTxInfo),
   PValidator,
  )
-import Plutarch.Api.V1.Extra (passetClass, passetClassValueOf)
-import Plutarch.Map.Extra (plookup)
-import Plutarch.SafeMoney (puntag)
+import Plutarch.Api.V1.AssetClass (passetClass, passetClassValueOf)
+import Plutarch.Extra.Map (plookup)
+import Plutarch.Extra.Comonad (pextract)
+import Plutarch.SafeMoney (PDiscrete (..))
 import Plutus.V1.Ledger.Value (AssetClass (AssetClass))
+import Plutarch.Extra.TermCont (pmatchC)
+
 
 {- | Policy for Proposals.
 
@@ -253,8 +256,9 @@ proposalValidator proposal =
                   PProposalVotes $
                     pupdate
                       # plam
-                        ( \votes ->
-                            pcon $ PJust $ votes + (puntag stakeInF.stakedAmount)
+                        ( \votes -> unTermCont $ do
+                            PDiscrete v <- pmatchC stakeInF.stakedAmount
+                            pure $ pcon $ PJust $ votes + (pextract # v)
                         )
                       # voteFor
                       # m