34 votes

Pristine and Unique Code Bowling

Haskell, 39 45 50 52 60 bytes main=do{(\𤶸 陸 ⵙ 商 ߜ 新->pure fst)LT EQ[]3 2$1} Identifier main has to have type <...
Angs's user avatar
  • 4,987
31 votes
Accepted

Pristine and Unique Code Bowling

Jelly, 253 254 256 bytes ...
dylnan's user avatar
  • 5,364
26 votes

Pristine and Unique Code Bowling

Python 2,  20 21 33 39 45  50 bytes Now very much a collaborative effort! +2 thanks to Aidan F. Pierce (replace sorted({0}) with ...
Jonathan Allan's user avatar
21 votes

Filthy and Unique

Unary, 14 bytes 123456789ABCDE This encodes the brainfuck program [, which errors due to unmatched brackets. Removing bytes ...
Dennis's user avatar
  • 210k
19 votes

99 ways to say "I love you"

JavaScript (JavaScript shell), 65 bytes total: (64 + 3366 = 3450) bytes for(i=99;i++<198;)print(`\\u0${i}="I love you";print(\\u{${i}})`) ...
tsh's user avatar
  • 34.7k
18 votes

Pristine and Unique Code Bowling

C (tcc), x86_64, 29 31 33 39 40 bytes main[]={(23*8),-~0xABEDFCfebdc%95674+1}; Returns 0. Thanks to @feersum for suggesting uppercase hex digits. Try it online! ...
Dennis's user avatar
  • 210k
17 votes

Write a near crystalline program

Ellipsis, score → 0 The program consists of \$144 \times 8^n + 23\$ ASCII periods . for \$n \geq 0\$, and gets a perfect score (i.e. every possible insertion causes ...
16 votes

Filthy and Unique

R, 3 bytes qrt Try it online! A name of an object is a valid program in R. qrt is not the name of anything, so it returns ...
ngm's user avatar
  • 4,304
16 votes

Pristine and Unique Code Bowling

><>, 122 bytes ...
Jo King's user avatar
  • 47.2k
16 votes

Pristine Bit Checking

Python 2, 35 bytes lambda a,b:(a^b)&-(a^b)in[a^b or[]] Try it online! Uses the power-of-two check n&-n==n, ...
xnor's user avatar
  • 145k
15 votes

Programming a Pristine World

><>, 17 bytes e"ooooo7-c0pBhtra Try it online! Prints "earth". The only way a ><> program exits without an ...
Jo King's user avatar
  • 47.2k
13 votes

Filthy and Unique

Jelly, 4 5 6 7 8 10 11 bytes “a”;⁽PFð+µU Try it online! Verify it. Tries to add a string with an integer. Some of the possible subprograms: ...
dylnan's user avatar
  • 5,364
13 votes

Pristine and Unique Code Bowling

JavaScript, 42 bytes if([0XacdCADE*Proxy.length]!=362517948)田 Removing i, f, or ...
tsh's user avatar
  • 34.7k
11 votes

Pristine and Unique Code Bowling

Brain-Flak, 2 bytes <> Try it online! Alternatively, [], {} or ...
Jo King's user avatar
  • 47.2k
10 votes

99 ways to say "I love you"

Whitespace, 718 bytes, score: 34180 (33462+718) ...
Kevin Cruijssen's user avatar
9 votes

Pristine Bit Checking

Python 2, 72 67 50 bytes lambda a,b:sum(map(int,'{:b}'.format(a^b)))is+True Try it online! -5 bytes, thanks to Jo King Returns ...
TFeld's user avatar
  • 19.8k
8 votes

Pristine Bit Checking

Java 8, 68 61 56 45 bytes a->b->(a.bitCount(a^b)+"").equals(-~(a^a)+"") -11 bytes thanks to @EmbodimentOfIgnorance, replacing constant <...
Kevin Cruijssen's user avatar
8 votes

Shortest pristine truth machine

Rust, 109 106 bytes fn t(n:i8)->Result<Box::<Iterator::<Item=i8>>,i8>{if n==0{Err(0)}else{Ok(Box::new(std::iter::repeat(1)))}} Try it online! ...
Aiden4's user avatar
  • 2,455
8 votes

Write a near crystalline program

Java -encoding utf-16, \$2^{-37}\$ Try to insert a single byte to UTF-16 file would resulting invalid encoding. So javac reports ...
tsh's user avatar
  • 34.7k
7 votes

Filthy and Unique

Polyglot, 3 bytes 1 2 Works in: JavaScript Ruby R Octave GHCi Julia In JavaScript, throws SyntaxError: unexpected token: numeric literal or a similar error. ...
7 votes

Pristine Bit Checking

C (gcc), 56 bytes d(a,b){return(sizeof((char)d))^__builtin_popcount(a^b);} Try it online! Returns 0 if the pair differ by 1, ...
LambdaBeta's user avatar
  • 2,759
7 votes

Pristine Bit Checking

R, 38 37 bytes -1 byte thanks to Nick Kennedy. dpois(log2(bitwXor(scan(),scan())),T) Try it online! (Thanks to Giuseppe for setting up the TIO properly.) Proof ...
Robin Ryder's user avatar
  • 15.6k
7 votes

99 ways to say "I love you"

JavaScript (Node.js), 81 bytes Output: 4275 bytes for(n=100;--n;)console.log(`console.log('I lo'+Buffer([${n}^${118^n}])+'e you')`) Try it online!
Arnauld's user avatar
  • 192k
7 votes

Pristine Polyglots

6 languages Bash, 4 bytes echo Try it online! Zsh, 4 bytes echo Try it online! fish, 4 bytes ...
Jonah's user avatar
  • 33.4k
7 votes

Write a near crystalline program

R, score=0.000000000202, 2000000021 bytes Edit: corrected score (increased by 1.04-fold) thanks to JDL ...
Dominic van Essen's user avatar
6 votes

Programming a Pristine World

Python 3, 43 bytes for[]in{5:[]}[open(1,"w").write("world")]:a Try it online! How it works To protect against substring deletions, we use ...
Anders Kaseorg's user avatar
6 votes

Quining a Pristine World

Haskell, 132 bytes q x=if length x==132then putStr x else fail[];main=q$(++)<*>show$"q x=if length x==132then putStr x else fail[];main=q$(++)<*>show$" ...
Laikoni's user avatar
  • 26.2k
6 votes

Pristine and Unique Code Bowling

Ada, 110 bytes (latin1) Probably the best answer you'll get out of any language in use in industry? Hexdump: ...
LambdaBeta's user avatar
  • 2,759
6 votes

Pristine Bit Checking

R, 83 bytes t(identical(sum(.<-as.double(intToBits(Reduce(bitwXor,scan())))),sum(T^el(.[-T])))) Try it online! Proof that this is pristine Working around ...
Nick Kennedy's user avatar
  • 21.1k
6 votes

Longest pristine(ish) codepoint run

Python 3, run of 1,114,111 ...
xnor's user avatar
  • 145k

Only top scored, non community-wiki answers of a minimum length are eligible