draw = _=> {

  t || createCanvas((s=500), s)

​

  background(255);

  strokeWeight(2);

  a = (v) =>  1 - abs(1 - (v%1) * 2);

  f = (x,y) => sin(6 * ((a(x) + a(y)) * 2 + t)) * a(x) * a(y) * 0.05

​

  w = 98;

  for (i = 0; i < w*w; i++) {

      x=i%w;

      q = x/w;

      r = ++x / w;

      p = floor(i/w) / w;

      v=f(q, p);

      line(

        q*s, 

        (p + f(q, p))*s, 

        r*s, 

        (p + f(r, p))*s

      );

    }

  t += 0.03;

}

​

​