/***************************** decode *****************************/ define base = 16, n = 3; path value[ n ]; path result[ 1 << n ]; input( "value", 10, 50, base, n ) { out value }; { in value } decode( n ) { out result }; for i from 0 upto 1 << n do { in result[ i ] } output( "result " & i, 10, 150 + 50 * i, base, 1 ); end