feap Dehnstab ein Element ! beliebiger Name, hier "Dehnstab ein Element" 0 0 0 2 2 2 ! 0 0 0 2D/3D DOF_pro_Knoten Knotenanzahl_pro_Element para ! Definition von Parametern E=3*10^4 ! E-Modul A1=8.875 ! gemittelte Querschnittsfläche A2=6.625 A3 = 4.375 A4 = 2.125 L=100.0 ! Länge coor ! Definition der Knotenkoordinaten 1 0 0 0 ! Knotennummer Inkrement x-Koordinate y-Koordinate 2 0 0.25*L 0 3 0 0.5*L 0 4 0 0.75*L 0 5 0 L 0 elem ! Definition der Elemente 1 0 1 1 2 ! Elementnummer Inkrement Materialnummer Knoten_1 Knoten_2 2 0 2 2 3 ! Elementnummer Inkrement Materialnummer Knoten_1 Knoten_2 3 0 3 3 4 ! Elementnummer Inkrement Materialnummer Knoten_1 Knoten_2 4 0 4 4 5 ! Elementnummer Inkrement Materialnummer Knoten_1 Knoten_2 mate 1 ! Definition des Materialmodells und Elementtyp truss ! Elementtyp: Dehnstab (english: truss) elastic isotropic E ! linear elastisches Materialmodell + Angabe des E-Moduls cross section A1 ! Angabe der Querschnittsfläche mate 2 ! Definition des Materialmodells und Elementtyp truss ! Elementtyp: Dehnstab (english: truss) elastic isotropic E ! linear elastisches Materialmodell + Angabe des E-Moduls cross section A2 ! Angabe der Querschnittsfläche mate 3 ! Definition des Materialmodells und Elementtyp truss ! Elementtyp: Dehnstab (english: truss) elastic isotropic E ! linear elastisches Materialmodell + Angabe des E-Moduls cross section A3 ! Angabe der Querschnittsfläche mate 4 ! Definition des Materialmodells und Elementtyp truss ! Elementtyp: Dehnstab (english: truss) elastic isotropic E ! linear elastisches Materialmodell + Angabe des E-Moduls cross section A4 ! Angabe der Querschnittsfläche boun ! Verschiebungsrandbedingung 1 0 1 1 ! Knotennummer Inkrement DOF-x DOF-y 2 0 0 1 ! Knotennummer Inkrement DOF-x DOF-y 3 0 0 1 ! Knotennummer Inkrement DOF-x DOF-y 4 0 0 1 ! Knotennummer Inkrement DOF-x DOF-y 5 0 0 1 ! Knotennummer Inkrement DOF-x DOF-y forc ! Kraftrandbedingung 5 0 20 0 ! Knotennummer Inkrement Kraft-x Kraft-y end batch ! Aufruf Solver tangent ! Aufruf Solver form ! Aufruf Solver solve ! Aufruf Solver end ! Aufruf Solver batch disp,all ! Ausgabe aller Knotenverschiebungen ins Output-File stre,all ! Ausgabe aller Elementkräfte ins Output-File REAC,all end inter STOP