add remaining scripts, export to json file, fix compile

agora/Agora/ScriptInfo.hs

@@ -25,7 +25,9 @@ import Plutus.V1.Ledger.Value (CurrencySymbol)
 -- | Bundle containing a 'Validator' and its hash.
 data ValidatorInfo = ValidatorInfo
   { script :: Validator
+  -- ^ The validator script.
   , hash :: ValidatorHash
+  -- ^ Hash of the validator.
   }
   deriving stock (Show, Eq, GHC.Generic)
   deriving anyclass (Aeson.ToJSON, Aeson.FromJSON)
@@ -43,7 +45,9 @@ mkValidatorInfo term =
 -- | Bundle containing a 'MintingPolicy' and its symbol.
 data PolicyInfo = PolicyInfo
   { policy :: MintingPolicy
+  -- ^ The minting policy.
   , currencySymbol :: CurrencySymbol
+  -- ^ The symbol given by the minting policy.
   }
   deriving stock (Show, Eq, GHC.Generic)
   deriving anyclass (Aeson.ToJSON, Aeson.FromJSON)

agora/Agora/Treasury.hs

@@ -72,6 +72,7 @@ deriving via
      do so in a valid manner.
 -}
 treasuryValidator ::
+  -- | Governance Authority Token that can unlock this validator.
   CurrencySymbol ->
   ClosedTerm PValidator
 treasuryValidator gatCs' = plam $ \_datum redeemer ctx' -> unTermCont $ do