1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62
| % Liste des plis de l'éprouvette
% [orientation (en °), ep (en mm)]
plis = sym([-60 1; 60 1; 60 1; -60 1]);
plis(:,1) = plis(:,1).*pi/180;
syms E1 E2 G12 nu12 nu21; % Propriétés mécaniques du pli
syms Q11 Q12 Q22 Q66; % Matrice de rigité du pli dans le repere ortho
syms Q11L Q12L Q22L Q66L; % Matrice de rigité du pli dans le repere du laminé
syms A11 A12 A22 A66 D11 D12 D16 D22 D26 D66; % Matrice ABD du laminé
nu21 = nu12 * E2/E1;
Q11 = E1/(1-nu12*nu21);
Q12 = nu21*E1/(1-nu12*nu21);
Q22 = E2/(1-nu12*nu21);
Q66 = G12;
Qpli = [ Q11 Q12 0;
Q12 Q22 0;
0 0 Q66];
ATemp = zeros(3,3);
% Génération de la partie Aij de matrice de rigité du laminé
for i=1:size(plis,1)
ALam = ATemp + CdB(Qpli, plis(i,1)).*plis(i,2);
ATemp = ALam;
end
clear ATemp
subexpr(ALam)
% Hypothèses d'essai:
% 1er essai de traction dans le sens 1
% - Effort de traction NL1
% - 2 jauges dir 1 et 2 : j11 et j21
% 2eme essai de traction dans le sens 2
% - Effort de traction NL2
% - 2 jauges dir 1 et 2 : j12 et j22
% Système 1 :
% { NL1 = A11 j11 + A12 j21
% { 0 = A12 j11 + A22 j21
% Système 2 :
% { NL2 = A22 j12 + A12 j22
% { 0 = A12 j12 + A11 j22
% ==> 4 equations / 4 inconnus (E1, E2, nu12, G12)
NL1 = (1000);
NL2 = (500);
j11 = (0.000001);
j21 = (0.0000001);
j12 = (0.0000002);
j22 = (0.000002);
solu = solve(ALam(1,1)*j11 + ALam(1,2)*j21 - NL1, ...
ALam(1,2)*j11 + ALam(2,2)*j21, ...
ALam(2,2)*j12 + ALam(1,2)*j22 - NL2, ...
ALam(1,2)*j12 + ALam(1,1)*j22, ...
E1, E2, G12, nu12) |
Partager