Nevar pievienot vairāk kā 25 tēmas Tēmai ir jāsākas ar burtu vai ciparu, tā var saturēt domu zīmes ('-') un var būt līdz 35 simboliem gara.

30 rindas
539B

  1. //+
  2. SetFactory("OpenCASCADE");
  3. //+
  4. a = 1;
  5. n = 20;
  6. Box(1) = {-0.5*a, -0.5*a, -0.5*a, a, a, a};
  7. Mesh.Algorithm = 6;
  8. Mesh.ElementOrder = 1;
  9. Physical Surface("left") = {1};
  10. Physical Surface("right") = {2};
  11. Physical Surface("front") = {3};
  12. Physical Surface("back") = {4};
  13. Physical Surface("bottom") = {5};
  14. Physical Surface("top") = {6};
  15. Physical Volume("bulk") = {1};
  16. Transfinite Line "*" = n;
  17. Transfinite Surface "*";
  18. Transfinite Volume "*";
  19. Mesh.RecombineAll = 1;
  20. Mesh.Recombine3DAll = 1;
  21. Mesh.Recombine3DLevel = 2;
  22. Mesh.Optimize = 1;