SATySFiで二項演算子や単項演算子を定義する ref: https://qiita.com/hanachin_/items/14501730a3c065d63d09

file0.txt

let ( ここに演算子にしたい文字列を書く ) 引数1 引数2 = 結果

file1.txt

let ( ここに演算子にしたい文字列を書く ) 引数1 = 結果

file2.txt

@require: stdja
@require: list

let ( >> ) x lst = x :: lst

let-inline \dump lst =
  let d = lst |> List.fold-left (fun acc n -> acc ^ (arabic n) ^ `;`) ` ` in
  embed-string (`[` ^ (string-sub d 0 ((string-length d) - 1)) ^ `]`)
in

document (|
  author = { Seiei MIYAGI };
  show-title = true;
  show-toc = false;
  title = { SATySFiで演算子定義 }
|) '<
  +p {
    \dump(1 >> 2 >> 3 >> []);
  }
>

file3.txt

@require: stdja

let ( !>^..^< ) s = {\>^..^\< .o( #s;にゃん )}
let message = !>^..^< { ねむ }
in

document (|
  author = { Seiei MIYAGI };
  show-title = true;
  show-toc = false;
  title = { SATySFiで演算子定義 }
|) '<
  +p { #message; }
>