5 lines
115 B
Plaintext
5 lines
115 B
Plaintext
parameter nat;
|
|
storage (pair string nat);
|
|
return (pair string nat);
|
|
code {DUP; CDR; DIP{CAR}; SET_CDR; DUP; PAIR};
|