SWELL, spol.s r.o.

S využitím programů ANSA, MSC/NASTRAN for Windows, PAM-CRASH realizuje oddělení technických výpočtů následující typy analýz:

1. Strukturální analýzy v oblasti převážně automobilového průmyslu

- statické
- dynamické
- modální
- stabilitní problémy
- materiálové a geometrické nelinearity
- kontaktní problémy
- optimalizace

2. Posuzování mezních stavů konstrukcí z hlediska

- statické tuhosti a pevnosti (kapoty,bočních dveří,centrální trubky)
- životnostní (podvozkových dílů a karosérie)
- bariérové zkoušky a ochrana chodců

výpočet statické tuhosti MKP

inicializace funkcí FEM

knihovna FEM

<< FEM`FEM`

zadání úlohy MKP

vstup={nodes=(({{číslo uzlu, 1, 2, 3, 4}, {\(souřadnice\ x\), 0, 2, 4, 7}, {\(souřadnice\ y\), 0, 0, 0, 0}})),
elements=(({{číslo prvku, 1, 2, 3}, {uzel i, 1, 2, 3}, {uzel j, 2, 3, 4}})),
property=(({{\(materiál\ ocel\ s\ modulem\ pružnosi\ E\), 210000, MPa}, {\(plocha\ průřezu\ každého\ nosníku\ S\), 476.2, mm2}})),
constrain=(({{uzel, 1, 2, 3, 4}, {TX, True, False, False, False}, {TY, True, True, True, True}})),
load=(({{uzel, 2, 3, 4}, {FX, 20000, -20000, 20000}, {FY, 0, 0, 0}}))};

{pts, elm, spc, force, property, material} = 
        vstupOut[vstup];
model[pts, elm, spc, force];

vytvoření matice tuhosti modelu

MTE[pts, elm, material, property, 1, 
        True];
MTE[pts, elm, material, property, 2, 
        True];
MTE[pts, elm, material, property, 3, True];

MTM[pts, elm, material, property, True];

posuvy v uzlech a vyhodnocení

(TXY = Trans[pts, elm, spc, force, property, material, True]) // 
        MatrixForm;

Animation[pts, elm, spc, force, TXY, 10, True];

Vyhodnoceni[pts, elm, material, property, TXY];

zadání úlohy MKP

vstup={nodes=(({{číslo uzlu, 1, 2, 3, 4, 5}, {\(souřadnice\ x\), 0, 2, 4, 1, 3}, {\(souřadnice\ y\), 0, 0, 0, 1, 1}})),
elements=(({{číslo prvku, 1, 2, 3, 4, 5, 6, 7}, {uzel i, 1, 2, 1, 4, 2, 5, 5}, {uzel j, 2, 3, 4, 2, 5, 3, 4}})),
property=(({{\(materiál\ ocel\ s\ modulem\ pružnosi\ E\), 2.1*(10^5), MPa}, {\(plocha\ průřezu\ každého\ nosníku\ S\), 476.2, (mm^2)}})),
constrain=(({{uzel, 1, 2, 3, 4}, {TX, True, False, False, False}, {TY, True, False, True, False}})),
load=(({{uzel, 2, 5}, {FX, 0, 0}, {FY, -100000, 0}}))};

{pts, elm, spc, force, property, material} = 
        vstupOut[vstup];
model[pts, elm, spc, force];

vytvoření matice tuhosti modelu

MTE[pts, elm, material, property, 1, 
        True];
MTE[pts, elm, material, property, 3, True];

MTM[pts, elm, material, property, True];

posuvy v uzlech a vyhodnocení

(TXY = Trans[pts, elm, spc, force, property, material, True]) // 
        MatrixForm;

Animation[pts, elm, spc, force, TXY, 10, True];

Vyhodnoceni[pts, elm, material, property, TXY];

zadání úlohy MKP

(bdf = Import["A:\most2002.dat", "Table"]) // 
      MatrixForm

{pts, elm, spc, force, property, material} = 
        datOut[bdf];
model[pts, elm, spc, force, True, False, 
        6, {1, 2, 5, 6}];

posuvy v uzlech a vyhodnocení

(TXY = Trans[pts, elm, spc, force, property, material, True]) // 
        MatrixForm;

Animation[pts, elm, spc, force, TXY, 10, True, {8, 11}];

Vyhodnoceni[pts, elm, material, property, TXY];

Změna v uložení

spc[[3, 4]] = 2;
spc