2019-12-10 13:47:31 +00:00
|
|
|
type storage = (int, int);
|
|
|
|
|
2020-03-02 18:01:56 +01:00
|
|
|
let main = (n : (int, storage)) : (list (operation), storage) => {
|
|
|
|
let x : (int, int) = {
|
|
|
|
let x : int = 7;
|
|
|
|
(x + n[0], n[1][0] + n[1][1]);
|
2019-12-10 13:47:31 +00:00
|
|
|
};
|
2020-03-02 18:01:56 +01:00
|
|
|
([]: list (operation), x);
|
2019-12-10 13:47:31 +00:00
|
|
|
};
|