% FEMSET-Modell: Ebenes Fachwerk mit 10 Staeben, 7 Knoten

clear all

%       1       2        3           4          5        6             7        <-- Knotennummern
xy = [0 1000 ; 0 0 ; 1000 1000 ; 1000 500 ; 1000 0 ; 2000 1000  ;  2000 500] ;  % Knotenkoordinaten
kr = [1   1  ; 1 1 ;   0    0  ;   0   0  ;   0  0 ;   0    0   ;    0   0 ] ;  % Geom. Randbednggn.
bk = [0   0  ; 0 0 ;   0    0  ;   0   0  ;   0  0 ;   0 -10000 ; 10000  0 ] ;  % Knotenlasten

%      1     2     3     4     5     6     7     8     9     10                 <-- Elementnummern
km = [6 7 ; 3 6 ; 3 7 ; 5 7 ; 3 4 ; 4 5 ; 1 3 ; 1 4 ; 2 4 ; 2 5] ;              % Topologie
ep(1:10,1) = 210000*300 ;                                                       % Dehnsteifigkeiten

% Finite-Elemente-Algorithmus:
[succ uv] = femalg_m (xy , km , ep , kr , bk) 