Einführung

Kürzlich beschlossen ich und ein paar meiner Freunde, ein paar Karten zu spielen, und einer von ihnen schlug das Spiel 'Irish Snap' vor, das die Inspiration für diese Herausforderung war. Später erfuhr ich jedoch, dass das Spiel viele verschiedene Regeln enthält, mit denen Sie spielen können, von denen einige hier aufgelistet sind . Die Regeln, die in dieser Herausforderung enthalten sind, sind derzeit nicht auf dieser Seite aufgeführt, daher der Name "Variantenregeln".

Die Herausforderung

Geben Sie bei einer Reihe von 3 Karten einen Wahrheits- oder Falschgeldwert aus, je nachdem, ob sie in einem irischen Snap-Spiel einen gültigen Snap erzielen.

Eingang

Die Eingabe besteht aus einem Array von 3 Zahlen mit einem Bereich von 1 bis einschließlich 13, wobei 1 ein Ass darstellt, 11 einen Buben, 12 eine Dame und 13 einen König. Die Eingabe kann in einer beliebigen Reihenfolge von oben, Mitte und unten erfolgen.

Regeln

Die 4 verschiedenen Kriterien für einen Irish Snap sind:

• Die oberen und mittleren Karten sind gleich
• Die oberen und mittleren Karten haben einen Unterschied von eins
• Die oberen und unteren Karten sind gleich
• Die oberen und unteren Karten haben einen Unterschied von eins

Wenn eines dieser Kriterien erfüllt ist, müssen Sie einen Wahrheitswert ausgeben. Außerdem wird für die beiden Kriterien, bei denen die Karten einen Unterschied von 1 aufweisen müssen, ein Umlauf ausgeführt, was bedeutet, dass ein Ass und ein König einen Unterschied von 1 aufweisen und umgekehrt.

Testfälle

Input (Bottom, Middle, Top) -> Output
1 13 7 -> False
1 4 13 -> True
9 3 6 -> False
8 9 7 -> True
2 6 5 -> True
12 5 11 -> True
10 4 8 -> False
12 13 7 -> False
9 7 10 -> True
7 3 1 -> False
4 2 3 -> True

Python 3 , 38 Bytes

lambda x,y,z:{x-y,x-z}&{0,1,12,-1,-12}

Probieren Sie es online!

Gibt eine nicht leere Menge (truey) zurück, wenn gültig, eine leere Menge (falsey), wenn nicht. Übernimmt die Eingabe in der Reihenfolge von oben nach unten, kann jedoch für dieselbe Codegröße neu angeordnet werden.

Perl 6 , 16 Bytes

3>(*-(*|*)+1)%13

Probieren Sie es online!

Unbekanntes Lambda, das Eingaben als nimmt top, middle, bottomund eine Junction zurückgibt, die mit True oder False ausgewertet wird

05AB1E , 7 6 Bytes

α12%ß!

Probieren Sie es online!

Übernimmt Eingaben als [middle, bottom], top.

α        # absolute difference
 12%     # mod 12
    ß    # minimum
     !   # factorial

In 05AB1E ist nur 1 wahr. 0! und 1! sind beide 1, während keine andere Zahl eine Fakultät von 1 hat.

J , 12 Bytes

1 e.2>12||@-

Probieren Sie es online!

Nehmen Sie unten Mitte als linkes Argument, oben als rechtes Argument.

Die ursprüngliche Antwort wird als eine Liste eingegeben

J , 24 Bytes

1 e.2>#:@3 5(12||@-/)@#]

Probieren Sie es online!

• #:@3 5Die Binärzahlen 3 und 5 sind 0 1 1und 1 0 1sind die Masken für die mittlere / obere bzw. untere / obere Karte
• (12||@-/)@# Wir filtern die Eingabe mit diesen Masken, nehmen den abs-Wert der resultierenden Differenzen und dann den Rest, wenn er durch 12 geteilt wird (für den Ass-König-Fall).
• 1 e.2> ist eine der resultierenden Zahlen kleiner als 2, dh 0 oder 1?

JavaScript (ES6), 29 Byte

Übernimmt die Eingabe als ([bottom, middle])(top) .

Der Ausgang ist invertiert.

a=>c=>a.every(n=>(n-c)/2%6|0)

Probieren Sie es online!

JavaScript (ES6),  37-30  Bytes

1 Byte dank @Grimy gespeichert

Übernimmt die Eingabe als([bottom, middle])(top) .

a=>c=>a.some(n=>(n-=c)*n%72<2)

Probieren Sie es online!

Kohle , 12 Bytes

›²⌊﹪↔⁻Ｅ²ＮＮ¹²

Probieren Sie es online! Port of @ Grimys Antwort. Nimmt die Eingabe als drei separate Werte für bottom, middle, top und output unter Verwendung des booleschen Standardformats von Charcoal -für true, nichts für false. Erläuterung:

 ²              Literal 2
›               Is greater than
  ⌊             Minimum of
    ↔            Absolute value of (vectorised)
      Ｅ²Ｎ       First two numeric inputs as a list ([bottom, middle])
     ⁻          Minus (vectorised)
         Ｎ      Third input (top)
   ﹪            Modulo (vectorised)
          ¹²    Literal 12

Perl 5 -ap , 31 Bytes

$t=<>}{$\|=abs($t-$_)%12<2for@F

Probieren Sie es online!

Eingang:

bottom middle
top

Tatsächlich spielt die Reihenfolge von Mitte und Boden keine Rolle.

Ausgabe:

0für falsch; 1für wahr

Pyth , 12 11 Bytes

Übernimmt die Eingabe als [bottom, top, middle]oder [middle, top, bottom](beide funktionieren). Ausgänge [](Falsy in Pyth) , wenn es keine gültige Snap, ein nicht-leeres Array anders.

f>2%.aT12.+

Probieren Sie es online!

Wenn ein konsistenter Wahrheits- / Falschwert erforderlich ist, geben Sie .A+2 Bytes voran . Dann wird ausgegeben Trueoder False.

Erläuterung

  f             # Filter on lambda T:
   >2           # 2 > 
      .aT       #     abs(T)
     %   12     #            % 12
           .+   # the list of deltas (difference between consecutive elements)

.A (if required)# Any truthy values in the above list?

Edit: -1 mit einem anderen Ansatz

Gelee , 6 Bytes

ạ%12ṠƑ

Probieren Sie es online!

C (gcc) , 47 43 Bytes

f(b,m,t){return(1<<t-m|1<<t-b)&0x80101003;}

Probieren Sie es online!

Japt , 7 Bytes

d_aV <2

Versuch es

Gelee , 6 Bytes

I%12ỊẸ

Probieren Sie es online!

Ein monadischer Link, der die Liste von [middle, top, bottom]als Argument verwendet und 1für Fang und 0für keinen Fang zurückgibt.

T-SQL 2008, 40 Byte

PRINT 1/-~abs((@-@2)%12/2*((@-@3)%12/2))

Probieren Sie es online aus

[R], 23 Bytes

Eingabe als a = c (unten, oben, Mitte):

any(abs(diff(a))%%12<2)