File:Mug and Torus morph.gifmorphing target) #declare R = 1; #declare r = 0.22; #declare T_a = function { pow(R - sqrt(pow(x,2) + pow(y,2)),2) + pow(z,2) - pow(r,2) } #declare R2 = 1;
File:PuroRotolamentoCirc.gifcalcolare la velocità float x, y; float dx, dy, dt; void setup() { sz = 15; size(16*sz, 16*sz); frameRate(20); R = width/4; r = width/16; phi = -PI; theta
File:Polarization change in uniaxial crystal.gifRotationMatrix[-\[Theta], {1, 0, 0}]; eq = Table[ (D[{Ex[x], Ey[x], Ez[x]}, {x, 2}])[[j]] == -(\[Epsilon]r.{Ex[x], Ey[x], Ez[x]})[[j]], {j, 1, 3, 1}]; sol =