Mode:
Duration:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
let count = ref 0
let isDark = ref false
let updateUI () =
Printf.printf "Counter: %d\n" !count;
Printf.printf "Theme: %s\n" (if !isDark then "Dark" else "Light")
let increment () = count := !count + 1; updateUI ()
let decrement () = count := !count - 1; updateUI ()
let reset () = count := 0; updateUI ()
let toggleTheme () = isDark := not !isDark; updateUI ()
(* Simulate actions *)
updateUI (); increment (); increment (); toggleTheme (); decrement (); reset ();Coding works best on desktop or with an external keyboard.