*                     08/09/2015
 
           ,12       12 :  
              12,15              
              14,14          14
         2,='4'            <===
               3,='123 '         
             14,           1=(,)
         14,14          14
              14                  
14                            14
            44'        ' 
            '0'
                            
                            
*        ....              (, )  [2,3]
          10,11              (11)  10 
              1,           
          ,=(1)           
           ,11          
              11,1               
              14,14          14
              10,11          11
              1,5                 5
       2,3,           
              3,
              2,='1'            <>1
                           
               1,
              1,1(1)           =+1
              1,
           1,              
             +33(1),+0   
             +43(1),+1   
           ,44               "   "
               
        2,               
            2,0               =-1
             +0(1),+0 
             +1(1),+2 
             +2(1),+1 
               3,            
             14,            (-1,,,)
              2,1               =1
             , 
               3,            
             14,            (1,,,)
               2,               
            2,0               =-1
             +0(1),+2 
             +1(1),+1 
             +2(1),+0 
               3,            
             14,            (-1,,,)
       2,3,           
              1,11              
               14,14         14
               11,11         11
              0,            
          =(1),=(0)     
              14                  
         
            12                   
                        
14                          14
11                          11
         0                 
                               2 
                           3 
     *-
           
             

5 , 
 
 
 
 
:   !  !  !  ! ;
:   @  @  @ ;
: 2   ;
: 
	  @   ;; 
	 @ 
	 @ :1- 2  
	 
	"     " .   @ . "  " .  @ .
	 @ :1- 2  
;
 
"   ,  " .  @ . " : " . 
 @ 1 2 3   

  (:, :, :, :):
{
     ( > 0)
    {
        ( - 1, , , );
        ("    " +  + "   " + );
        ( - 1, , , );
    }
}

 ._;  ._;
 
  
      (, , );
     ( : ; _ :  := ; _ :  := ; _ :  := ) 
   
        > 0 
         ( - 1, _, _, _);
         _(" " & '() & "  " & '(_) & "  " & '(_));
         ( - 1, _, _, _);
       ;
    ;

   (4);
 ;

 := (::, ::, ::, ::) 
     > 0 
      ( - 1, , , )
      ( & '  ' & )
      ( - 1, , , )
   

 
(4, 1, 2, 3)

  = ( , , , ) :
    > 0 
    ( - 1, , , );
    (($"    ""   "$, , ));
    ( - 1, , , )
  
;
 
: (
  (4, 1,2,3)
)


      (   , , ,  ) ;
          > 0  
            (  - 1, , ,  );
            ( _ := 1, _ := 0, "   : ", , "  : ",  );
            (  - 1, , ,  )
          ;
 
    ( 4, 1, 2, 3 )
.

 (, , , )
    > 0
    (-1, , , )
    ('    \   \\', , )
    (-1, , , )
  

 
 ()
  (4, 1,2,3)


  --     ''    '' 
   ""
(4, " ", " ", " ")
 
 (, , , )
         0 
        ( - 1, , , )
            & "  " &  & "  " &  & "  " &  & 
        ( - 1, , , )
     
     
 

 
 
    (, (3, "", "", ""))
 
    -- {" -> ", " -> ", " -> ", 
    -- " -> ", " -> ", " -> ", " -> "} 
 
 
 
 
--  ->  ->  ->  -> [(, )]
 (, , , )
      > 0 
        ( - 1, , , ) & {{, }} & ( - 1, , , )
    
        {}
     
 
 
 
--  
-- (, ) -> 
 ()
     1   & " -> " &  2  
 
 
--  
--  :: ( -> ) -> [] -> []
 (, )
     
          : 
     
 
         
       {}
        1  
             ' (   , , )
     
     
 

(, , , )  ; = #  ,  =  ,  =  ,  =   
{
   ( = 1)
  {
     ,     %%   %% 
  }
  
  {
    (-1, , , )
    (1, , , )
    (-1, , , )
  }
}
(64, 1, 3, 2)

 ($, $, $, $)
	 ($ = 1) 
		(("    "&$&"   "&$&"\"))
	
		($ - 1, $, $, $)
		(1, $, $, $)
		($ - 1, $, $, $)
	

 
(4, 1,2,3)

$  ' (,,,){(>0){(-1,,,);(,"->",);(-1,,,)}}
{(4,"","","")}'

  (  ,   ,   ,   )
     >0 
         -1, , , 
         "   "; ; "  "; 
         -1, , , 
     
 
 
 4,1,2,3

10  (1024), (1024), (1024), (1024):    
20  = 0:      
30 () = 4:    4 
40 () = 1:    1
50 () = 2:     2
60 () = 3:    3
70  100
80 
90    
100  () = 0  
110  = :             
120  =  + 1:          
130 () = () - 1:   -1 
140 () = ()    :    
150 () = ()    :    
160 () = ()    :    
170  100
180  =  - 1:     
190  "  "; (); ""; ()
200 () = () - 1:   -1 
210 () = ()    :    
220 () = ()    :    
230 () = ()    :    
240  100
250  =  - 1      :      
260 

 (4,1,2,3)
 "    !"

 
  (, , , )
     >0 
         (-1, , , )
         "   "++"  "+
         (-1, , , )
     
 

@ 
 
 
	%==  ==%
	%==  -   ==%
	%==  -  ==%
	%==  -  ==%
	%==  -  ==%
 : 4   
.

 / 0
 
	%== ""==%
:
	
	 =%1
	 =%2
	 =%3
	 =%4
 
	 %%  0 (
		 / =!!-1
		 : !! %% %% %%
		      %%   %%.
		 : !! %% %% %%
	) 
	 / 0

       $(13),%(3)
       % = 1  13
        $(%) = $(%," ")+$%+$(%," ")
         %>=10 $(%) = $($(%),2)
        $(%) = $17+$(128+%-(%>7))+$(%)+$17+$128
       %
 
       3
      
      % = 13
       % = %  1  -1
        (%,1)
      
       (0,0) "   " $
       (0,0) (20);
      (%,1,2,3)
       30
      
 
       (%,%,%,%)
       %=0 
      (%-1,%,%,%)
      (%,%)
      (%,%)
      (%-1,%,%,%)
      
 
       (%,%)
      (13+26*(%-1)-%,20-%(%))$(%);
      %(%) = %(%)+1
      
 
       (%,%)
      %(%) = %(%)-1
      (13+26*(%-1)-%,20-%(%))$(2*%+1," ");
      

( ( 
  =      
    .   !:(?,?,?,?)
      & (   !:>0
          & $(!+-1,!,!,!)
          & $("    " ! "   " !)
          & $(!+-1,!,!,!)
        | 
        )
  )
& $(4,1,2,3)
);

[
     
 ,      8
 .     :
 
   
   0    
       (      
        )
   1       
       
       4    
               (, , ,  - 1)
       3    
               (, , , 1)
       2    
               (, , ,  - 1)
       1      
   2        
             
           
   3        
          
   4     
   5     
   6     
   7        
 
    (0 0 0 0 0 0 0 0)
     .
]
 
>>>>>>>>
 
      
(1 4 1 0 ' ' ' 5)
+>++++>+>>
>>>>++++++++[<++++++++++++>-]<
[<<<+>+>+>-]<<<+>++>+++>+++++>
<<<<<<<<
 
[>  ()
  [-  (  0)
    >[-]+<  = 1
    [-  (  1)
      [-  (  2)
        [-  (  3)
          >>+++<<  = 3
          >-<  = 0
          >>>>>>[>+>+<<-]>[<+>-]>  
          -
          [[-]  (( 1)  0)
            <+>>>++++>  (1 0 0 4)
 
               
            <<<<<<<<[>>>>>>>>+>+
            <<<<<<<<<-]>>>>>>>>
            >[<<<<<<<<<+>>>>>>>>>-]< >
 
               
            <<<<<<<[>>>>>>>+>+
            <<<<<<<<-]>>>>>>>
            >[<<<<<<<<+>>>>>>>>-]< >
 
               
            <<<<<<<<<[>>>>>>>>>+>+
            <<<<<<<<<<-]>>>>>>>>>
            >[<<<<<<<<<<+>>>>>>>>>>-]< >
 
                ( 1)
            <<<<<<<<[>>>>>>>>+>+
            <<<<<<<<<-]>>>>>>>>
            >[<<<<<<<<<+>>>>>>>>>-]< -
            >>
          ]
          <<<<<<<<
        ]
        >[-<  ((  2)  )
          >>++<<  = 2
          >>>>>>>
          +>>>+>  1 0 0 1    1
          <<<<<<<<[>>>>>>>>+>+
          <<<<<<<<<-]>>>>>>>>
          >[<<<<<<<<<+>>>>>>>>>-]< > 
          <<<<<<<<[>>>>>>>>+>+
          <<<<<<<<<-]>>>>>>>>
          >[<<<<<<<<<+>>>>>>>>>-]< > 
          <<<<<<<<[>>>>>>>>+>+
          <<<<<<<<<-]>>>>>>>>
          >[<<<<<<<<<+>>>>>>>>>-]< > 
          + >>
        >]<
      ]
      >[-<  ((  1)  )
        >>>>>>[>+>+<<-]>[<+>-]>  
        -
        [[-]  (  1  0)
          <+>>>++++>  (1 0 0 4)
 
             
          <<<<<<<[>>>>>>>+
          <<<<<<<-]>>>>>>>
          >[<<<<<<<<+>>>>>>>>-]< >
 
             
          <<<<<<<<<[>>>>>>>>>+
          <<<<<<<<<-]>>>>>>>>>
          >[<<<<<<<<<<+>>>>>>>>>>-]< >
 
             
          <<<<<<<<[>>>>>>>>+
          <<<<<<<<-]>>>>>>>>
          >[<<<<<<<<<+>>>>>>>>>-]< >
 
              ( 1)
          <<<<<<<<[>>>>>>>>+>+
          <<<<<<<<<-]>>>>>>>>
          >[<<<<<<<<<+>>>>>>>>>-]< -
          >>
        ]
        <<<<<<<<
      >]<
    ]
    >[-<  ((  0)  )
      >>>>>>>
      >++++[<++++++++>-]<
      >>++++++++[<+++++++++>-]<++++
      >>++++++++[<++++++++++++>-]<+++++
      >>+++++++++[<++++++++++++>-]<+++
      <<<
      >.+++++++>.++.--.<<.
      >>-.+++++.----.<<.
      >>>.<---.+++.>+++.+.+.<.<<.
      >.>--.+++++.---.++++.
        -------.+++.<<.
      >>>++.-------.-.<<<.
      >+.>>+++++++.---.-----.<<<.
      <<<<.>>>>.
      >>----.>++++++++.<+++++.<<.
      >.>>.---.-----.<<<.
      <<.>>++++++++++++++.
      >>>[-]<[-]<[-]<[-]
      +++++++++++++.---.[-]
      <<<<<<<
    >]<
    >>[<<+>>-]<<  = 
  ]
      
  <[-]>[-]>[-]>[-]>[-]>[-]>[-]>[-]<<<<<<
  <<<<<<<<
  >>[<<+>>-]<<  = 
  <
]

# <.>
 
 ( ,  ,  ,  )
{
   ( > 0) {
    ( - 1, , , );
    ("    %   %\", , );
    ( - 1, , , );
  }
}
 ()
{
  (4, 1,2,3);
   0;
}

# <.>
# <.>
# <.>
 
  {  *, ; } ;
 *_( )
{
	 * = (1, () + () * );
	-> = (*)( + 1);
	 ;
}
 
 *[3];
 ;
 
 ( ,  ,  ,   *)
{
	("\033[%;%",  -  + 1, ( + 1) * (2 *  + 1) - );
	 (--) ("%", );
}
 
 _( ,  )
{
	[]->[[]->++] = ;
	([]->, , , "==");
 
	(100000);
	();
}
 
 _( )
{
	  = []->[--[]->];
	([]-> + 1, , , "  ");
	 ;
}
 
 ( ,  ,  ,  )
{
	 (!) ;
 
	( - 1, , , );
	_(, _());
	( - 1, , , );
}
 
 ( ,  *[])
{
	("\033[\033[");
 
	 ( <= 1 || ( = ([1])) <= 0)
		 = 8;
	 ( = 0;  < 3; ++)	 [] = _();
	 ( = ; ; --) _(0, );
 
	(, 0, 2, 1);
 
	(1, 0, 1, "\");
	 0;
}

   ( ,  ,  ,  ) {
    ( == 1) {
     ..("    " +  + "   " + );
   }  {
     ( - 1, , , );
     (1, , , );
     ( - 1, , , );
   }
 }
 
  ( ,  ,  ,  ) {
   ( == 1) {
    :: << "    " <<  << "   " <<  << ::;
  }  {
    ( - 1, , , );
    (1, , , );
    ( - 1, , , );
  }
}

( -- [   ]
  ( (=  1)
    ( ( "  %  %"  ))
    (
      (-- ( )   )
      ( ( "  %  %"  ))
      ( ( )   ))))
      
       >> 
 .
-. --.
 
 .
     "-"  4, 1, 2, 3
    .
  --.
 
 .
-. - .
 
 .
 .
01                            9  .
01  -                  9  .
01  -                    9  .
01  -                   9  .
 
   , -, -, -.
      > 0
        1  
        "-"   , -, -, -
        "    " - "   " -
        "-"   , -, -, -
    -
    .
  -.

 = (, _=1, _=3) ->
   
    _ = 1 + 2 + 3 - _ - _
    (-1, _, _)
    . "  #{}   #{_}  #{_}"
    (-1, _, _)
 
(4)

(  (   )
  ( ((=  1)
         (  "  ~  ~.~%"  ))
        (
         ( (-  1)   )
         (  "  ~  ~.~%"  )
         ( (-  1)   ))))
         
 .;
 
 (  ,   ,   ,   ) {
     ( > 0) {
        ( - 1, , , );
        ("  %  %  %", , , );
        ( - 1, , , );
    }
}
 
 () {
    (3, '', '', '');
}

//        . ,
//     .  (2000).
 ( [] ) {
     .., ., .;
 
     _  = (. > 1) ? [1].!_ : 3;
    _[3]  = [(1 << ) - 1, 0, 0];
 
    //       .
    '|'.;
    _ ( ; 1 ..  + 1)
        (" %", );
    "\|\|".;
 
     ( _ ; 1 .. (1 << )) {
        {
             _ 1 =  & ( - 1);
             _  = (1 + 1 / 3) & 3;
             _ 2 = ( | ( - 1)) + 1;
             _  = (2 + 2 / 3) & 3;
 
            _  = 1;
             (_  = ; !( & 1);  >>= 1,  <<= 1) {}
 
            //           ,
            //        :
            [] &= ~;
            [] |= ;
        }
 
        //      .
         ( _ ; !(0, 1, 2)) {
            "\|".;
            _  = 1 << ;
            _ ( _ ; 1 ..  + 1) {
                 >>= 1;
                 ( & [])
                    (" %", );
            }
        }
        '\'.;
    }
}

() { 
  (,) {
    (" ${} ---> ${}");
  }
 
  (,,,) {
     (>0) {
      (-1,,,);  
      (,);
      (-1,,,);
    }
  }
 
  (3,3,1,2);
}

() {
   ( ,  ) => "$ ---> $"; 
 
  ( ,  ,  ,  ) {
     ( > 0) {
      ( - 1, , , );  
      ((.(), .()));
      ( - 1, , , );
    }
  }
 
  (3, 3, 1, 2);
}

 [ # (, )
               #  
    [ --> ]    #  " --> "
               #  \
              #  ' ,      
 ]
 
 [ # ()
              #    
    9           #     
              #   
    1           # "" ' 
    3           # "" ' 
    0           #  
 ]
 
 [ # ()
              #  
              #  
             #  (, )
 ]
 
 [ #   <>
              #  
              #  
              #  
    1           #    1
              #  
    1           #  1
    -           #  - 1
              #  
              #  
    0           #    0
 ]
 
 [ #   <>
              #  
    1           #  1
    -           #  - 1
              #  
              #  
    0           #    0
 ]
 
 [ #   <>
     1 =
     1 !=
 ]
 
 [ #   <>
    
    
 ]
 
 [ # ()
               #   
 ]
 
 [ # ()
     9 =      #   , ()
              # 
              # 
              # 
              # 
    6           #
              #
    -           #
              #
    -           # 6 -  - 
              #
     0 =     #
     0 !=    #
             # 
 ]
 
 5 # ()
  # ()
 
  (, , , , ) {
     (.()) {
        (, .(), , , )
        .(`  $  $  $.`)
        (, .(), , , )
    }
}
 
(, 4,   {},   {},   {})


	
 

	
 
 {} -- 
 
	
		
			 (4, "", "", "")
		
 
 --   
 
	 (: ; , , : )
		
			 > 0
	    
			  = 1 
    			 ("    " +  + "   " +  + "%")
    		
    			 ( - 1, , , )
    			 (1, , , )
    			 ( - 1, , , )
	        
	    


  
:::
 
// 
 0 _ _ _ = []
     =  ( - 1)    ++ [(,)] ++  ( - 1)   
 
  = _  $   1 2 3 
   (,) =  $ " " ++   ++ "  " ++  
 
//    
  = '  1 2 3 
  ' 0 _ _ _ =  ()
  '     = 
    ' ( - 1)   
     $ " " ++   ++ "  " ++  
    ' ( - 1)   
    
  
   ()  0<  <10, : (, 1, 2, 3)
 
   (1, , _, ), : (, )
   (, , , ) 
    (-1, , , )
    (, )
    (-1, , , )
  
 
   (, ), : . "   #{}  #{}"

 
.(3)

(  (   )
  ( ((=  1)
         ( ( "  %  %"  )))
        (
	 (
	   ( (-  1)   )
	   ( ( "  %  %"  ))
	   ( (-  1)   )))))

(1, , , _) -> 
  :("  ~  ~~", [, ]);
(, , , ) -> 
  (-1, , , ), 
  (1  , , , ),
  (-1, , , ).
  
!-----------------------------------------------------------
! . :         
!  .
!-----------------------------------------------------------
 
 
 
!$
 
! ,,,
 
 
   $,$
  =+1
    
     1-> $=""  ->
     2-> $=""  ->
     3-> $=""  ->
   
    
     1-> $=""  ->
     2-> $=""  ->
     3-> $=""  ->
   
  ("     ";$;"  ";$)
 
 
 
   <>0 
     =-1
     =6--
     
     =6--
     
     =6--
     
     =6--
     =+1
   
 
 

  =12
  =0
  ($(12);(25);"---    ---")
  
     ("   ";)
     ()
   >1  <=
  
  (" ";;"      ";2^-1)
  =1  !    
  =3  !    
  
 

#
      =
    
  | 0 -> [ ]
  | _ ->   = (6 -  - )
         ( (-1)  ) @ [ ,  ] @ ( (-1)  )
 
[<>]
   =
  ( 4 1 2) |> . (  ->   
                                          | ,  ->  "   %  %\"  )
  0

["   "$!\"  "$!\"
"]:  {   }
[;0>[;1-: @\ ;! @\ ;! \@ ;! \@ ;1+:]?]:  {    }
4:[""][""][""];!%%%

:     ;
: .
 
:  (   -- )
    "%->%\"  ;
::  (     -- )
     0 > [
         1 -    
          
         1 -    
    ]  ;

 1 ,"  "   
 2 ,"  " 
 3 ,"  " 
 
: .$     ;
: - 
  |     | 
   1 =
      ."    "  .$ ."  "  .$ 
    1-     
       1        
        1-     
   ;
  
:    ." " ;
:   ." " ;
:  ." " ;
 
: - (     --    )
   0=    
  1-       >
    @ (    -1 ) 
   
  2  ."    "  ."   " 
    > (    -1 ) 
    ;
:  (  -- )
  1  > [']  [']  [']  > -    ;

 
 
   (4, 1, 2, 3)
 

 
    (, , , )
    ,  () :: , , , 
 
     ( == 1) 
       (*, "(,1,,1)") "    ", , "   ", 
    
        (-1, , , )
        (1, , , )
        (-1, , , )
     
    
 
  

 := ()
	 ;
	 := (, , , ) # , , 
		  = 1 
			(, " -> ", , "\");
		
			( - 1, , , );
			(1, , , );
			( - 1, , , );
		;
	;
	(, "", "", "");
;

 ""
 
   (   ,   ,   ,    )
  > 0
    ( -1, , ,  )
    "   "; ; "  "; 
    ( -1, , ,  )
 
 
 
 ( 4, 1, 2, 3 )

 "    ."


 
 
 ""
 
//         , 
   {
    ()
}
 
 () {
          //     
     = () //      
    .(4)
}
 
//        
   {
    //   .         
    //  ,    ,   
    // .
}
 
//         
 ( *) ( ) {
    //   ,   
    .(, 1, 2, 3)
}
 
//  
 ( *) (, , ,  ) {
      > 0 {
        .(-1, , , )
        .1(, )
        .(-1, , , )
    }
}
 
//      .
//       .
 ( *) 1(,  ) {
    .("   ", , " ", )
}

 
 
 ""
 
 () {
	(3, "", "", "")
}
 
 ( 64, , ,  ) {
	  > 0 {
		(-1, , , )
		.("   " +  + "  " + )
		(-1, , , )
	}
}

  = { ,  ->    = .(); [([ - , 0].())..<] }
 
  = [:[],:[],:[]].()
 
  = {  -> }
  = {  -> }
 
  = { ,  ->   << .(); (); () }
 
 
 = { , ,  = .(). { !(.() || .()) } ->
     (!) 
      = .()
    ((, -1), , )
    (, )
    ((, -1), , )
}

  {
    ('°'), (''), (''), ('( )');     
     () { .= }
     () {  }
}
 
 = { . { ,  ->   "${}: ${}" }; () }
 = {  ->   == ([] + ).().() }
 
.(). { . <<  }
()
(.)
(., .)

 ::  ->  ->  ->  -> [(, )]
 0 _ _ _ = []
     =  (-1)    ++ [(,)] ++  (-1)   

  = _  $   1 2 3 
   (,) =  $ " " ++   ++ "  " ++  
  
 ::  ->  ()
  = '  1 2 3 
  ' 0 _ _ _ =  ()
  '     = 
    ' (-1)   
     $ " " ++   ++ "  " ++  
    ' (-1)   
    
 ()
([1]) | (":  \\        .")

 
# (:, 1:1, 2:2)   #      1,2,3 
 
 (, 1, 2)   #:            1  2  
 
 
 := (0 < ) | (,101)       # 1   (   '  )
/1 := 1                             # 2 
/2 := 2                             # 3 
 
  = 1 
   ("   ", 1, "  ", 2)
 {
    := 6 - 1 - 2         #    -    
   (-1, 1, )             
   ("   ", 1, "  ", 2)
   (-1, , 2)            
}



   .
 
      .       .
 
  ,   ,        .
 
      .
         .
         .
         .
         .
 
:         .
 
  :
	 4             .
 
  ( - ) /  ( - )  ( - )  ( - ):
	  > 0:
		  - 1       ;
		 "    []  []...";
		         ;
		    ( )    ,     ;
		     ;
		  - 1       .
		
 := (, , , ,
   ( == 1)  (
    ("  ", , "  ", )
  )  (
    ( - 1, , ,   )
    (1    , ,  ,  )
    ( - 1,  ,  , )
  )
)

 = (, , , ,
  ( < 2,
    "#{} --> #{}" ,
 
    ( - 1, , , )
    "#{} --> #{}" 
    ( - 1, , , )
  )
)
 
 = (,
  (, 1, 2, 3)
)

 =: .@,&2 ` (({&0 2 1,0 2,{&1 0 2)@$:@<:) @. *    .    

1=:                                     .    
  .  .
    ({&0 2 1 , 0 2 , {&1 0 2) 1 -1
  .
    .0 2
  .
)

=:  
  =.  
  =.  $~` ((],[,]) $:@<:) @.* 
  ('  ';'   ';'   ');@,."1 ":&.>,.1+
)

  ( ,  ,  ,  ) {
   ( == 1) {
    ..("    " +  + "   " + );
  }  {
    ( - 1, , , );
    (1, , , );
    ( - 1, , , );
  }
}

 (, , , ) {
   ( > 0) {
    (-1, , , );
    .("   " +  + "  " + );
    (-1, , , );
  }
}
(4, "", "", "");

( () {
 
  //  ::  ->  ->  ->  -> [[, ]]
   (, , , ) {
      ? ( - 1, , , ).(
      [[, ]]
    ).(( - 1, , , )) : [];
  }
 
   (3, '', '', '')
  .( () {
     [0] + ' -> ' + [1];
  });
 
})();

  == [[] ]  
                [ [ [] [ ] ] 
                  [ [2 [[] ]  ] 
                    [ [  ]  
                      [[] ]   ] 
                    [] ] ] 
                .
                
#            
 (; ; ; ):
    > 0 
     #          (   ):
     (-1; ; ; ),
     # ...               :
     "   \()  \()",
     #        :
     (-1; ; ; )
   
  ;          

  :{[;;;][>0;_[-1;;;];`0:,//$($,":",$,"->",$,"\");_[-1;;;]]}
   [4;1;2;3]

#!///9
 
 (
	::,
	,,
) => {
	(# > 0) => {
		(# - 1, #, #, # )
		("   " + # + "  " + #)
		(# - 1, #, #, # )
	}
}
 
((($ ->  || 3)), "", "", "")

  $ =""
    $    =""
    $ =""
 
      4, $, $, $        '         4          
 
    
 
      , $, $, $
          =0 
             
        
               -1, $, $, $
             "   "; ; "   "; $; "   "; $
               -1, $, $, $
         
     
 
    

  : : : :
   : = 0 []
   :-1 : : :
  ( [  ] : [] :)
   :-1 : : :

 4 " " "

:- ().
 
    :- (/1).
    :- ((+), ).
    :- (/1, [
          '           .',
          ['']]).
 
    () :-
        (, , , ).
 
    (1, , _, ):-
        !,
        (, ).
    (, , , ):-
        2   - 1,
        (2, , , ),
        (, ),
        (2, , , ).
 
    (1, 2):-
        ('    '),
        (1),
        ('  '),
        (2),
        ('.'),
        .
 
:- _.


 
              
       " ="  " ="  " ="  " ="  
        0,  ?
         
              "."
            
         
                     1
                
              "  "  "  "  ... 
            "  "  
                
    
   
 
 2 3 1 4    ?
 


 (, , , )
      > 0 
        ( - 1, , , )
        (, '', )
        ( - 1, , , )
    

 
(4, 1, 2, 3)

[0, _, _, _] :=   
[_, _, _, _] :=
  ([-1, , , ];
   ["    ", , "  ", , "."];
   [-1, , , ])
   
 (,,,)
     (~=0)
        (-1,,,);
        (('  %   %   %',[  ]));
        (-1,,,);
    


   ;
 
   ;
   ;
 
 (, , , : ) =
  
      > 0 
      ( - 1, , , );
      (" " & () & " --> " & () & "\");
      ( - 1, , , );
    ;
   ;
 

  (4, 1, 2, 3);
 .

 (, , , ):
     ( > 0):
        (.(), , , )
        (`  $  $  $`)
        (.(), , , )
 
(3, "", "", "")
 ; 
 .;
 
 
{
    ( : ,  = 1,  = 3,  = 2) : 
    {
         ( > 0)
        {
            ( - 1, , , );
            ("    {0}   {1}", , );
            ( - 1, , , );
        }
    }
 
    () : 
    {
        (4)
    } 
}

/*  */
       
 
()

 
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 ()  
     .
    = '',  < 1   = 4
   '   :' 2 **  - 1
   = ()
   ' '  '.'
  
 
-- ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 ( =  4,  =  1,  =  2,  =  3,  =  0)  
    == 1  
     =  + 1
     '   '  ' '  '-  :' ().(5)
    
   
     = ( - 1, , , , )
     = (1, , , , )
     = ( - 1, , , , )
    
   
 
 
 ( (    )
			( (>  0) 
				( (-  1)   
				( "    "  "   "  "\")
				( (-  1)   ))))
 
( 4 1 2 3)

 (: , : , : , : ) =
    != 0:
    ( - 1, , , )
    ("  ", , "  ", , "  ", )
    ( - 1, , , )
 
(4, "1", "2", "3")

  {
   : ( : []) ~  {
    (4, 1, 2, 3);
  }
 
  : (:, :, :, :) ~  {
    ( = 1) {
      "    {$}   {$}"->();
    }
     {
      ( - 1, , , );
      (1, , , );
      ( - 1, , , );
    };
  }
}

# </.>
 
@ :  {
	 ;
	 ;
	 ;
	 ;
}
 
-() : ()  : ()  : ()  : () ;
-() : ()  : ()  : ()  : () ;
@

# "."
@ 
 
-() : ()  : ()  : ()  : ()  {
	 = ;
	 = ;
	 = ;
	 = ;
}
 
-() : ()  : ()  : ()  : ()  {
	 ( == 1) {
            ("    %   %\", , );
        }  {
 			[ :  :  :  : -1];
			[ :  :  :  : 1];
			[ :  :  :  : -1];
        }
}
 
@

# <.>
# "."
 
 (  ,   *[] ) {
	@ {
 
		 * = [[ ] ];
 
		  = 1;
		  = 3;
		  = 2;
		  = 3;
 
		[ :  :  :  : ];
 
		[ :  :  :  : ];
 
	}
	 0;
}

       =
    <> 0  
     ( )   ;
    . "    %   %\"  ;
     ( )   
  
 
 () =
   4 1 2 3
  
 (, , , )
   (  == 1 )
    ("    %   %\", , );
  
    (-1, , , );
    (1, , , );
    (-1, , , );
  

 
(4, 1, 2, 3);

: (, , , )
    0 > : [
      ( 1-, , , )
      . "   " <<  << "  " <<  << 
      ( 1-, , , )
      ] ;
 
5 $ $ $)  


   {    }
       > 0 
        { -1   }
        {. "  "##"  "#}
        { -1   }
     
  

  { 4   }
  
\\   
\\ 8/19/2016 
\\ :  -   ,  -  ,  -  .
(,,)={
  (!=0, 
    (-1,,6--);
    ("  ", , "   ", ,"   ", );
    (-1,6--,); 
    );
}
\\  =3:
(3,1,3);

 ;

   = (, , );

  :[]  [6]=('','','');
 
   (  : ;  ,,:);
 
    >0  
     ( - 1, ,,  );
     ('  ', ,'  ',[],'  ',[]);
     ( - 1, , , );
  ;
 ;
 

 (4,,,);
.

 ;

   = (, , );

  :[]  [6]=('','','');
 
  ( :;  ,:);
 
  ('  ',,'  ',[],'  ',[]);
 ;
 
   (  : ;  ,,:);
 
    =1 
       (1,,)
   
       ( - 1, ,,  );
       (,,);
       ( - 1, , , );
  ;
 ;
 

 (4,,,);
.

  {
     ($, $, $, $) = (@_, 1, 2, 3);
 
     ($ == 1) {
         "    $   $.\";
    }  {
        ($ - 1, $, $, $);
        (1, $, $, $);
        ($ - 1, $, $, $);
    };
};

     1|2|3;
 
  (0,       $,      $,      $)     { }
  ( $,  $ = 1,  $ = 2,  $ = 3) {
     $ - 1, $, $, $;
     " $  $.";
     $ - 1, $, $, $;
}

 ;
 
 ;
 
@ (@ , @ , @ , @ ) [
	 ( > 0) {
		( - 1, , , );
		("    %   %\", , );
		( - 1, , , );
	}
]
 
@  [
	(4, 1,2,3);
	 0;
]

 ($,$,$,$) {
     ($ === 1) {
        ("    $   $");
    }  {
        ($-1,$,$,$);
        (1,$,$,$);
        ($-1,$,$,$);
    }
}

(  (   )  # : ( 3 ' ' ')
   ( (=0 )
      ( ( )   )
      ( ' ' '  ' )
      ( ( )   ) ) )
      
 (, , , );
  > 0 
    ( - 1, , , );
    '  ' ><  >< '  ' ><  >< '  ' ><  >< '.' =>
    ( - 1, , , );
;
;
 
(4, "", "", "");

:   ();
 
     (4,1,2,3);
 
:  (, , , ) ;
    (, , , )  ;
 
     = 1 
         ('    ', (), '   ',
         () ) ();
   
      ;
           (-1, , , );
           (1, , , );
           (-1, , , );
      ;
 ;
 
 ;

\\
\\#1{%
  \ = #1
  \ 
}%
\\#1#2#3{%
  \ \  -1
  \ \ > 0
    \ #1#3#2
  \
        #1   #3.\
  \ \ > 0
    \#2#1#3
  \
  \ \  1
}
 
\{5}
\

%!--3.0
%%: 0 0 300 300
 
/ {
         100  50     10  
            2  0 
           0 
        0  
           0 
          .5    0  
} 
 
/ {
        0 1 2 { /   / 0 
                   {
                         0  {    /  1   } {} 
                } 
        }  
} 
 
/ { [    /   ]  } 
/{ [ 3 1     -1  ] } 
 
/ {
        0   / / / / 5 -1 2 { -1   } 
         1  {        
                       
                  3 -1  
                  3 -1  
                
        } {     
                /  1  
                    
                   1 
                    
        } 
        
} 
 
 
/ 12 
/ 90   
/ 180   
/ [ [ 1  -1 2 { }  ] [] [] ] 
 
 0 1 2  
 
%%

 ($, $,  $, $) {
    ($ - 1) {
        "$ -> $"
    } {    
          ($ - 1) $ $ $
          1 $ $ $
          ($ - 1) $ $ $
    }
}
 3 "" "" ""

() :- (,,,).
 
(0,_,_,_) :- !.
(,,,) :-
      -1,
    (,,,),
    (,),
    (,,,).
 
(,) :- ([,,,,,,,,,]), .

(, , , , -) :-
    2^ - 1,
  (, ),
  ((, , , ), ).
 
 
(1, , _, ) --> !,
  [->].
 
(2, , , ) --> !,
  [->,->,->].
 
(, , , ) -->
  { (0, ) },
  (0, , , ),
  (1, , , ),
  (0, , , ).
  
   (, ., ., .)
   
    (-1, , , )
    ("    "++"  "+)
    (-1, , , )
  


 (, ., ., .)
   
    (-1, , , )
    ("    "++"  "+)
    (-1, , , )
  

 
 ()
   =3
  (" "+()+" ."+#$)
  (," "," "," ")
  (#$+"   ."): ()


 (, =1, =3):
     :
        (-1, , 6--)
         "  %   %   %" % (, , )
        (-1, 6--, )
 
(=4)

 <- (, , , ) {
   (  == 1 )
    ("  ", , "", , "\")
   {
    (-1, , , )
    (1, , , )
    (-1, , , )
  }
}
 
(4,1,2,3)

# 
( (    )
  ( (>  0)
    ( (-  1)   )
    ( " ~  ~\"  )
    ( (-  1)   )))
( 4 ' ' ')

  (, , ){
	(>0){
		(-1, , 6 -  - );
		("  <>   <>   <>");
		(-1, 6 -  - , );
	}
}

   , , 
    0 > 
      6  -  -   1 - 
         "  %   %   %\"  
       6  -  -  1 - 
 
   
   # =1, =3
   3 1  
 
# 4 
4 

 [
	: "  "
	: 
	: 2009-12-08
	: ://.//__
]
 
:  [
	{          .
	 :    ,    .}
	 [!] "     ."
	/ " ."
	  
][
      = 0 []
	   [: '  : '  : ']
 
    /  - 1   
	 [ "->" ]
    /  - 1   
]
 
 4

4     
 
:  ! ! ! ! ;
:  (     -- )
  
  @ 0 <>
  [
    @ @ @ @
    @ 1- @ @ @ 
    
    @ @ "\    %  %" 
    @ 1- @ @ @ 
  ]  ;
 
4 1 3 2 

/*                  (    ).  */
   .                                    /*      .*/
 =='' | ==","   =3                      /* ?     .*/
#=0                                              /*#:       ( )*/
=2** - 1                                       /*:   "     "    "  #  .*/
   1, 3,                                 /*   ,    ... */

 '        '      "-      "      
                                             /*    ,  '  . */
/*--------------------------------------------------------------------------------------*/
:  #=#+1                                      /*  ()    . */
       ''  (#, ())":     "    (1)    '-----'    (2)
                                           /* [ ]      ()*/
/*--------------------------------------------------------------------------------------*/
:    # ;                 @1,  @2,  @3
       @3==1     @1,  @2
                 ;    @1,        6-@1-@2,   @3-1
                            @1,        @2,        1
                            6-@1-@2,   @2,        @3-1
                     
      
      
/*                  (    ).  */
   .                                    /*      .*/
 =='' | ==","   =3                      /* ?     .*/
=80;     =%3-1;     =('', )    /*    .  */
.1=  % 3 % 2                                  /* [ ]  :    */
.2=  % 2 - 1
.3=  - 1 - .1 - 1
#=0;       =2**-1;      =                /*#; #  ;   .*/
@=''                /*     .*/
= ('0'==0)                               /*     .*/
 
   ;   = '';    = "";     = '99';         = "9"
                      = '';    = "";     = '';   = "";     = ''
               
           ;   = '4';    = "10";     = '012';         = "18"
                      = '';    = "0";     = '9';   = "3";     = ''
               
 
=  || ;       =     || 
=  || ;       =     || 
  = (, 1);     =  || @
$.=0;    $.1=;    =;    =+
 
   =1   ;   @.3.=;     @.2.=;     @.1.=( ( , ), )
   <=()   @.1.= (@.1., , ( , %2, 1), )
  = - 2
     /**/                                    /*     .*/
 
 ;     1,3,;   
 '        '      "-      "      
                                             /*    ,  '  . */
/*--------------------------------------------------------------------------------------*/
:    ;  #=#+1;  =
      ==1   ;  =(,  , .1)
                           =(, , .1+1, .-.1-1, ) || 
                      
      ==2   
                      =(2, )
                      =(2, )
                       ==1   ;  =(,  , .1)
                                            =(, , .1+1, .2-.1-1, )||
                                       
                       ==3   ;  =(,  , .2)
                                            =(, , .2+1, .3-.2-1, )||
                                       
                      
      ==3   ;  =(,  , .3)
                           =(, , .+1, .3-.-1, )
                           =(,  , .)
                      
      (, ,  ||  || );     (,,1)
      (, ,  ||  || )
      (, ,  ||  || );    =-1
     $.=$.-1;      $.=$.+1;    _=$.+1;    _=$.
     @.._=@.._;  @.._=;    
     
/*--------------------------------------------------------------------------------------*/
:  (3)==1     (1) (2)
                    ;    (1),          6-(1)-(2), (3)-1
                               (1),          (2),          1
                               6-(1)-(2), (2),          (3)-1
                        
     
/*--------------------------------------------------------------------------------------*/
:  =   -1   ; _=@.1. @.2. @.3.;   _\=''    _; ;  

(4, 1, 2, 3)
 
  , , , 
       > 0 ( - 1, , , )
         "" +  + "  " +  + 
        ( - 1, , , ) 
        
 (_, =0, =1, =2)
   _ == 1
   @[] << @[].
     "   #{}  #{} : #{@}"
  
    (_-1, , , )
    (1,           , , )
    (_-1, , , )
   

 
 = 5
@ = [[*1..]., [], []]
()

# (, , )
# :
# ([5, 4, 3, 2, 1], [], [])
#        ,
# "        ".
 (*)
  #    
   = .(0){|, | +.}
  =0 #  
    #  
  #      ?
   .. <  
    +=1 #    
     = (&-1)%3
     = ((|(-1))+1)%3
    #      ?
      = [].
       = [].
      #    ?
       ! ||  > 
        # ,  !
        [].([].)
          # 
      
    
  

 
([5, 4, 3, 2, 1], [], [])

 = (4, "1", "2", "3")
 (, $, $, $) 
  > 0 
	 = (-1, $, $, $)
	 "   " ; $ ; "  " ; $
	 = (-1, $, $, $)
 
 

 _(: 32, : 32, : 32, : 32) {
      > 0 {
        _( - 1, , , );
        !("    {}   {}", , );
        _( - 1, , , );
    }
}
 
 () {
    _(4, 1,2,3);
}

  
 
  (, , , :) 
      = 1 
      # + "    " +  + "   " +  + "\";
    
      (-1, , , );
      (1, , , );
      (-1, , , );
    ;
  ;
 
   
    (4, 1, 2, 3);
  ;
;

 (: , : , : , : ) :  = {
     ( == 1) {
      .("    " +  + "   " + )
    }  {
      ( - 1, , , )
      (1, , , )
      ( - 1, , , )
    }
  }
  
    {
   ..
 
   (:[_]): = {
      = .
    .(.('$')+1)
  }
 
   
    _0  
    [<:]  
 
   _1 = [_0]
   _2 = [_1]
   _3 = [_2]
   _4 = [_3]
 
    [<:,,,]()
 
    0[,,]( :[],:[]):[_0,,,] = {
        ..("  "+()+"  "+());
  }
 
    [<:,,,]( 1:[,,,],2:[_0,,,],3:[,,,])
   :[[],,,] = 
 
   [<:,,,]( :[,,,]) = 
 
    ()
    ()
    ()
 
   (:[]){
    [_2,,,]
  }
}

( (    )
  ( (>  0)
    (
      ( (-  1)   )
      ( "    ")
      ( )
      ( "   ")
      ( )
      ()
      ( (-  1)   ))))
 
( 4 1 2 3)

 :  ( : ,  : ,  : ,  : )  
  
      > 0 
      ((), , , );
      ("  " <&  <& "  " <&  <& "  " <& );
      ((), , , );
     ;
   ;
  
   (, =1, =2, =3) {
     ( == 1) {
         "    #{}   #{}.";
    }  {
        (-1, , ,   );
        (  1, ,  ,  );
        (-1,  ,  , );
    }
}
 
(4);

*       # :   
 
        ('(,,,)') :(_)
    = (,0) 1 :()
        ( - 1, , , )
          =  + 1
         =  ':    '  '  ' 
        ( - 1, , , ) :()
_
 
*       #   4 
        (4,'','','')


 (:, :, :, :) {
     ( > 0) {
        ( - 1, , , )
        ("   \()  \()")
        ( - 1, , , )
    }
}
 
(4, "", "", "")

 (:, :, :, :) {
   ( > 0) {
    ( - 1, : , : , : )
    ("   \()  \()")
    ( - 1, : , : , : )
  }
}
 
(4, :"", :"", :"")

  {}  {} _ 0
 
 _ {  { } { } { }} {
     {$ == 1} {
          {}  {} _ [ ]
         "$:   $  $"
    }  {
          -1
         $ $ $ $
         1  $ $ $
         $ $ $ $
    }
}
 
 4


|     |
[         ]  !
[ (     -- )
  !
   0 <>
  [
        
     1-    
    !
    ."     "  . ."  "  . 
     1-    
  ] 
]  

// : : : : :  <></> <>1.0.0.0.0</> < ></ > (=.) [, , , 07-02-2012 19:54:23]
 (  ,  ,  ,  ,   )
  (  == 0 )
  ()
 
 (  - 1, , , ,  )
 ( ( " ", " ", , " ", " ", " ", "'", , "'", " ", " ", " ", "'", , "'" ),  )
 (  - 1, , , ,  )

 
// : : : :  <></> <>1.0.0.0.6</> < ></ > (=.) [, , , 07-02-2012 19:40:45]
 (  ,  ,  ,   )
   = 0
 ()
  = ()
 ()
 ( , , , ,  )
 (  )

 
 ()
 1[255] = "4"
 (  ( ( ": : : :  = ", 1, ___ ) )  ( ( 1 ) > 0 ) ) () 
 ( ( 1 ), "", "", "" )


  _(4, 1,2,3)                  ' 4 , 3 

 
_ (4)
   (@ > 0) 
     _ (@ - 1, @, @, @)
     "    ";@;"   ";@
     _ (@ - 1, @, @, @)
  


#!//
 
()
{
   ="$1"
   ="$2"
   ="$3"
   ="$4"
 
   [[ "$" == "1" ]]
  
     "    $   $"
  
     $(($ - 1)) $ $ $
     1 $ $ $
     $(($ - 1)) $ $ $
  
}
 
 $1 $2 $3 $4

# 
 
 = ~&^& ^/~& ^|/~& ^|/ ^/~& ~&
 
#+
 
 = ^|(~&,' -> '--)* /4 <'','',''>

 (,,,)
	  > 0 
		 -1, , , 
		.. "   " &  & "  " & 
		..(1)
		 -1, , , 
	 
 
 
 4,1,2,3
..("    !")

#1=1; #2=2; #3=3; #4=4          //  4   1  2
("_")

 
//  
// #1 = , #2 = , #3 = , #4 =   
//
:_:
 (#4 > 0) {
    _(1,4)
        #9=#2; #2=#3; #3=#9; #4--       // #1  #3  #2
        ("_")
    _(1,4)
 
    _("    ")       //   
    _(#1, +)
    _("  ")
    _(#2, )
 
    _(1,4)
        #9=#1; #1=#3; #3 = #9; #4--     // #3  #2  #1
        ("_")
    _(1,4)
}


 
     (   ,    ,    ,    )
          > 0 
            ( - 1, , , )
            ..("  {0}  {1}  {2}", , , )
            ( - 1, , , )
         
     
 
     ()
        (4, 1, 2, 3)
     
 

 =12;
 
 (, , , );
  , , , ;
[  > 0 
    [(-1, , , );
    (0, "  ");  (0, );
    (0, "   ");  (0, );  (0, " .^^");
    (-1, , , );
    ];
];
 
(3, "", "", "")

<: ="">
<: =""/>
<: =""></:>
<: =""></:>
<: =""></:>
  <: ="$ &; 0">
    <:- ="">
      <:- =""    ="$ - 1"/>
      <:- ="" ="$"/>
      <:- =""   ="$"/>
      <:- =""  ="$"/>
    </:->
    <:>
      <:>   </:>
      <:- ="$"/>
      <:>  </:>
      <:- ="$"/>
    </:>
    <:- ="">
      <:- =""    ="$ - 1"/>
      <:- ="" ="$"/>
      <:- =""   ="$"/>
      <:- =""  ="$"/>
    </:->
  </:>
</:>

  :($  :, $  :,
    $  :, $  :)  ()* 
{
  ($ > 0)
   (
    :($ - 1, $, $, $),
    < ='{$}'><>{$}</><>{$}</></>,
    :($ - 1, $, $, $)
  ) 
   ()
};
 
<>
{
  :(4, 1, 2, 3)
}
</>

 (, ,,){
    (>0){
      (-1, ,,);
      ("    %   %".(, ));
      (-1, ,,);
   }
}
(3, 1,2,3);