Tupper.frink

View or download Tupper.frink in plain text format


// This is an implementation of Tupper's "self-referential" formula in Frink.
// See:
//   http://en.wikipedia.org/wiki/Tupper%27s_self-referential_formula 

n = 960939379918958884971672962127852754715004339660129306651505519271702802395266424689642842174350718121267153782770623355993237280874144307891325963941337723487857735749823926629715517173716995165232890538221612403238855866184013235585136048828693337902491454229288667081096184496091705183454067827731551705405381627380967602565625016981482083418783163849115590225610003652351370343874461848378737238198224849863465033159410054974700593138339226497249461751545728366702369745461014655997933798537483143786841806593422227898388722980000748404719

g = new graphics

for x=0 to 106
   for y = n to n+16
   {
      v = floor[(floor[y/17] 2^(-17 floor[x] - floor[y] mod 17)) mod 2]
      if v > 1/2
         g.fillRectCenter[-x,y-n,1,1]
   }

g.show[]

println[n/17 -> base32]
   


View or download Tupper.frink in plain text format


This is a program written in the programming language Frink.
For more information, view the Frink Documentation or see More Sample Frink Programs.

Alan Eliasen was born 17927 days, 10 hours, 45 minutes ago.