Tri-interquine - Três programas que produzem um ao outro em um loop

10

Palavras - chave : Interquine

Programa A emite o código do programa B quando executado, e B emite a fonte de C e C emite a fonte de A.

Desta vez, você não pode trocar dois caracteres e trocar novamente :)

Requisitos:

  • Apenas um idioma em todos os programas
  • Aplicam-se restrições de brechas padrão
  • Todos os programas são diferentes. Um programa que sai em si não se qualifica. Dois que saem um ao outro também não se qualificam.
  • Todos os programas não estão vazios ou têm pelo menos 1 byte de comprimento.
  • Não há nada para ler porque o stdin está conectado /dev/null(você pode abusar dessa regra, se puder ). A saída vai para stdout.
  • Não use funções que geram resultados aleatórios.

Adicional:

  • Dê explicações, se possível

A pontuação é a duração da mais curta (você pode gerar um programa longo a partir de um curto?). Escreva a duração de todos os programas e destaque o menor número. A nova linha à direita não conta. Menor pontuação ganha .

iBug
fonte
2
Relacionado. (Mesma coisa, idiomas diferentes).
Martin Ender

Respostas:

19

Python 3 , 50 bytes

s='s=%r;print(s%%(s,%i*2%%7))';print(s%(s,1*2%7))

Experimente online!

A última expressão vai de 1*2%7para 2*2%7e 4*2%7depois para 1*2%7.

Freira Furada
fonte
6
Parece uma solução universal para o n-interquine. Você só precisa substituir 7 por (2 ^ n) -1.
iBug 7/07/2017
4
No Python 2, o mapeamento 1-2/_forma um ciclo com 3 (1,-1,3), o que salva um byte por não precisar ser escapado %.
Xnor
@iBug ou mesmo mais curto para grande n, s='s=%r;print(s%%(s,-~%i%%3))';print(s%(s,-~1%3))substituindo 3comn
PurkkaKoodari
4

RProgN 2 , 12 8 bytes

1
«\2*7%

Explicado

1   # Push the digit to the stack.

«\2*7%
«       # Define a function from here to the matching ». As there is no matching », define it from here to the end of the program, and continue running.
 \      # Flip the function under the constant number.
  2*    # Multiply by 2.
    7%  # Modulo 7.

Devido à natureza conveniente de como o RProgN gera como padrão, isso deixa o número, que faz um loop entre 1, 2 e 4, na primeira linha, e a versão restrita da função na segunda. Inspirado por @LeakyNun 's Python Resposta

Experimente online!

ATaco
fonte
4

CJam , 17 bytes

{sZZe\6Ye\"_~"}_~

{s6Ze\ZYe\"_~"}_~

{sZ6e\ZYe\"_~"}_~

Experimente online!

Provavelmente não é o ideal, mas essa é uma modificação da minha abordagem do desafio anterior .

A idéia básica é a mesma, mas realizamos dois swaps, um dos quais é sempre um no-op. Os índices afetados são 2, 3e 6:

1:     {sZZe\6Ye\"_~"}_~
ZZe\             does nothing
       {sZZe\6Ye\"_~"}_~
6Ye\     \   /
          \ /
           X
          / \
         /   \
2:     {s6Ze\ZYe\"_~"}_~
6Ze\      \  /
           \/    doesn't really do anything
           /\
          /  \
       {s6Ze\ZYe\"_~"}_~
ZYe\     \/
         /\
3:     {sZ6e\ZYe\"_~"}_~
Z6e\      \  /
           \/
           /\
          /  \
       {sZZe\6Ye\"_~"}_~
ZYe\     \/      doesn't really do anything 
         /\
1:     {sZZe\6Ye\"_~"}_~
Martin Ender
fonte
3

CJam , 14 bytes

{_]3/W="_~"}_~

{_]3/W="_~"}{_]3/W="_~"}_~

{_]3/W="_~"}{_]3/W="_~"}{_]3/W="_~"}_~

Experimente online!

Os outros programas têm 26 e 38 bytes, respectivamente.

Explicação

Mais uma abordagem!

{       e# Again, the usual quine framework. In this case, there might
        e# be one or two additional copies of the block on the stack.
  _     e#   Duplicate the top copy of the block.
  ]     e#   Wrap all copies in an array.
  3/    e#   Split into chunks of 3. For the first two programs, this will
        e#   just wrap all of them in an array. For the third program, this
        e#   splits the fourth copy off from the first three.
  W=    e#   Select the last chunk. So `3/W=` does nothing for the first
        e#   two programs, but discards three copies once we get to four.
  "_~"  e#   Push the remainder of the program.
}_~
Martin Ender
fonte
2

Gelatina , 11 bytes

“Ḥ%7Øv;”Ṙv1

Isso gerou o mesmo programa com 1 substituído por 2 , que substituiu 2 por 4 , o que gera o programa original.

Experimente online!

Dennis
fonte
2

Python 3, 127, 127 e 127 bytes

