Advertisement
Guest User

Untitled

a guest
Sep 20th, 2018
127
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.43 KB | None | 0 0
  1. Programme APDL "Ansys": Exemple plaque trouée
  2.  
  3. Finish ! Revenir à l'étape initiale
  4. /Clear ! Effacer toute la base de données
  5.  
  6. /Prep7 ! Lancer le préprocesseur
  7.  
  8. Et,1,plane182 ! Définir un type d'élément (n°1)
  9.  
  10. ! Définir les propriétés du matériau
  11. MP,ex,1,200000 ! Module d'élasticité du matériau n°1
  12. MP,PRXY,1,0.3 ! Coefficient de Poisson du matériau n°1
  13.  
  14. ! Définir la géométrie
  15. K,1,20,0,0 ! Point n°1 x=20, y=0, z=0
  16. K,2,20,20,0
  17. K,3,0,20,0
  18. K,4,0,2,0
  19. K,5,2,0,0
  20. K,6,0,0,0
  21. L,1,2 ! Ligne rectiligne entre le point 1 et 2
  22. L,2,3
  23. L,3,4
  24. L,1,5
  25. LARC,5,4,6,2 ! Arc entre les point 5 et 4, centre 6 et rayon=2 mm
  26. A,1,2,3,4,5 ! Surface reliant les points 1 à 5
  27.  
  28. ! Maillage
  29. Esize,1 ! Taille générale des éléments de 1 mm
  30. Type,1 ! type des éléments de maillage n°1 défini ci-dessus (Et,..)
  31. Mat,1 ! matériau de maillage n°1 défini ci-dessus (MP,..)
  32. Amesh,1 ! Mailler la surface 1
  33.  
  34. ! Conditions aux limites
  35. Nsel,S,loc,Y,0 !Sélectionner les nœuds localisés à Y=0
  36. D,all,Uy,0 !Appliquer un déplacement suivant y de 0mm
  37. Nsel,S,loc,X,0 !Sélectionner les nœuds localisés à X=0
  38. D,all,Ux,0
  39. Nsel,S,loc,X,20
  40. Sf,all,pres,-100 ! Appliquer une pression de 100 MPa
  41. Allsel ! Sélectionner tous (nœuds, éléments, etc.)
  42. Finish ! Quitter le Pré-processeur
  43.  
  44. /Solution ! Entrer dans le solveur
  45. Solve ! Lancer un calcul élastique
  46. Finish ! Quitter le solveur
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement