From 967be9e750221ab2ab783f95df79bb26d290a45e Mon Sep 17 00:00:00 2001 From: Martial Simon Date: Mon, 15 Sep 2025 01:07:58 +0200 Subject: add: added projects --- tigrou/linked-list/linked-list.tih | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 tigrou/linked-list/linked-list.tih (limited to 'tigrou/linked-list/linked-list.tih') diff --git a/tigrou/linked-list/linked-list.tih b/tigrou/linked-list/linked-list.tih new file mode 100644 index 0000000..b890f3a --- /dev/null +++ b/tigrou/linked-list/linked-list.tih @@ -0,0 +1,15 @@ +type node = {value : int, next : node} +function append(list: node, element: int) = + if list.next = nil then + list.next := node{value = element, next = nil} + else + append(list.next, element) + +function display(list: node) = + if list <> nil then + ( + print_int(list.value); + (if list.next <> nil then + print(" -> ")); + display(list.next) + ) -- cgit v1.2.3