Advertisement
Hirwanto

asympt05

Jan 26th, 2015
2,071
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. \begin{asy}[width=10cm,height=10cm]
  2. import graph3;
  3.  
  4. size3(200);
  5. currentprojection=orthographic(3,3,2);
  6. currentlight=light(8,10,2);
  7.  
  8. int k1, k2, n = 5;
  9. real alpha = 0.3*pi;
  10.  
  11. // cross section of the quintic 6D Calabi-Yau manifold
  12. triple cy(pair z) {
  13.  
  14.   pair z1, z2;
  15.  
  16.   if(z==(0,0)) {
  17.     z1 = exp(2*pi*I*k1/n);
  18.     z2 = 0;
  19.   } else {
  20.     z1 = exp(2*pi*I*k1/n)*exp(log(cos(I*z))*2/n);
  21.     z2 = exp(2*pi*I*k2/n)*exp(log(-I*sin(I*z))*2/n);
  22.   }
  23.  
  24.   return (z2.x, cos(alpha)*z1.y + sin(alpha)*z2.y, z1.x);
  25.  
  26. }
  27.  
  28. for(k1=0; k1<n; ++k1) {
  29.   for(k2=0; k2<n; ++k2) {
  30.     surface s = surface(cy,(-1,0),(1,0.5*pi),20,20);
  31.     draw(s,yellow+orange);
  32.   }
  33. }
  34.  
  35. \end{asy}
Advertisement
RAW Paste Data Copied
Advertisement