From ab2b9a982ede817362072623ff9ae2aa42e083da Mon Sep 17 00:00:00 2001 From: Louis Pilfold Date: Thu, 18 Jan 2024 20:34:43 +0000 Subject: Move recursion lessons together --- .../chapter2_flow_control/lesson11_guards/code.gleam | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 src/content/chapter2_flow_control/lesson11_guards/code.gleam (limited to 'src/content/chapter2_flow_control/lesson11_guards/code.gleam') diff --git a/src/content/chapter2_flow_control/lesson11_guards/code.gleam b/src/content/chapter2_flow_control/lesson11_guards/code.gleam new file mode 100644 index 0000000..3744228 --- /dev/null +++ b/src/content/chapter2_flow_control/lesson11_guards/code.gleam @@ -0,0 +1,15 @@ +import gleam/io + +pub fn main() { + let numbers = [1, 2, 3, 4, 5] + io.debug(get_first_larger(numbers, 3)) + io.debug(get_first_larger(numbers, 5)) +} + +fn get_first_larger(lists: List(Int), limit: Int) -> Int { + case lists { + [first, ..] if first > limit -> first + [_, ..rest] -> get_first_larger(rest, limit) + [] -> 0 + } +} -- cgit v1.2.3