//-------------------------------------------------------    
#(N,5,0)=_(0);        // ᫮ ࠡ ᥩ  ⠡    
$(_EQ())    
  $    
$_    
${(5. ⥫ ப ᯨ᪠)    
  $(__,0);  // 0 (1,...) - ⢮ ய᪮ ப    
  $(_,"-");      // ᨬ  મ: "-" ( .ᨬ)    
$}(5. ⥫ ப ᯨ᪠)    
${(6. ⥫ ⮫殢 ᯨ᪠)    
  $(__,1); // 1,2,...-᫮ ᨬ  ࠧ   
  $(_,"|");     // ᨬ-ࠧ⥫  (|  ||  ..)  
$}(6. ⥫ ⮫殢 ᯨ᪠)    
${(7. ਧ  )    
  $(_," "); // " " (஡) -   㫨, "0" -     
$}(7. ਧ  )    
${(1.  ᯨ᪠)    
//   ⨬ ਥ 室 ⥪  ᯨ᪠
                                     2003.
$}(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