{ parameter (or

              (or

                (or

                  (pair %balance_of

                    (list %requests (pair (address %owner) (nat %token_id)))

                    (contract %callback (list (pair

                                              (pair %request (address %owner)

                                                             (nat %token_id))

                                              (nat %balance)))))

                  (list %burn (pair (address %from_) (pair (nat %token_id) (nat %amount)))))

                (or (nat %lock_token)

                    (or

                      (pair %mint_token (option %token_id nat)

                                        (pair (map %metadata string bytes)

                                              (pair (nat %editions)

                                                    (address %destination))))

                      (address %set_administrator))))

              (or

                (or (big_map %set_metadata string bytes)

                    (list %transfer (pair (address %from_)

                                         (list %txs (pair (address %to_)

                                                         (pair (nat %token_id)

                                                               (nat %amount)))))))

                (or (nat %unlock_token)

                    (or

                      (list %update_operators (or

                                               (pair %add_operator (address %owner)

                                                                   (pair

                                                                     (address %operator)

                                                                     (nat %token_id)))

                                               (pair %remove_operator (address %owner)

                                                                      (pair

                                                                        (address %operator)

                                                                        (nat %token_id)))))

                      (list %update_token_metadata (pair (nat %token_id)

                                                        (map %token_info string bytes))))))) ;

  storage (pair

            (pair (pair (address %administrator) (nat %last_token_id))

                  (pair (big_map %ledger (pair address nat) nat)

                        (big_map %locked_tokens nat unit)))

            (pair

              (pair (big_map %metadata string bytes)

                    (big_map %operators

                      (pair (address %owner) (pair (address %operator) (nat %token_id)))

                      unit))

              (pair (big_map %supply nat nat)

                    (big_map %token_metadata nat

                                             (pair (nat %token_id)

                                                   (map %token_info string bytes)))))) ;

  code { UNPAIR ;

         IF_LEFT

           { IF_LEFT

               { IF_LEFT

                   { NIL operation ;

                     DUP ;

                     DUP 3 ;

                     CDR ;

                     PUSH mutez 0 ;

                     DUP 5 ;

                     CAR ;

                     MAP { DUP 7 ;

                           GET 6 ;

                           SWAP ;

                           DUP ;

                           DUG 2 ;

                           CDR ;

                           MEM ;

                           IF {} { PUSH string "FA2_TOKEN_UNDEFINED" ; FAILWITH } ;

                           DUP 7 ;

                           CAR ;

                           GET 3 ;

                           SWAP ;

                           DUP ;

                           CDR ;

                           SWAP ;

                           DUP ;

                           DUG 3 ;

                           CAR ;

                           PAIR ;

                           GET ;

                           IF_NONE { PUSH nat 0 } {} ;

                           SWAP ;

                           PAIR } ;

                     DIG 4 ;

                     DROP ;

                     DIG 4 ;

                     DROP ;

                     TRANSFER_TOKENS ;

                     CONS }

                   { DUP ;

                     ITER { DUP 3 ;

                            GET 6 ;

                            SWAP ;

                            DUP ;

                            DUG 2 ;

                            GET 3 ;

                            MEM ;

                            IF {} { PUSH string "FA2_TOKEN_UNDEFINED" ; FAILWITH } ;

                            DUP 3 ;

                            CAR ;

                            GET 4 ;

                            SWAP ;

                            DUP ;

                            DUG 2 ;

                            GET 3 ;

                            MEM ;

                            IF

                              { PUSH bool False }

                              { DUP ;

                                CAR ;

                                SENDER ;

                                COMPARE ;

                                EQ ;

                                IF

                                  { PUSH bool True }

                                  { DUP 3 ;

                                    GET 3 ;

                                    CDR ;

                                    SWAP ;

                                    DUP ;

                                    DUG 2 ;

                                    GET 3 ;

                                    SENDER ;

                                    DUP 4 ;

                                    CAR ;

                                    PAIR 3 ;

                                    MEM } } ;

                            IF

                              { PUSH bool True }

                              { SENDER ; DUP 4 ; CAR ; CAR ; CAR ; COMPARE ; EQ } ;

                            IF {} { PUSH string "FA2_NOT_OPERATOR" ; FAILWITH } ;

                            DUP 3 ;

                            UNPAIR ;

                            UNPAIR ;

                            SWAP ;

                            UNPAIR ;

                            DUP 5 ;

                            GET 4 ;

                            DIG 7 ;

                            CAR ;

                            GET 3 ;

                            DIG 6 ;

                            DUP ;

                            GET 3 ;

                            SWAP ;

                            DUP ;

                            DUG 8 ;

                            CAR ;

                            PAIR ;

                            GET ;

                            IF_NONE { PUSH nat 0 } {} ;

                            SUB ;

                            ISNAT ;

                            IF_NONE

                              { PUSH string "FA2_INSUFFICIENT_BALANCE" ; FAILWITH }

                              {} ;

                            SOME ;

                            DIG 5 ;

                            DUP ;

                            GET 3 ;

                            SWAP ;

                            DUP ;

                            DUG 7 ;

                            CAR ;

                            PAIR ;

                            UPDATE ;

                            PAIR ;

                            SWAP ;

                            PAIR ;

                            PAIR ;

                            DUG 2 ;

                            DUP ;

                            GET 4 ;

                            DUP 4 ;

                            GET 5 ;

                            DUP 3 ;

                            GET 3 ;

                            GET ;

                            IF_NONE { PUSH nat 0 } {} ;

                            SUB ;

                            ISNAT ;

                            IF_NONE

                              { DIG 2 ;

                                DUP ;

                                GET 5 ;

                                PUSH (option nat) (Some 0) ;

                                DIG 3 ;

                                GET 3 ;

                                UPDATE ;

                                UPDATE 5 ;

                                SWAP }

                              { DIG 3 ; DUP ; GET 5 ; DIG 2 ; SOME ; DIG 3 ; GET 3 ; UPDATE ; UPDATE 5 ; SWAP } } ;

                     DROP ;

                     NIL operation } }

               { IF_LEFT

                   { SWAP ;

                     DUP ;

                     DUG 2 ;

                     CAR ;

                     CAR ;

                     CAR ;

                     SENDER ;

                     COMPARE ;

                     EQ ;

                     IF {} { PUSH string "FA2_NOT_ADMIN" ; FAILWITH } ;

                     SWAP ;

                     UNPAIR ;

                     UNPAIR ;

                     SWAP ;

                     UNPAIR ;

                     SWAP ;

                     PUSH (option unit) (Some Unit) ;

                     DIG 5 ;

                     UPDATE ;

                     SWAP ;

                     PAIR ;

                     SWAP ;

                     PAIR ;

                     PAIR }

                   { IF_LEFT

                       { SWAP ;

                         DUP ;

                         DUG 2 ;

                         CAR ;

                         CAR ;

                         CAR ;

                         SENDER ;

                         COMPARE ;

                         EQ ;

                         IF {} { PUSH string "FA2_NOT_ADMIN" ; FAILWITH } ;

                         PUSH nat 1 ;

                         DUP 3 ;

                         CAR ;

                         CAR ;

                         CDR ;

                         ADD ;

                         SWAP ;

                         DUP ;

                         DUG 2 ;

                         CAR ;

                         IF_NONE

                           { DIG 2 ;

                             UNPAIR ;

                             UNPAIR ;

                             UNPAIR ;

                             SWAP ;

                             PUSH nat 1 ;

                             ADD ;

                             SWAP ;

                             PAIR ;

                             PAIR ;

                             PAIR ;

                             DUG 2 }

                           { SWAP ;

                             DROP ;

                             DUP ;

                             DUP ;

                             DUP 5 ;

                             CAR ;

                             CAR ;

                             CDR ;

                             COMPARE ;

                             LT ;

                             IF

                               { DIG 3 ; UNPAIR ; UNPAIR ; CAR ; DIG 3 ; SWAP ; PAIR ; PAIR ; PAIR ; DUG 2 }

                               { DROP } } ;

                         DUP 3 ;

                         GET 6 ;

                         SWAP ;

                         DUP ;

                         DUG 2 ;

                         MEM ;

                         IF

                           {}

                           { DIG 2 ;

                             DUP ;

                             GET 6 ;

                             DUP 4 ;

                             GET 3 ;

                             DUP 4 ;

                             PAIR ;

                             SOME ;

                             DUP 4 ;

                             UPDATE ;

                             UPDATE 6 ;

                             DUG 2 } ;

                         DUP 3 ;

                         DUP ;

                         GET 5 ;

                         DUP 4 ;

                         GET 5 ;

                         DIG 5 ;

                         GET 5 ;

                         DUP 5 ;

                         GET ;

                         IF_NONE { PUSH nat 0 } {} ;

                         ADD ;

                         SOME ;

                         DUP 4 ;

                         UPDATE ;

                         UPDATE 5 ;

                         DUP ;

                         DUG 3 ;

                         UNPAIR ;

                         UNPAIR ;

                         SWAP ;

                         UNPAIR ;

                         DUP 6 ;

                         GET 5 ;

                         DIG 7 ;

                         CAR ;

                         GET 3 ;

                         DUP 7 ;

                         DUP 9 ;

                         GET 6 ;

                         PAIR ;

                         GET ;

                         IF_NONE { PUSH nat 0 } {} ;

                         ADD ;

                         SOME ;

                         DIG 5 ;

                         DIG 6 ;

                         GET 6 ;

                         PAIR ;

                         UPDATE ;

                         PAIR ;

                         SWAP ;

                         PAIR ;

                         PAIR }

                       { SWAP ;

                         DUP ;

                         DUG 2 ;

                         CAR ;

                         CAR ;

                         CAR ;

                         SENDER ;

                         COMPARE ;

                         EQ ;

                         IF {} { PUSH string "FA2_NOT_ADMIN" ; FAILWITH } ;

                         SWAP ;

                         UNPAIR ;

                         UNPAIR ;

                         CDR ;

                         DIG 3 ;

                         PAIR ;

                         PAIR ;

                         PAIR } } ;

                 NIL operation } }

           { IF_LEFT

               { IF_LEFT

                   { SWAP ;

                     DUP ;

                     DUG 2 ;

                     CAR ;

                     CAR ;

                     CAR ;

                     SENDER ;

                     COMPARE ;

                     EQ ;

                     IF {} { PUSH string "FA2_NOT_ADMIN" ; FAILWITH } ;

                     SWAP ;

                     UNPAIR ;

                     SWAP ;

                     UNPAIR ;

                     CDR ;

                     DIG 3 ;

                     PAIR ;

                     PAIR ;

                     SWAP ;

                     PAIR }

                   { DUP ;

                     ITER { DUP ;

                            CDR ;

                            ITER { DUP 4 ;

                                   CAR ;

                                   GET 4 ;

                                   SWAP ;

                                   DUP ;

                                   DUG 2 ;

                                   GET 3 ;

                                   MEM ;

                                   IF { PUSH string "TOKEN_LOCKED" ; FAILWITH } {} ;

                                   DUP 4 ;

                                   GET 6 ;

                                   SWAP ;

                                   DUP ;

                                   DUG 2 ;

                                   GET 3 ;

                                   MEM ;

                                   IF

                                     {}

                                     { PUSH string "FA2_TOKEN_UNDEFINED" ; FAILWITH } ;

                                   SWAP ;

                                   DUP ;

                                   DUG 2 ;

                                   CAR ;

                                   SENDER ;

                                   COMPARE ;

                                   EQ ;

                                   IF

                                     { PUSH bool True }

                                     { DUP 4 ;

                                       GET 3 ;

                                       CDR ;

                                       SWAP ;

                                       DUP ;

                                       DUG 2 ;

                                       GET 3 ;

                                       SENDER ;

                                       DUP 5 ;

                                       CAR ;

                                       PAIR 3 ;

                                       MEM } ;

                                   IF {} { PUSH string "FA2_NOT_OPERATOR" ; FAILWITH } ;

                                   DUP ;

                                   GET 4 ;

                                   PUSH nat 0 ;

                                   COMPARE ;

                                   LT ;

                                   IF

                                     { DUP 4 ;

                                       UNPAIR ;

                                       UNPAIR ;

                                       SWAP ;

                                       UNPAIR ;

                                       DUP 5 ;

                                       GET 4 ;

                                       DIG 8 ;

                                       CAR ;

                                       GET 3 ;

                                       DUP 7 ;

                                       GET 3 ;

                                       DUP 9 ;

                                       CAR ;

                                       PAIR ;

                                       GET ;

                                       IF_NONE { PUSH nat 0 } {} ;

                                       SUB ;

                                       ISNAT ;

                                       IF_NONE

                                         { PUSH string "FA2_INSUFFICIENT_BALANCE" ;

                                           FAILWITH }

                                         {} ;

                                       SOME ;

                                       DUP 6 ;

                                       GET 3 ;

                                       DUP 8 ;

                                       CAR ;

                                       PAIR ;

                                       UPDATE ;

                                       PAIR ;

                                       SWAP ;

                                       PAIR ;

                                       PAIR ;

                                       DUP ;

                                       DUG 4 ;

                                       UNPAIR ;

                                       UNPAIR ;

                                       SWAP ;

                                       UNPAIR ;

                                       DUP 5 ;

                                       GET 4 ;

                                       DIG 8 ;

                                       CAR ;

                                       GET 3 ;

                                       DIG 6 ;

                                       DUP ;

                                       GET 3 ;

                                       SWAP ;

                                       DUP ;

                                       DUG 8 ;

                                       CAR ;

                                       PAIR ;

                                       GET ;

                                       IF_NONE { PUSH nat 0 } {} ;

                                       ADD ;

                                       SOME ;

                                       DIG 5 ;

                                       DUP ;

                                       GET 3 ;

                                       SWAP ;

                                       CAR ;

                                       PAIR ;

                                       UPDATE ;

                                       PAIR ;

                                       SWAP ;

                                       PAIR ;

                                       PAIR ;

                                       DUG 2 }

                                     { DROP } } ;

                            DROP } ;

                     DROP } }

               { IF_LEFT

                   { SWAP ;

                     DUP ;

                     DUG 2 ;

                     CAR ;

                     CAR ;

                     CAR ;

                     SENDER ;

                     COMPARE ;

                     EQ ;

                     IF {} { PUSH string "FA2_NOT_ADMIN" ; FAILWITH } ;

                     SWAP ;

                     UNPAIR ;

                     UNPAIR ;

                     SWAP ;

                     UNPAIR ;

                     SWAP ;

                     NONE unit ;

                     DIG 5 ;

                     UPDATE ;

                     SWAP ;

                     PAIR ;

                     SWAP ;

                     PAIR ;

                     PAIR }

                   { IF_LEFT

                       { DUP ;

                         ITER { IF_LEFT

                                  { DUP ;

                                    CAR ;

                                    SENDER ;

                                    COMPARE ;

                                    EQ ;

                                    IF {} { PUSH string "FA2_NOT_OWNER" ; FAILWITH } ;

                                    DIG 2 ;

                                    UNPAIR ;

                                    SWAP ;

                                    UNPAIR ;

                                    UNPAIR ;

                                    SWAP ;

                                    PUSH (option unit) (Some Unit) ;

                                    DIG 5 ;

                                    UPDATE ;

                                    SWAP ;

                                    PAIR ;

                                    PAIR ;

                                    SWAP ;

                                    PAIR ;

                                    SWAP }

                                  { DUP ;

                                    CAR ;

                                    SENDER ;

                                    COMPARE ;

                                    EQ ;

                                    IF {} { PUSH string "FA2_NOT_OWNER" ; FAILWITH } ;

                                    DIG 2 ;

                                    UNPAIR ;

                                    SWAP ;

                                    UNPAIR ;

                                    UNPAIR ;

                                    SWAP ;

                                    NONE unit ;

                                    DIG 5 ;

                                    UPDATE ;

                                    SWAP ;

                                    PAIR ;

                                    PAIR ;

                                    SWAP ;

                                    PAIR ;

                                    SWAP } } ;

                         DROP }

                       { SWAP ;

                         DUP ;

                         DUG 2 ;

                         CAR ;

                         CAR ;

                         CAR ;

                         SENDER ;

                         COMPARE ;

                         EQ ;

                         IF {} { PUSH string "FA2_NOT_ADMIN" ; FAILWITH } ;

                         DUP ;

                         ITER { DIG 2 ;

                                DUP ;

                                GET 6 ;

                                DIG 2 ;

                                DUP ;

                                CDR ;

                                SWAP ;

                                DUP ;

                                DUG 4 ;

                                CAR ;

                                PAIR ;

                                SOME ;

                                DIG 3 ;

                                CAR ;

                                UPDATE ;

                                UPDATE 6 ;

                                SWAP } ;

                         DROP } } } ;

             NIL operation } ;

         PAIR } ;

  view "get_last_token_id" unit nat { CDR ; CAR ; CAR ; CDR } ;

  view "is_owner" (pair (nat %token_id) (address %owner)) bool

        { UNPAIR ;

          PUSH nat 0 ;

          DIG 2 ;

          CAR ;

          GET 3 ;

          DIG 2 ;

          UNPAIR ;

          SWAP ;

          PAIR ;

          GET ;

          IF_NONE { PUSH int 190 ; FAILWITH } {} ;

          COMPARE ;

          GT } }