A small example showing how to use lambda-term to print "Hello, world!" to the screen

lambda-term-example.ml

open Lwt
open CamomileLibrary

let draw ui matrix = 
  (* let style = { LTerm_style.none with foreground = Some (LTerm_style.rgb 255 255 255) } in *)
  let size = LTerm_ui.size ui in
  let ctx = LTerm_draw.context matrix size in
  LTerm_draw.draw_string ctx 2 2 "Hello, world!"

let rec loop ui =
  LTerm_ui.wait ui >>= function
  | LTerm_event.Key { code = Char c } when UChar.char_of c = 'q' -> return ()
  | _ -> 
    LTerm_ui.draw ui;
    loop ui

let run () =
  Lazy.force LTerm.stdout >>= fun term ->
  LTerm_ui.create term draw >>= fun ui ->
  loop ui >>= fun () ->
  LTerm_ui.quit ui

let () = Lwt_main.run (run ())