---

Hallo Forumsmitglieder,
ich bin neu in der ANSYS-Programmierung und habe eine Aufgabe als Volumen- und als Schalenproblem zu lösen.
Die Erzeugung der Geometrie und die anschließende Simulation als Volumenkörper habe ich nach einiger Einarbeitungszeit gelöst bekommen.
Mein Problem ist jedoch, dass ich diese Aufgabe noch als Schalenproblem lösen muss. Leider habe ich damit keine Erfahrung. Kennt sich jemand von euch damit aus und könnte mir dabei helfen? Vielleicht wie man in meinem speziellen Problem vorgehen würde? Ich bin über jegliche Tips und Hilfen dankbar!

Hier die Aufgabe als Volumenkörper:

FINISH
/CLEAR              ! Anfangszustand herstellen
C***
C*** 
C***Parameter
RD=5
/PREP7

!ET,1,MESH200,6
ET,2,SOLID45 !Elementtyp SOLID45 -> Hexaeder mit 8 Knoten, die jeweils 3 Freiheitsgrade besitzen
MP,EX,1,1000 !E-Modul 1kN/mm² für PVC weich
MP,NUXY,1,0.47 !Querkontraktionszahl MIN
MP,PRXY,1,0.49 !Querkontraktionszahl MAX

!Keypoints erzeugen
K,1,100,0,80
K,2,100-RD,0,80
K,3,60,0,15
K,4,60-RD,0,15+RD
K,5,30,0,15+RD
K,6,45,0,15
K,7,40,0,10
K,8,40,0,0
K,9,30,0,0
K,10,30,0,10

!Linien aus Keypoints erzeugen
L,1,3
L,3,6
LARC,6,7,4,5
L,7,8
L,8,9
L,9,10
L,10,5
L,5,4
L,4,2
L,2,1
AL,all

!Linie für die Rotation
K,12,-60,0,15
K,13,0,10,15
K,14,0,-10,15
LARC,3,12,13,60
LARC,3,12,14,60

!Extrudieren der Fläche
VDRAG,      1, , , , , ,      11  !Extrudieren entlang einer Linie (Kreisbogen)
VDRAG,      1, , , , , ,      12

CYL4,0,0,30,360,,,5+RD !Innere Zylinder erzeugen (Kern)
FLST,3,1,6,ORDE,1 
FITEM,3,3 
VGEN, ,P51X, , , , ,10, , ,1 !Zylinder 10mm in Z-Richtung verschieben

VGLUE,ALL !Die 3 Volumen miteinander verbinden

VSWEEP,all !MESHEN DER 3 VOLUMINA

/Solution
!Lagerung definieren
NSEL,S,LOC,Z,0          ! Alle Knoten mit Z=0 selektieren
D,ALL,ALL,0            ! Alle Verschiebungen dort =0 setzen

NSEL,S,LOC,Z,80 !Alle Nodes auswählen, auf die die Flächenlast angreift
!NSEL,STAT !Zeigt an, wieviele Nodes selektriert wurden
F,ALL,FZ,-5 !Anbringung der Kraft -> 600/Anzahl der Punkte(120) = 5N/Node

NSEL,All
SOLVE !Berechnung starten
FINISH

/POST1
PLNSOL,S,INT,0 !Zeigt die Spannungen im Material an
PLNSOL,U,SUM,0 !Zeigt die maximale Verformung und den Ort an

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Moin,
villeicht könntest Du bevor Du hier eine Eingabedatei postest mal sagen worum es überhaupt geht und vielleicht mit dem ein oder anderen Bild schildern.
Gruß
Gerd

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Blumentopf.JPG Blumentopf2.JPG

Hallo Gerd,
du hast Recht..
Es handelt sich bei meiner Aufgabe um eine Ausarbeitung für mein Studium. Weiter unten findet ihr zwei Bilder des bereits fertigen Volumenmodels. Es stellt eine Art Blumentopf dar, auf den über den oberen Rand eine Kraft eingeleitet wird. Der Blumentopf ist am unteren Ring (Standfläche) fest gelagert.
Die Aufgabe muss als räumliches Volumenproblem und als Schalenproblem gelöst werden. Die Ergebnisse sollen anschließend untersucht und bewertet werden.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Moin moin,

