in reply to Re: Code for Constraint Satisfaction Problems
in thread Code for Constraint Satisfaction Problems

The following set contains 128 12-bit integers where w( x ^ y ) >= 5 
31 32 64 96 128 160 192 224 256 288 320 352 384 416 448 480 512 544 576 608 640...

check your program, w(32 ^ 64) is 2 < 5

  • Comment on Re^2: Code for Constraint Satisfaction Problems

Replies are listed 'Best First'.
Re^3: Code for Constraint Satisfaction Problems
by BrowserUk (Patriarch) on Jan 17, 2010 at 17:16 UTC

    Grrr. You're right! There is a big difference between: 

            my $n = unpack '%32b*', ( $set[ $x ] ^ $set[ $y ] );

    [download]

    and 

            my $n = unpack '%32b*', pack 'N`', ( $set[ $x ] ^ $set[ $y ] )
+;

    [download]
    Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
    "Science is about questioning the status quo. Questioning authority".
    In the absence of evidence, opinion is indistinguishable from prejudice.
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom