Re: Is the number before, in or after the interval? using spaceship operator <=>

[LanX]

> It can be find using two basic comparisons.

Strange, I count 6 operations! :)

 floor (($i - $l ) / ($r - $l +1 )) <=> 0
   1        2      3     4    5      6

PS: Please don't post such stuff in SOPW without a clear question, you are keeping others busy moderating that stuff:

Tricks belong to Cool Uses For Perl

Opinions belong to Meditations

[rsFalse]

Hm.. yes.
And that is simpler solution with two basic comparisons:
map { ("-1", " 0", " 1")[ ($_ >= $l) + ($_ > $r) ] } -9 .. 10;

[LanX]

 ($_ > $r) - ($_ < $l)

Should already do (can't test on Android :)

update

tested! =)

  DB<41> sub tst { ($_ > $r) - ($_ < $l) }

  DB<42> $l=3;$r=6
 => 6

  DB<43> print tst(),"\t" for 0..9
 => ""
-1    -1    -1    0    0    0    0    1    1    1