ligo/src/test/contracts/michelson_insertion.mligo
Pierre-Emmanuel Wulfman 195175287a review 2
2020-06-11 11:40:45 +02:00

5 lines
143 B
Plaintext

// Test michelson insertion in CameLIGO
let michelson_add (n : nat * nat) : nat =
[%Michelson ({| { UNPAIR;ADD } |} : nat * nat -> nat) ] n