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 17645 days, 8 hours, 35 minutes ago.