;; constants
(define-constant ERR-NOT-AUTHORIZED u401)
(define-constant ERR-ALL-MINTED u101)
(define-constant ERR-COOLDOWN u102)

(define-constant CONTRACT-OWNER tx-sender)


;;;;;;;;;;;;;;

(define-public (generate (start uint) (finish uint))
  (let (
    (b1 (unwrap-panic (get-vault u0)))
    (b2 (unwrap-panic (get-vault u1)))
  )
    (ok (list amountIn b1 b2))
  )
)


(define-public (get-vault (xid uint))
  (let ((r (unwrap-panic (contract-call? 'SP2C2YFP12AJZB4MABJBAJ55XECVS7E4PMMZ89YZR.arkadiko-freddie-v1-1 get-vault-by-id xid))))
  (ok (unwrap-panic (r))))
)
