//-------------------------------------------------------
#(N,5,0)=_(0);        // ᫮ ࠡ ᥩ  ⠡
$(_EQ())
  $
$_
${(5. ⥫ ப ᯨ᪠)
  $(__,0);  // 0 (1,...) - ⢮ ய᪮ ப
  $(_,"-");      // ᨬ  મ: "-" ( .ᨬ)
$}(5. ⥫ ப ᯨ᪠)
${(6. ⥫ ⮫殢 ᯨ᪠)
  $(__,1); // 1,2,...-᫮ ᨬ  ࠧ 
  $(_,"|");     // ᨬ-ࠧ⥫  (|  ||  ..)
$}(6. ⥫ ⮫殢 ᯨ᪠)
${(7. ਧ  )
  $(_,"0"); // " " (஡) -   㫨, "0" - 
$}(7. ਧ  )
${(1.  ᯨ᪠)
//   ⨬ ਥ 室 ⥪  ᯨ᪠
@Head
$}(1.  ᯨ᪠)
//${(砫 㬬)
  #=_(_);     //  砫 㬬
//$}(砫 㬬)
&(N,5,0)=0;
&(N,5,0)=1;                                 // 稪 ࠭
#(N,3,0)=_();                      //  ࠭
//${( ⠡)
  #=_(,,)             //  
  #=_(__);                 //  㬬  
//$}( ⠡)
$                                             //     ⠡
  //${(ப )
    #=_();                         // ਧ  
    $()
      #=_(_,,)  //   ப ⠡
    $_
  //$}(ப )
  &=+1;
  #(N,5,0)=_();                 // 稪 ப  
  $(_GE(+6-)+_EQ(-))
    //${(⮣ )
//      #=_(,_);            //  ⮣  .
//      #=_(__);            //  ⮣  .
    //$}(⮣ )
    ${(3.  )
//   ⨬ ਥ 室 ⥪   
//
    $}(3.  )
    $(_LT(-))
      $_
      ${(2.  )
//   ⨬ ਥ 室 ⥪  
//
      $}(2.  )
      //${( ⠡).   .
        #=_(,,)             //  
        #=_(__);                 //  㬬
      //$}( ⠡).   .
    $_
  $_
$(_GT(-))
//${(⮣ )
  #=_(,_)
//$}(⮣ )
${(4.  ᯨ᪠)
//   ⨬ ਥ 室 ⥪   ᯨ᪠
//
$}(4.  ᯨ᪠)
//$LF
$