open Tyxml;

let mycontent =

 "A fabulous title" 
    "This is a fabulous content."
  
;

let mytitle = Html.txt("A Fabulous Web Page");

let mypage =
  
      mytitle  
     mycontent 
  ;

let () = {
  let file = open_out("index.html");
  let fmt = Format.formatter_of_out_channel(file);
  Format.fprintf(fmt, "%a@.", Html.pp(~indent=true, ()), mypage);
  close_out(file);
};