a='a=%r;b=%r;c=%r;print(b%%(b,a,c))';b='b=%r;a=%r;c=%r;print(c%%(c,a,b))';c='c=%r;a=%r;b=%r;print(a%%(a,b,c))';print(b%(b,a,c))

impressões

b='b=%r;a=%r;c=%r;print(c%%(c,a,b))';a='a=%r;b=%r;c=%r;print(b%%(b,a,c))';c='c=%r;a=%r;b=%r;print(a%%(a,b,c))';print(c%(c,a,b))

impressões

c='c=%r;a=%r;b=%r;print(a%%(a,b,c))';a='a=%r;b=%r;c=%r;print(b%%(b,a,c))';b='b=%r;a=%r;c=%r;print(c%%(c,a,b))';print(a%(a,b,c))

Isso se baseia na minha resposta à pergunta Interquine, que é baseada em uma solução Python normal. E eu sei exatamente o que fazer quando temos uma pergunta quad-interquina;)

aaay aaay
fonte
1

CJam , 14 bytes

0{\)3%\"_~"}_~

1{\)3%\"_~"}_~

2{\)3%\"_~"}_~

Experimente online!

Explicação

0{      e# Again, the standard CJam quine framework, but this time we have a zero
        e# at the bottom of the stack.
  \     e#   Bring the 0 to the top.
  )     e#   Increment.
  3%    e#   Mod 3 to loop from 2 back to 0.
  \     e#   Put the result underneath the block again.
  "_~"  e#   Push the remainder of the source.
}_~
Martin Ender
fonte
1

Javascript (ES6), 63 55 bytes

eval(c="`eval(c=${JSON.stringify(c)},n=${++n%3})`",n=0)
eval(c="`eval(c=${JSON.stringify(c)},n=${++n%3})`",n=1)
eval(c="`eval(c=${JSON.stringify(c)},n=${++n%3})`",n=2)

o1.innerText = eval(c="`eval(c=${JSON.stringify(c)},n=${++n%3})`",n=0) 
o2.innerText = eval(c="`eval(c=${JSON.stringify(c)},n=${++n%3})`",n=1)
o3.innerText = eval(c="`eval(c=${JSON.stringify(c)},n=${++n%3})`",n=2)
<pre id="o1"></pre>
<pre id="o2"></pre>
<pre id="o3"></pre>

Solução alternativa usando Function.prototype.toString(barato, 30 bytes)

(f=n=>`(f=${f})(${++n%3})`)(1)
Herman L
fonte
1

Cálculo lambda , 38 caracteres, 44 bytes

Uma solução simples baseada na mãe de todos os quines: o combinador y :

(λx.(λy.y)(λz.z)xx)(λx.(λy.y)(λz.z)xx)

Usando reduções beta, vemos que isso é realmente um tri-interquino:

(λx.(λy.y)(λz.z)xx)(λx.(λy.y)(λz.z)xx)
(λy.y)(λz.z)(λx.(λy.y)(λz.z)xx)(λx.(λy.y)(λz.z)xx)
(λz.z)(λx.(λy.y)(λz.z)xx)(λx.(λy.y)(λz.z)xx)
(λx.(λy.y)(λz.z)xx)(λx.(λy.y)(λz.z)xx)
etc.
Def
fonte
0

Java 8, 118 bytes

v->{int i=0;String s="v->{int i=%d;String s=%c%s%2$c;return s.format(s,++i%%3,34,s);}";return s.format(s,++i%3,34,s);}

int i=0;é diferença entre as funções / saídas (é qualquer um 0, 1ou 2).

Explicação:

Experimente online.

v->{                       // Method with empty unused parameter and String return-type
  int i=0;                 //  Integer, starting at 0, 1 or 2 depending on the version
                           //  (this is the only variation between the functions/outputs)
  String s="v->{int i=%d;String s=%c%s%2$c;return s.format(s,++i%%3,34,s);}";
                           //  String containing the unformatted source code
  return s.format(s,++i%3,s);}
                           //  Quine to get the source code, which we return as result
                           //  ++i%3 is used to cycle 0→1→2→0

Explicação adicional:

-part:

  • String s contém o código fonte não formatado
  • %s é usado para colocar essa String em si mesma com s.format(...)
  • %c, %2$cE 34são usados para formatar as aspas duplas ( ")
  • %%é usado para formatar o sinal do módulo ( %)
  • s.format(s,...,34,s) coloca tudo junto

Diferença das saídas / funções:

Mesma abordagem que a maioria das outras respostas:

  • int icomeça em cada 0, 1ou2
  • ++i%3transforma este para o próximo ( 0→1; 1→2; 2→0)
Kevin Cruijssen
fonte
0

> <> , 15 bytes

1'~r2*7%nd3*>o<

Experimente online!

Usa a mesma forma geral que outros> <> quines, mas possui um caractere extra na frente que é alternado entre 1, 2 e 4.

Brincadeira
fonte