MRAS: El Ser Interdimensional

 

Cuarta Dimensión 

Hipercubo Teseracto

MRAS: EL SER INTERDIMENSIONAL

Inspiración 

Cuando pensamos en la idea de Cuarta Dimensión nos asaltan a la mente ideas realmente inheréntemente llenas de fantasia debido a que es algo ciertamente inexistente desde un punto de vista de la demostración práctica. 

Es por ello que, si queremos plasmar un concepto ciertamente ambiguo desde todos los ámbitos y, generar con ello, algo ciertamente sostenible no nos queda otra opción que recurrir a planteamientos ciertamente científicos como el Hipercubo o Teseracto con el que se ayudara Albert Einstein para dar una cierta explicación a la Cuarta Dimensión.  

La Idea

En cierto modo, como podemos observar en el gif ilustrativo, el Hipercubo es la sucesión de un cubo dentro de otro que cobra vida haciendo que la cara posterior viaje al frente y viceversa, creando con ello tres caras en realidad en lugar de dos.

Pero en realidad es un cubo interior que interacciona con un cubo exterior intercalando sus posiciones. 

La creacion de un Teseracto a partir de un cubo es algo que intenta explicar la Historia de las Dimensiones: Como a partir de un punto formamos una línea y viajamos con un giro para formar un cuadrado y volvemos a viajar con un giro para formar un cubo (que representaría la tercera dimension). 

A partir de este punto todo es divagación teórica aunque todo pareciera indicar que, al igual que la línea alberga al punto; que el cuadrado alberga a la línea y que el cubo alberga al cuadrado: la Cuarta Dimensión albergaría a la Tercera Dimensión. 

Esto significa que no prod riamos construir una figura geométrica cuyas dimensiones de las caras del mismo fueran diferentes o excedieran de sus proporciones.

La Historia de las Dimensiones

CÓDIGO

//(C)Sergio Salazar Latorre

//Inspirado a partir de un esbozo de Gene Kogan

//MRAS: El Ser Interdimensional

let l=600

let DS

let n

function setup() {

  

  createCanvas(l,l);

  background(0);

  //stroke(255, 15);

  noFill();

  angleMode(DEGREES)

  fill(255)

  DS = new Deep8Sea()

}

function draw() {

  translate(l/2, l/2);

  beginShape();

  for (let i = 0; i < l; i++) {

    //DS.spiderSea(i)

    //DS.spiderHeartBeats(i)

    DS.Mras(i)

  }

  endShape(CLOSE);

  push()

  firma()

  pop()

}

function firma(){

  noLoop()

  translate(-l/2,-l/2)

  fill(255,0,0)

  strokeWeight(4)

  stroke(255)

  text("(C)Sergio Salazar Latorre", 10, l-20)

  text(n,10,l-5)

  loop()

}

//............................................

//CLASE Deep8Sea

class Deep8Sea{

  constructor(){}

  spiderSea(i){

    n=" Spider Sea"

    /*var ang = map(i, 0, 200, 0, PI);

      var rad = 200 * noise(i * 0.01, t * 0.005);

      var x = rad * cos(ang);

      var y = rad * sin(ang);*/

      //curveVertex(x, y);

      var ang = map(i, 5, 8, 0, 360);

      var rad = l * noise(i * 0.003, frameCount * 0.0009);

      var x = rad * cos(ang*0.1)+10;

      var y = rad * sin(ang*0.4)+10;

      //curveVertex(x, y);

      var x = rad * -cos(ang*0)-10;

      var y = rad * sin(ang*0.4)+10;

      curveVertex(x, y);

      var x = rad * cos(ang*0)+10;

      var y = rad * -sin(ang*0.4)-10;

      curveVertex(x, y);

      var x = rad * -cos(ang*0)-10;

      var y = rad * -sin(ang*0.4)-10;

      curveVertex(x, y);

  }

  

  spiderHeartBeats(i){

      n = " Spider Heart Beats"

      var ang = map(i, 8, 21, 0, 360);

      var rad = l * noise(i * 0.003, frameCount * 0.009);

      var x = rad * cos(ang*0.1)+10;

      var y = rad * sin(ang*0.4)+10;

      //curveVertex(x, y);

      var x = rad * -cos(ang*0)-10;

      var y = rad * sin(ang*0.4)+10;

      curveVertex(x, y);

      var x = rad * cos(ang*0)+10;

      var y = rad * -sin(ang*0.4)-10;

      curveVertex(x, y);

      var x = rad * -cos(ang*0)-10;

      var y = rad * -sin(ang*0.4)-10;

      curveVertex(x, y);

  }

  

  Mras(i){

      n=" Mras: El Ser Interdimensional"

      var ang = map(i, 1, 3, 3, 8);

      var rad = l * noise(i * 0.003, frameCount*0.005);

      var x = rad * cos(ang*0.01)+10;

      var y = rad * sin(ang*0.04)+10;

      //curveVertex(x, y);

      var x = rad * -cos(ang*0)-10;

      var y = rad * sin(ang*0.4)+10;

      curveVertex(x, y);

      var x = rad * cos(ang*0)+10;

      var y = rad * -sin(ang*0.4)-10;

      curveVertex(x, y);

      var x = rad * -cos(ang*0)-10;

      var y = rad * -sin(ang*0.4)-10;

      curveVertex(x, y);

  }

}