habe dein Script mal angepasst für ein Schalenmodell. Bin zwar kein Experte auf dem Gebiet, aber es läuft auf jeden Fall durch. Habe dafür Mittelebenen verwendet. Welche Elemente man dafür am besten verwendet weiss ich nicht genau, habe mal shell181 verwendet. Das Modell kann sicher noch optimiert werden...

!=====================================

FINISH
/CLEAR              ! Anfangszustand herstellen
RD=5
/PREP7

!Elementtypen definieren
et,1,shell181
keyopt,1,3,2
keyopt,1,8,2

!Sections definieren
sect,1,shell                !Section definieren
secdata,RD,1,,3       !Dicke,Material,Orientierung,Integrationspunkte

sect,2,shell                !Section definieren
secdata,2*RD,1,,3    !Dicke,Material,Orientierung,Integrationspunkte

!Materialien definieren
MP,EX,1,1000          !E-Modul 1kN/mm² für PVC weich
MP,NUXY,1,0.47       !Querkontraktionszahl MIN
MP,PRXY,1,0.49       !Querkontraktionszahl MAX

!Keypoints erzeugen
K,101,100-RD/2,0,80
K,102,60-RD/2,0,15+RD/2
K,103,35,0,15+RD/2
K,104,35,0,15
K,105,35,0,0
K,106,0,0,15

!Linien aus Keypoints erzeugen
L,101,102
L,102,103
L,103,104
L,104,105

!Linien für die Rotation
K,112,-60+RD/2,0,15+RD/2
K,113,0,10,15+RD/2
K,114,0,-10,15+RD/2
LARC,102,112,113,60-RD/2
LARC,102,112,114,60-RD/2

!Extrudieren der Fläche
ADRAG,      1, 2, 3, 4, , ,      5  !Extrudieren entlang einer Linie (Kreisbogen)
ADRAG,      1, 2, 3, 4, , ,      6

CYL4,0,0,30+RD,360,,,         !Innere Kreisflaeche erzeugen (Kern)
AGEN, , 9, , , , ,15, , , 1            !Kreisflaeche 10mm in Z-Richtung verschieben

!Sections den Flaechen zuweisen
asel,s,area,,9       !Kreisflaeche selektieren
aatt,,,,,2                 !Section 2 zuweisen

asel,inve       !Flaechenauswahl invertieren (alles ausser Kreisflaeche)
aatt,,,,,1         !Section 1 zuweisen

!Kreisfoermige Linien unterteilen
lsel,s,line,,8,9,1
lsel,a,line,,17,18,1
lsel,a,line,,11,15,2
lsel,a,line,,20,24,2
lesize,all,,,48       !Halbkreise unterteilen

lsel,s,line,,25,28,1
lesize,all,,,24       !Viertelkreise unterteilen

esize,5

!Flaechen vernetzen
alls
amesh,all
nummrg,node             !Aufeinanderliegende Knoten Verschmelzen

!/eshape,1             !stellt Schalen-Elemente als Volumen dar (Dicke ersichtlich)
!eplot

!Lagerung definieren
NSEL,S,LOC,Z,0                      ! Alle Knoten mit Z=0 selektieren
D,ALL,ALL,0                              ! Alle Verschiebungen UND Rotationen dort =0 setzen

NSEL,S,LOC,Z,80                   !Alle Nodes auswählen, auf die die Flächenlast angreift
*get,anzno,node,0,count        !Anzahl selektierter Nodes wird dem Parameter "anzno" zugewiesen
F,ALL,FZ,-600/anzno             !Anbringung der Kraft -> 600/Anzahl der Punkte(anzno)

alls
/solu
SOLVE             !Berechnung starten
FINISH

/POST1
PLNSOL,S,INT,0       !Zeigt die Spannungen im Material an
PLNSOL,U,SUM,0       !Zeigt die maximale Verformung und den Ort an

!Skalierungsfaktor für Darstellung
*SET,factor,10       !Skalierungsfaktor definieren
/dscale,,factor
/replot

!=====================================

Ich hoffe das bringt dir was... Die Ergebnisse sind jedoch nicht dieselben... Habe den Grund dafür noch nicht gefunden, aber du sollst ja auch noch was zu tun haben :-) Würde mich auf jeden Fall interessieren wo der Fehler liegt. So gross sollten die Unterschiede ja kaum sein...

[Diese Nachricht wurde von The Only Roy am 30. Dez. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP