/*****************************
select
*****************************/

define base = 16, n = 8;

path flag;
path opd1[ n ];
path opd2[ n ];
path result[ n ];

input( "flag", 10, 50, base, 1 ) { out flag };
input( "opd1", 10, 100, base, n ) { out opd1 };
input( "opd2", 10, 150, base, n ) { out opd2 };

{ in flag, opd2 opd1 } select( 1, n ) { out result };
{ in result } output( "result", 10, 200, base, n );