% 例

/二次方程式の解 {
{ 変数定義 } コメント
/c 入れ替え 定義し /b 入れ替え 定義し /a 入れ替え 定義し
{ 判別式 } コメント
b b 掛け 4 a 掛け c 掛け 引き
{ 虚数の判定 } コメント
二重化し 符号を調べ
二重化し 1 と等しい {
{ ２つの実数解を持つ場合 } コメント
捨て
平方根 二重化し
b 符号反転し 足し 2 a 掛け 割り
入れ替え b 符号反転し 引き 2 a 掛け 割り
} {
0 と等しい {
{ １つの実数解を持つ場合 } コメント
捨て
b 符号反転し 2 a 掛け 割り
} {
{ ２つの虚数解を持つ場合 } コメント
符号反転し 平方根 2 a 掛け 割り /j 入れ替え 定義し
b 符号反転し 2 a 掛け 割り /r 入れ替え 定義し
r j r j 符号反転し
} よければ最初のほうを、だめなら後のほうを
} よければ最初のほうを、だめなら後のほうを
} 定義し