Source Code

(impl-trait .dao-traits.proposal-script)

(define-constant UTIL-POINTS-SBTC (list u0 u2000 u4000 u6000 u8000 u8500 u9000 u10000))
(define-constant RATE-POINTS-SBTC (list u386 u486 u586 u686 u786 u8286 u15786 u30786))

(define-public (execute)
  (begin
    (try! (contract-call? .v0-market-vault set-impl .v0-4-market))

    (try! (contract-call? .v0-vault-stx set-authorized-contract .v0-4-market true))
    (try! (contract-call? .v0-vault-sbtc set-authorized-contract .v0-4-market true))
    (try! (contract-call? .v0-vault-ststx set-authorized-contract .v0-4-market true))
    (try! (contract-call? .v0-vault-usdc set-authorized-contract .v0-4-market true))
    (try! (contract-call? .v0-vault-usdh set-authorized-contract .v0-4-market true))
    (try! (contract-call? .v0-vault-ststxbtc set-authorized-contract .v0-4-market true))

    (try! (contract-call? .v0-vault-stx set-authorized-contract .v0-3-market false))
    (try! (contract-call? .v0-vault-sbtc set-authorized-contract .v0-3-market false))
    (try! (contract-call? .v0-vault-ststx set-authorized-contract .v0-3-market false))
    (try! (contract-call? .v0-vault-usdc set-authorized-contract .v0-3-market false))
    (try! (contract-call? .v0-vault-usdh set-authorized-contract .v0-3-market false))
    (try! (contract-call? .v0-vault-ststxbtc set-authorized-contract .v0-3-market false))

    (try! (contract-call? .v0-vault-sbtc set-points-util UTIL-POINTS-SBTC))
    (try! (contract-call? .v0-vault-sbtc set-points-rate RATE-POINTS-SBTC))

    (ok true)))

Functions (1)

FunctionAccessArgs
executepublic