Материал: ЛиФП. Лабораторная работа 6

CL1_C12D, CL1_C13D, CL1_C33D, CL1_C44D, CL1_S11E, CL1_S12E, CL1_S13E, CL1_S33E, CL1_S44E, CL1_S11D, CL1_S12D,

CL1_S13D, CL1_S33D, CL1_S44D, CL1_E31, CL1_E33, CL1_E15, CL2_D31, CL2_D33, CL2_D15, CL1_H31, CL1_H33, CL1_H15, CL1_G31, CL1_G33, CL1_G15, CL1_E11S, CL1_E33S, CL1_E11T, CL1_E33T)) :-

RC = 1, Re = 1, Rs = 1, !,

CL2_D31 = CL1_E31 * (CL1_S11E + CL1_S12E) + CL1_E33 * CL1_S13E, CL2_D33 = 2 * CL1_E31 * CL1_S13E + CL1_E33 * CL1_S33E,

CL2_D15 = CL1_E15 * CL1_S44E;

RC = 1, Re = 3, Rs = 2, !, CL2_D31 = CL1_E33T * CL1_G31,

CL2_D33 = CL1_E33T * CL1_G33,

CL2_D15 = CL1_E11T * CL1_G15;

RC = 2, Re = 1, Rs = 2, !,

M = (2 * CL1_E31 * CL1_S13D + CL1_E33 * CL1_S33D) / (CL1_E31 * (CL1_S11D + CL1_S12D) + CL1_E33 *

CL1_S13D),

A1 = 2 * CL1_E31 / CL1_E33T + CL1_E33 * M / CL1_E33T,

C1 = CL1_E31 * (CL1_S11D + CL1_S12D) + CL1_E33 * CL1_S13D, D1 = sqrt(1 - 4 * A1 * C1),

CL2_D31 = (1 - D1) / (2 * A1), CL2_D33 = M * CL2_D31,

A2 = CL1_E15 / CL1_E11T,

C2 = CL1_E15 * CL1_S44D,

D2 = sqrt(1 - 4 * A2 * C2), CL2_D15 = (1 - D2) / (2 * A2);

CL2_D31 = CL1_D31, CL2_D33 = CL1_D33, CL2_D15 = CL1_D15.

get_h(RC, Re, Rs, cl(CL1_C11E, CL1_C12E, CL1_C13E, CL1_C33E, CL1_C44E, CL1_C11D, CL1_C12D, CL1_C13D, CL1_C33D, CL1_C44D, CL1_S11E, CL1_S12E, CL1_S13E, CL1_S33E, CL1_S44E, CL1_S11D, CL1_S12D, CL1_S13D, CL1_S33D, CL1_S44D, CL1_E31, CL1_E33, CL1_E15, CL1_D31, CL1_D33, CL1_D15, CL1_H31, CL1_H33, CL1_H15, CL1_G31, CL1_G33, CL1_G15,

CL1_E11S, CL1_E33S, CL1_E11T, CL1_E33T), cl(CL1_C11E, CL1_C12E, CL1_C13E, CL1_C33E, CL1_C44E, CL1_C11D, CL1_C12D, CL1_C13D, CL1_C33D, CL1_C44D, CL1_S11E, CL1_S12E, CL1_S13E, CL1_S33E, CL1_S44E, CL1_S11D, CL1_S12D,

CL1_S13D, CL1_S33D, CL1_S44D, CL1_E31, CL1_E33, CL1_E15, CL1_D31, CL1_D33, CL1_D15, CL2_H31, CL2_H33, CL2_H15, CL1_G31, CL1_G33, CL1_G15, CL1_E11S, CL1_E33S, CL1_E11T, CL1_E33T)) :-

RC = 1, Re = 1, Rs = 1, !, CL2_H31 = CL1_E31 / CL1_E33S,

CL2_H33 = CL1_E33 / CL1_E33S,

CL2_H15 = CL1_E15 / CL1_E11S; RC = 2, Re = 4, Rs = 1, !,

CL2_H31 = CL1_G31 * (CL1_C11D + CL1_C12D) + CL1_G33 * CL1_C13D,

CL2_H33 = 2 * CL1_G31 * CL1_C13D + CL1_G33 * CL1_C33D, CL2_H15 = CL1_G15 * CL1_C44D;

RC = 1, Re = 4, Rs = 1, !,

M = (2 * CL1_G31 * CL1_C13E + CL1_G33 * CL1_C33E) / (CL1_G31 * (CL1_C11E + CL1_C12E) + CL1_G33 *

CL1_C13E),

A1 = 2 * CL1_G31 * CL1_E33S + CL1_G33 * M * CL1_E33S,

C1 = CL1_G31 * (CL1_C11E + CL1_C12E) + CL1_G33 * CL1_C13E, D1 = sqrt(1 - 4 * A1 * C1),

CL2_H31 = (1 - D1) / (2 * A1), CL2_H33 = M * CL2_H31,

A2 = CL1_G15 * CL1_E11S,

C2 = CL1_G15 * CL1_C44E,

D2 = sqrt(1 - 4 * A2 * C2), CL2_H15 = (1 - D2) / (2 * A2);

CL2_H31 = CL1_H31, CL2_H33 = CL1_H33, CL2_H15 = CL1_H15.

get_g(RC, Re, Rs, cl(CL1_C11E, CL1_C12E, CL1_C13E, CL1_C33E, CL1_C44E, CL1_C11D, CL1_C12D, CL1_C13D, CL1_C33D, CL1_C44D, CL1_S11E, CL1_S12E, CL1_S13E, CL1_S33E, CL1_S44E, CL1_S11D, CL1_S12D, CL1_S13D, CL1_S33D, CL1_S44D, CL1_E31, CL1_E33, CL1_E15, CL1_D31, CL1_D33, CL1_D15, CL1_H31, CL1_H33, CL1_H15, CL1_G31, CL1_G33, CL1_G15, CL1_E11S, CL1_E33S, CL1_E11T, CL1_E33T), cl(CL1_C11E, CL1_C12E, CL1_C13E, CL1_C33E, CL1_C44E, CL1_C11D, CL1_C12D, CL1_C13D, CL1_C33D, CL1_C44D, CL1_S11E, CL1_S12E, CL1_S13E, CL1_S33E, CL1_S44E, CL1_S11D, CL1_S12D, CL1_S13D, CL1_S33D, CL1_S44D, CL1_E31, CL1_E33, CL1_E15, CL1_D31, CL1_D33, CL1_D15, CL1_H31, CL1_H33, CL1_H15, CL2_G31, CL2_G33, CL2_G15, CL1_E11S, CL1_E33S, CL1_E11T, CL1_E33T)) :-

RC = 1, Re = 1, Rs = 1, !,

CL2_G31 = CL1_H31 * (CL1_S11D + CL1_S12D) + CL1_H33 * CL1_S13D,

CL2_G33 = 2 * CL1_H31 * CL1_S13D + CL1_H33 * CL1_S33D, CL2_G15 = CL1_H15 * CL1_S44D;

RC = 1, Re = 3, Rs = 1, !, CL2_G31 = CL1_D31 / CL1_E33T, CL2_G33 = CL1_D33 / CL1_E33T, CL2_G15 = CL1_D15 / CL1_E11T; RC = 1, Re = 3, Rs = 2, !,

M = (2 * CL1_H31 * CL1_S13E + CL1_H33 * CL1_S33E) / (CL1_H31 * (CL1_S11E + CL1_S12E) + CL1_H33 * CL1_S13E),

A1 = 2 * CL1_H31 * CL1_E33T + CL1_H33 * M * CL1_E33T,

C1 = -CL1_H31 * (CL1_S11E + CL1_S12E) - CL1_H33 * CL1_S13E, D1 = sqrt(1 - 4 * A1 * C1),

CL2_G31 = (D1 - 1) / (2 * A1), CL2_G33 = M * CL2_G31,

A2 = CL1_H15 * CL1_E11T,

C2 = -CL1_H15 * CL1_S44E,

D2 = sqrt(1 - 4 * A2 * C2), CL2_G15 = (D2 - 1) / (2 * A2);

CL2_G31 = CL1_G31, CL2_G33 = CL1_G33, CL2_G15 = CL1_G15.

get_es(RC, Re, Rs, cl(CL1_C11E, CL1_C12E, CL1_C13E, CL1_C33E, CL1_C44E, CL1_C11D, CL1_C12D, CL1_C13D,

CL1_C33D, CL1_C44D, CL1_S11E, CL1_S12E, CL1_S13E, CL1_S33E, CL1_S44E, CL1_S11D, CL1_S12D, CL1_S13D, CL1_S33D, CL1_S44D, CL1_E31, CL1_E33, CL1_E15, CL1_D31, CL1_D33, CL1_D15, CL1_H31, CL1_H33, CL1_H15, CL1_G31, CL1_G33,

CL1_G15, CL1_E11S, CL1_E33S, CL1_E11T, CL1_E33T), cl(CL1_C11E, CL1_C12E, CL1_C13E, CL1_C33E, CL1_C44E, CL1_C11D, CL1_C12D, CL1_C13D, CL1_C33D, CL1_C44D, CL1_S11E, CL1_S12E, CL1_S13E, CL1_S33E, CL1_S44E, CL1_S11D,

CL1_S12D, CL1_S13D, CL1_S33D, CL1_S44D, CL1_E31, CL1_E33, CL1_E15, CL1_D31, CL1_D33, CL1_D15, CL1_H31, CL1_H33, CL1_H15, CL1_G31, CL1_G33, CL1_G15, CL2_E11S, CL2_E33S, CL1_E11T, CL1_E33T)) :-

RC = 1, Re = 1, Rs = 2, !,

CL2_E11S = CL1_E11T - CL1_D15 * CL1_E15,

CL2_E33S = CL1_E33T - 2 * CL1_D31 * CL1_E31 - CL1_D33 * CL1_E33; RC = 1, Re = 3, Rs = 2, !,

CL2_E11S = CL1_E15 / CL1_H15,

CL2_E33S = CL1_E33 / CL1_H33;

11

CL2_E11S = CL1_E11S, CL2_E33S = CL1_E33S.

get_et(RC, Re, Rs, cl(CL1_C11E, CL1_C12E, CL1_C13E, CL1_C33E, CL1_C44E, CL1_C11D, CL1_C12D, CL1_C13D, CL1_C33D, CL1_C44D, CL1_S11E, CL1_S12E, CL1_S13E, CL1_S33E, CL1_S44E, CL1_S11D, CL1_S12D, CL1_S13D, CL1_S33D,

CL1_S44D, CL1_E31, CL1_E33, CL1_E15, CL1_D31, CL1_D33, CL1_D15, CL1_H31, CL1_H33, CL1_H15, CL1_G31, CL1_G33, CL1_G15, CL1_E11S, CL1_E33S, CL1_E11T, CL1_E33T), cl(CL1_C11E, CL1_C12E, CL1_C13E, CL1_C33E, CL1_C44E, CL1_C11D, CL1_C12D, CL1_C13D, CL1_C33D, CL1_C44D, CL1_S11E, CL1_S12E, CL1_S13E, CL1_S33E, CL1_S44E, CL1_S11D, CL1_S12D, CL1_S13D, CL1_S33D, CL1_S44D, CL1_E31, CL1_E33, CL1_E15, CL1_D31, CL1_D33, CL1_D15, CL1_H31,

CL1_H33, CL1_H15, CL1_G31, CL1_G33, CL1_G15, CL1_E11S, CL1_E33S, CL2_E11T, CL2_E33T)) :- RC = 1, Re = 1, Rs = 1, !,

CL2_E11T = CL1_E11S + CL1_D15 * CL1_E15,

CL2_E33T = CL1_E33S + 2 * CL1_D31 * CL1_E31 + CL1_D33 * CL1_E33;

RC = 1, Re = 4, Rs = 1, !, CL2_E11T = CL1_D15 / CL1_G15,

CL2_E33T = CL1_D31 / CL1_G31;

CL2_E11T = CL1_E11T, CL2_E33T = CL1_E33T.

get_constants(pcl(PCL_C11E, PCL_C12E, PCL_C13E, PCL_C33E, PCL_C44E, PCL_E31, PCL_E33, PCL_E15, PCL_S11, PCL_S33, PCL_Reg_C, PCL_Reg_e, PCL_Reg_s), OutConstList) :-

eq1(PCL_Reg_C, [PCL_C11E, PCL_C12E, PCL_C13E, PCL_C33E, PCL_C44E], [CL_C11E, CL_C12E, CL_C13E, CL_C33E, CL_C44E], [CL_C11D, CL_C12D, CL_C13D, CL_C33D, CL_C44D], [CL_S11E, CL_S12E, CL_S13E, CL_S33E, CL_S44E],

[CL_S11D, CL_S12D, CL_S13D, CL_S33D, CL_S44D]),

eq2(PCL_Reg_e, [PCL_E31, PCL_E33, PCL_E15], [CL_E31, CL_E33, CL_E15], [CL_D31, CL_D33, CL_D15], [CL_H31,

CL_H33, CL_H15], [CL_G31, CL_G33, CL_G15]),

eq3(PCL_Reg_s, [PCL_S11, PCL_S33], [CL_E11S, CL_E33S], [CL_E11T, CL_E33T]), get_constants_aux(PCL_Reg_C, PCL_Reg_e, PCL_Reg_s, cl(CL_C11E, CL_C12E, CL_C13E, CL_C33E, CL_C44E,

CL_C11D, CL_C12D, CL_C13D, CL_C33D, CL_C44D, CL_S11E, CL_S12E, CL_S13E, CL_S33E, CL_S44E, CL_S11D, CL_S12D, CL_S13D, CL_S33D, CL_S44D, CL_E31, CL_E33, CL_E15, CL_D31, CL_D33, CL_D15, CL_H31, CL_H33, CL_H15, CL_G31, CL_G33, CL_G15, CL_E11S, CL_E33S, CL_E11T, CL_E33T), OutConstList).

eq1(PCL_Reg_C, List, List1, List2, List3, List4) :- PCL_Reg_C = 1, List1 = List, !;

PCL_Reg_C = 2, List2 = List, !;

PCL_Reg_C = 3, List3 = List, !;

PCL_Reg_C = 4, List4 = List, !;

write("eq1. PCL_Reg_C <= 0 || PCL_Reg_C >= 5"), !, fail. eq2(PCL_Reg_e, List, List1, List2, List3, List4) :-

PCL_Reg_e = 1, List1 = List, !;

PCL_Reg_e = 2, List2 = List, !;

PCL_Reg_e = 3, List3 = List, !;

PCL_Reg_e = 4, List4 = List, !;

write("eq1. PCL_Reg_e <= 0 || PCL_Reg_e >= 5"), !, fail. eq3(PCL_Reg_s, List, List1, List2) :-

PCL_Reg_s = 1, List1 = List, !;

PCL_Reg_s = 2, List2 = List, !;

write("eq1. PCL_Reg_s <= 0 || PCL_Reg_s >= 3"), !, fail. get_constants_aux(PCL_Reg_C, PCL_Reg_e, PCL_Reg_s, InConstList, OutConstList) :-

get_constants_aux1(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 1, PCL_Reg_s = 1, !,

get_cd(1, 1, 1, ConstList1, ConstList2), get_sd(1, 1, 1, ConstList2, ConstList3), get_d(1, 1, 1, ConstList3, ConstList4), get_h(1, 1, 1, ConstList4, ConstList5), get_g(1, 1, 1, ConstList5, ConstList6), get_et(1, 1, 1, ConstList6, OutConstList);

get_constants_aux1(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 1, PCL_Reg_s = 2, !,

get_d(1, 1, 1, ConstList1, ConstList2), get_es(1, 1, 2, ConstList2, ConstList3), get_cd(1, 1, 1, ConstList3, ConstList4), get_sd(1, 1, 1, ConstList4, ConstList5), get_h(1, 1, 1, ConstList5, ConstList6), get_g(1, 1, 1, ConstList6, OutConstList);

get_constants_aux1(PCL_Reg_C, InConstList, ConstList1),

PCL_Reg_e = 2, PCL_Reg_s = 1, !, get_e(1, 3, 2, ConstList1, ConstList2), get_h(1, 1, 1, ConstList2, ConstList3), get_cd(1, 3, 2, ConstList3, ConstList4), get_sd(1, 1, 1, ConstList4, ConstList5), get_et(1, 1, 1, ConstList5, ConstList6), get_g(1, 3, 1, ConstList6, OutConstList);

get_constants_aux1(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 2, PCL_Reg_s = 2, !,

get_g(1, 3, 1, ConstList1, ConstList2), get_e(1, 3, 2, ConstList2, ConstList3), get_es(1, 1, 2, ConstList3, ConstList4), get_h(1, 1, 1, ConstList4, ConstList5), get_cd(1, 3, 2, ConstList5, ConstList6), get_sd(1, 1, 1, ConstList6, OutConstList);

get_constants_aux1(PCL_Reg_C, InConstList, ConstList1),

PCL_Reg_e = 3, PCL_Reg_s = 1, !, get_cd(1, 3, 1, ConstList1, ConstList2), get_sd(1, 1, 1, ConstList2, ConstList3), get_e(1, 3, 1, ConstList3, ConstList4), get_d(1, 1, 1, ConstList4, ConstList5), get_et(1, 1, 1, ConstList5, ConstList6), get_g(1, 3, 1, ConstList6, OutConstList);

get_constants_aux1(PCL_Reg_C, InConstList, ConstList1),

PCL_Reg_e = 3, PCL_Reg_s = 2, !, get_g(1, 3, 2, ConstList1, ConstList2), get_d(1, 3, 2, ConstList2, ConstList3), get_e(1, 3, 2, ConstList3, ConstList4), get_es(1, 3, 2, ConstList4, ConstList5), get_cd(1, 3, 2, ConstList5, ConstList6),

get_sd(1, 1, 1, ConstList6, OutConstList); get_constants_aux1(PCL_Reg_C, InConstList, ConstList1),

12

PCL_Reg_e = 4, PCL_Reg_s = 1, !, get_h(1, 4, 1, ConstList1, ConstList2), get_e(1, 3, 1, ConstList2, ConstList3), get_cd(1, 3, 1, ConstList3, ConstList4), get_sd(1, 1, 1, ConstList4, ConstList5), get_d(1, 1, 1, ConstList5, ConstList6),

get_et(1, 4, 1, ConstList6, OutConstList); get_constants_aux1(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 4, PCL_Reg_s = 2, !,

get_d(1, 3, 2, ConstList1, ConstList2), get_e(1, 3, 2, ConstList2, ConstList3), get_es(1, 1, 2, ConstList3, ConstList4), get_h(1, 1, 1, ConstList4, ConstList5), get_cd(1, 3, 2, ConstList5, ConstList6), get_sd(1, 1, 1, ConstList6, OutConstList);

get_constants_aux2(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 1, PCL_Reg_s = 1, !,

get_h(1, 1, 1, ConstList1, ConstList2), get_g(1, 1, 1, ConstList2, ConstList3), get_ce(2, 1, 1, ConstList3, ConstList4), get_se(1, 1, 1, ConstList4, ConstList5), get_d(1, 1, 1, ConstList5, ConstList6), get_et(1, 4, 1, ConstList6, OutConstList);

get_constants_aux2(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 1, PCL_Reg_s = 2, !,

get_d(2, 1, 2, ConstList1, ConstList2), get_g(1, 3, 1, ConstList2, ConstList3), get_es(1, 1, 2, ConstList3, ConstList4), get_h(1, 1, 1, ConstList4, ConstList5), get_ce(2, 1, 1, ConstList5, ConstList6), get_se(1, 1, 1, ConstList6, OutConstList);

get_constants_aux2(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 2, PCL_Reg_s = 1, !,

get_e(2, 2, 1, ConstList1, ConstList2), get_h(1, 1, 1, ConstList2, ConstList3), get_g(1, 1, 1, ConstList3, ConstList4), get_et(1, 1, 1, ConstList4, ConstList5), get_ce(2, 1, 1, ConstList5, ConstList6), get_se(1, 1, 1, ConstList6, OutConstList);

get_constants_aux2(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 2, PCL_Reg_s = 2, !,

get_g(1, 3, 1, ConstList1, ConstList2), get_se(2, 3, 2, ConstList2, ConstList3), get_ce(2, 3, 2, ConstList3, ConstList4), get_e(1, 3, 2, ConstList4, ConstList5), get_es(1, 1, 2, ConstList5, ConstList6), get_h(1, 1, 1, ConstList6, OutConstList);

get_constants_aux2(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 3, PCL_Reg_s = 1, !,

get_g(1, 1, 1, ConstList1, ConstList2), get_e(1, 3, 1, ConstList2, ConstList3), get_ce(2, 1, 1, ConstList3, ConstList4), get_se(1, 1, 1, ConstList4, ConstList5), get_d(1, 1, 1, ConstList5, ConstList6), get_et(1, 1, 1, ConstList6, OutConstList);

get_constants_aux2(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 3, PCL_Reg_s = 2, !,

get_g(1, 1, 1, ConstList1, ConstList2), get_d(1, 3, 2, ConstList2, ConstList3), get_se(2, 3, 2, ConstList3, ConstList4), get_ce(2, 3, 2, ConstList4, ConstList5), get_e(1, 3, 2, ConstList5, ConstList6), get_es(1, 3, 2, ConstList6, OutConstList);

get_constants_aux2(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 4, PCL_Reg_s = 1, !,

get_h(2, 4, 1, ConstList1, ConstList2), get_ce(1, 3, 1, ConstList2, ConstList3), get_se(2, 4, 1, ConstList3, ConstList4), get_e(1, 3, 1, ConstList4, ConstList5), get_d(1, 1, 1, ConstList5, ConstList6), get_et(1, 1, 1, ConstList6, OutConstList);

get_constants_aux2(PCL_Reg_C, InConstList, ConstList1), PCL_Reg_e = 4, PCL_Reg_s = 2, !,

get_d(1, 3, 2, ConstList1, ConstList2), get_h(2, 4, 1, ConstList2, ConstList3), get_se(2, 3, 2, ConstList3, ConstList4), get_ce(2, 3, 2, ConstList4, ConstList5), get_e(1, 3, 2, ConstList5, ConstList6), get_es(1, 1, 2, ConstList6, OutConstList).

get_constants_aux1(Reg_C, InConstList, OutConstList) :- Reg_C = 1, !, get_se(1, 1, 1, InConstList, OutConstList);

Reg_C = 3, get_ce(2, 3, 2, InConstList, OutConstList). get_constants_aux2(Reg_C, InConstList, OutConstList) :-

Reg_C = 2, !, get_sd(1, 1, 1, InConstList, OutConstList); Reg_C = 4, get_cd(0, 0, 0, InConstList, OutConstList).

log_str(String) :-

removewindow(), write(String), nl, makewindow(1, 15, 15, "Piezomaterial", 1, 0, 24, 80).

13

Тестирование Пример входных и выходных данных представлен в табл. 3.

Таблица 3 — Результаты тестирования

Входные данные

P-5C;Piezotite;8;3;4;2;0.0126;-0.0047;-0.0053;0.0128;0.0316;-0.0001;0.00016;0.00027;1230;1550 P-5E;Piezotite;7.8;3;4;2;0.0124;-0.0041;-0.0052;0.0143;0.034;-0.0001;0.0002;0.0003;1490;1510 P-6C;Piezotite;7.7;3;4;2;0.0094;-0.003;-0.003;0.0103;0.0256;-8E-05;0.00019;0.00029;760;800 P-6E;Piezotite;7.6;3;4;2;0.0111;-0.0036;-0.0043;0.0127;0.03;-8E-05;0.00019;0.00028;1260;1380 P-6F;Piezotite;7.9;3;4;2;0.0134;-0.0048;-0.0054;0.0145;0.0342;-9E-05;0.0002;0.00029;1670;1780 P-7;Piezotite;7.8;3;4;2;0.0158;-0.0057;-0.007;0.0181;0.0406;-0.00011;0.00022;0.00032;1930;2100 P-7B;Piezotite;8;3;4;2;0.0167;-0.0059;-0.0075;0.0188;0.0388;-7E-05;0.00014;0.00021;3200;4720 PZT-5A;FEM;7.75;3;2;2;0.0164;-0.00574;-0.00722;0.0188;0.0475;-0.171;0.374;0.584;1730;1700 PMN-30PT;ATILA;8;3;2;2;0.052;-0.0189;-0.0311;0.677;0.14;-0.921;1.981;0.191;2926;1104

Material 38;FEMP;8;1;1;1;122.74;91.034;82.098;116.25;21.053;-0.34665;1.27164;1.22947;813;827 P-10;FDK;7.52;1;1;1;121;77.5;76.5;107;22.4;-4.38;18.6;13.3;1946;2127 P-11;FDK;7.53;1;1;1;118;71.9;75.3;112;23.5;-5.67;19.2;13.2;2004;2334 P-12;FDK;7.36;1;1;1;123;77.3;76.5;111;25.5;-7.75;23.1;15.5;2673;3367 P-15;FDK;7.89;1;1;1;137;88.1;88.3;120;17.1;-10.8;8.7;14.4;2149;1399 P-17;FDK;7.33;1;1;1;128;75.1;78.1;107;25.3;-2.73;35.6;21.5;4548;4504 P-24;FDK;7.66;1;1;1;184;113.1;114.9;171;34.7;-2.82;21.3;10.7;1173;1290 P-31;FDK;7.7;1;1;1;163;100.1;103.2;142;26.1;-3.39;18.7;13.6;1682;1607 P-34;FDK;7.72;1;1;1;170;101.1;105.7;168;35.2;-3.39;14.4;7.9;1025;1215 P-37;FDK;7.784;1;1;1;197;111.8;123.8;208;44.2;-2.61;11;4.6;593;651

C-84;PengXiang;7.67;1;1;1;137;90;91;116;19;-10.4;25.5;21.8;2046;1689

C-92;PengXiang;7.9;1;1;1;141;92;93;122;26;-11;25.4;19.9;2229;1915

C-93;PengXiang;7.91;1;1;1;132;83;87;116;21;-8.4;31.5;23.2;2763;2409

C-94;PengXiang;7.99;1;1;1;142;94;95;126;23;-12.4;28.6;22.2;2584;2196

Выходные данные

P- 5C;Piezotite;8;171.31383913;113.51037092;117.93502448;175.78994215;31.64556962;171.45765931;113.6541911;117.86 710939;175.82201316;31.735621455;0.0126;-0.0047;-0.0053;0.0128;0.0316;0.0125845;-0.0047155;- 0.0052752;0.01276032;0.031510333;-14.899866489;7.0360480641;10.509493671;-0.155;0.248;0.3321;- 0.0096524475389;0.0045581002267;0.0085686177928;-0.0001;0.00016;0.00027;1226.5097972;1543.6361015;1230;1550

P- 5E;Piezotite;7.8;140.96701421;80.3609536;80.482897384;128.46308621;29.411764706;141.02229341;80.416232808;80.3 95017618;128.60279251;29.528227509;0.0124;-0.0041;-0.0052;0.0143;0.034;0.0123849;-0.0041151;- 0.0051698;0.0142396;0.0338659;-9.1146881288;14.490017025;13.147058824;-0.151;0.302;0.447;- 0.0060648490988;0.0096415549775;0.0088584682527;-0.0001;0.0002;0.0003;1484.1232647;1502.871379;1490;1510

P- 6C;Piezotite;7.7;147.79336529;67.148203996;62.604340568;133.55592654;39.0625;147.81590946;67.170748169;62.5390 15719;133.7452143;39.160272186;0.0094;-0.003;-0.003;0.0103;0.0256;0.00939488;-0.00300512;- 0.00298784;0.01027112;0.025536084;-4.2404006678;12.287145242;8.609375;-0.064;0.152;0.2204;- 0.0053165196237;0.015405348201;0.011356478934;-0.00008;0.00019;0.00029;758.10249375;797.58958264;760;800

P-

6E;Piezotite;7.6;142.98906451;74.961853628;73.794405354;128.71117213;33.333333333;143.00522545;74.978014565;73

.734553038;128.93283624;33.443455945;0.0111;-0.0036;-0.0043;0.0127;0.03;0.011091168;-0.003608832;- 0.004279024;0.012650182;0.029901216;-4.7128882787;17.45426463;11.76;-0.1104;0.2622;0.3528;- 0.0034290941239;0.012699710399;0.0093641676646;-0.00008;0.00019;0.00028;1255.851072;1374.3828861;1260;1380

P-

6F;Piezotite;7.9;136.69217194;81.747116999;81.349804158;129.55709551;29.239766082;136.71272754;81.767672594;81

.281468223;129.78427453;29.360338346;0.0134;-0.0048;-0.0054;0.0145;0.0342;0.013385582;-0.004814418;- 0.00536796;0.0144288;0.034059553;-6.0334438084;20.05784875;14.160818713;-0.1602;0.356;0.4843;-

0.0034069423673;0.011326190626;0.0085144981204;-0.00009;0.0002;0.00029;1663.1419155;1770.9262904;1670;1780

P-

7;Piezotite;7.8;129.96492844;83.453300538;82.537436623;119.08972998;24.630541872;130.02468245;83.513054542;82. 447076909;119.2263715;24.751024494;0.0158;-0.0057;-0.007;0.0181;0.0406;0.01577459;-0.00572541;-

0.00694918;0.01799836;0.040402368;-11.167315175;16.887159533;15.21182266;-0.231;0.462;0.6176;- 0.0053507941492;0.008091444811;0.0079203278382;-0.00011;0.00022;0.00032;1920.6051783;2087.0388327;1930;2100

P- 7B;Piezotite;8;125.94540916;81.697621547;82.836315441;119.28429423;25.773195876;125.98636708;81.738579474;82.7

65177989;119.40784876;25.8672781;0.0167;-0.0059;-0.0075;0.0188;0.0388;0.016676872;-0.005923128;- 0.007453744;0.018707488;0.03865888;-13.867020102;24.084824387;17.319587629;-0.3304;0.6608;0.672;-

0.0029536213405;0.0051299739072;0.005432128401;-0.00007;0.00014;0.00021;3188.3612371;4694.9214212;3200;4720

PZT-

5A;FEM;7.75;120.3462496;75.17913126;75.090066479;110.86705106;21.052631579;120.36317061;75.196052269;75.040157 199;111.01426074;21.140371775;0.0164;-0.00574;-0.00722;0.0188;0.0475;0.016382799412;-0.0057572005882;- 0.00718238;0.01871772;0.047302857803;-5.3511552638;15.783474361;12.294736842;-0.171;0.374;0.584;- 0.0031621225409;0.009326823385;0.0071364029577;-

0.00010058823529;0.00022;0.00033757225434;1722.8198737;1692.2668855;1730;1700

PMN30PT;ATILA;8;23.585124088;9.4807517327;1.5189789336;1.6166624663;7.1428571429;24.300659065;10.196286709;1.5084 289204;1.6168180181;7.1434933155;0.052;-0.0189;-0.0311;0.677;0.14;0.051231665761;-0.019668334239;-

14

0.029447372283;0.67344532518;0.13998753213;-27.444574364;0.40464915006;1.3642857143;-0.921;1.981;0.191;-

0.026072001238;0.00038441161453;0.00046630458758;- 0.00083423913043;0.001794384058;0.000065276828435;2925.7394214;1052.6454841;2926;1104

Material 38;FEMP;8;122.74;91.034;82.098;116.25;21.053;122.7401453;91.034145304;82.097466972;116.25195534;21.054859282;0

.020881544551;-0.010658227101;-0.0072199046538;0.018799823351;0.047499168765;0.020881348762;-0.01065842289;- 0.0072194598073;0.018798812628;0.047494974276;-0.34665;1.27164;1.22947;-

0.012725032548;0.028912167262;0.058398803021;-0.00041916565901;0.0015376541717;0.0015122632226;- 0.00001538613195;0.000034958371917;0.000071824902858;813;827;813.07179958;827.04558813

P- 10;FDK;7.52;121;77.5;76.5;107;22.4;121.00901946;77.509019464;76.461698166;107.16265162;22.490899281;0.01710516

0058;-0.0058833456895;-0.0080230728894;0.020818038804;0.044642857143;0.01708674623;-0.0059017595173;- 0.0079806076564;0.020720107183;0.044462428448;-4.38;18.6;13.3;-0.19838070267;0.45749764027;0.59375;-

0.0020592383639;0.0087447108604;0.0068345323741;- 0.000092820660183;0.00021405929322;0.00030387990666;1946;2127;1953.896875;2137.2472711

P- 11;FDK;7.53;118;71.9;75.3;112;23.5;118.01377416;71.913774165;75.253357326;112.15794344;23.586946108;0.01648624

7162;-0.0052057268077;-0.0075841355596;0.019126525136;0.042553191489;0.016467517692;-0.0052244562775;- 0.0075436308129;0.019038928716;0.042396332083;-5.67;19.2;13.2;-0.20957595315;0.45323337987;0.56170212766;-

0.0024293059126;0.0082262210797;0.0065868263473;- 0.000089368410381;0.00019327001061;0.00027925727719;2004;2334;2011.4144681;2345.0786722

P- 12;FDK;7.36;123;77.3;76.5;111;25.5;123.01783858;77.31783858;76.446829522;111.15848233;25.589880284;0.016212175

021;-0.0056696630536;-0.0072657852747;0.019024010334;0.039215686275;0.01619377099;-0.0056880670842;- 0.0072250694566;0.018933933443;0.039077947567;-7.75;23.1;15.5;-0.24954410759;0.55207431046;0.60784313725;-

0.0023017523018;0.0068607068607;0.005798728021;- 0.000073750611737;0.00016316080758;0.00022660238956;2673;3367;2682.4215686;3383.6208502

P- 15;FDK;7.89;137;88.1;88.3;120;17.1;137.08337384;88.183373838;88.232837741;120.05410293;17.196491391;0.01547970

8374;-0.0049701893768;-0.0077332543952;0.019714106052;0.058479532164;0.015456461109;-0.0049934366419;- 0.0076897191975;0.019632577604;0.058151397122;-10.8;8.7;14.4;-0.1807821184;0.33855101758;0.84210526316;-

0.007719799857;0.0062187276626;0.0067007910656;- 0.00012859272427;0.00024081583976;0.00038966036229;2149;1399;2161.1263158;1405.8502876

P- 17;FDK;7.33;128;75.1;78.1;107;25.3;128.00165473;75.101654729;78.078421847;107.28138544;25.401638083;0.01506418

6321;-0.0038394053615;-0.0081930410554;0.021306102924;0.0395256917;0.015041275113;-0.0038623165696;- 0.0081359449024;0.021163815766;0.039367539871;-2.73;35.6;21.5;-0.32231591359;0.80323126825;0.84980237154;- 0.00060612788632;0.0079040852575;0.0047273526825;- 0.000071083080672;0.00017714345036;0.00018610424521;4548;4504;4566.270751;4534.354878

P- 24;FDK;7.66;184;113.1;114.9;171;34.7;184.00616465;113.10616465;114.85343721;171.35169767;34.797604433;0.010556

27305;-0.0035480993059;-0.0047090009541;0.012176189586;0.028818443804;0.01054515652;-0.003559215835;- 0.0046825290368;0.012113151708;0.028737610427;-2.82;21.3;10.7;-0.12006477028;0.28591160357;0.3083573487;- 0.0021860465116;0.016511627907;0.0091219096334;- 0.000092587768384;0.00022048030632;0.0002621418854;1173;1290;1176.2994236;1296.7670825

P- 31;FDK;7.7;163;100.1;103.2;142;26.1;163.00715128;100.10715128;103.16055196;142.21760423;26.209964328;0.0123701

24219;-0.0035281269735;-0.0064260148994;0.016382601938;0.038314176245;0.012356162363;-0.0035420888291;- 0.006393474955;0.016306763309;0.038153428501;-3.39;18.7;13.6;-0.15014084928;0.34992303726;0.52107279693;- 0.0021095208463;0.011636589919;0.0080856123662;- 0.00009299171807;0.00021672945493;0.0003084938333;1682;1607;1689.08659;1614.5615158

P- 34;FDK;7.72;170;101.1;105.7;168;35.2;170.00945852;101.10945852;105.65982222;168.17066667;35.260887805;0.010877

611796;-0.0036361763024;-0.0045560698316;0.01168543549;0.028409090909;0.010870941119;-0.0036428469796;- 0.004541333854;0.011652882718;0.028360034652;-3.39;14.4;7.9;-0.090155871899;0.19916042452;0.22443181818;- 0.0027901234568;0.011851851852;0.0077073170732;- 0.000073990491053;0.00016345000385;0.00021857977927;1025;1215;1026.7730114;1218.4791669

P- 37;FDK;7.784;197;111.8;123.8;208;44.2;197.01046406;111.81046406;123.75589862;208.1858679;44.235682968;0.008965

8549443;-0.0027712342576;-0.0036869905818;0.0091966291733;0.022624434389;0.0089609245003;-0.0027761647016;- 0.0036765248014;0.0091744136165;0.022606184259;-2.61;11;4.6;-0.056724856392;0.12040901174;0.10407239819;- 0.0040092165899;0.016897081413;0.0077571669477;- 0.000086918580477;0.00018450078225;0.00017535994535;593;651;593.47873303;652.62060288

C- 84;PengXiang;7.67;137;90;91;116;19;137.06403789;90.064037892;90.842984014;116.38499112;19.232277615;0.01657483 8302;-0.0047017574425;-0.0093142272262;0.023234390993;0.052631578947;0.016498921324;-0.004777674421;- 0.0091488862504;0.022874291858;0.051995921649;-10.4;25.5;21.8;-0.36099283521;0.78621289662;1.1473684211;-

0.0061574896388;0.015097690941;0.010654936461;- 0.00021030051342;0.00045801733357;0.00055401324142;2046;1689;2071.0126316;1716.5570798

C- 92;PengXiang;7.9;141;92;93;122;26;141.06318538;92.063185379;92.854099217;122.33689817;26.177662629;0.015685749

497;-0.0047224137678;-0.0083572969087;0.020938173976;0.038461538462;0.015628648908;-0.0047795143571;- 0.0082345280212;0.020674215233;0.038200507592;-11;25.4;19.9;-0.33287203451;0.71569015097;0.76538461538;-

0.0057441253264;0.013263707572;0.0089277703006;- 0.00017153916021;0.00036881706704;0.00034104535715;2229;1915;2244.2311538;1940.5017146

C- 93;PengXiang;7.91;132;83;87;116;21;132.02929016;83.029290162;86.890161893;116.4118929;21.194802751;0.016121241

396;-0.0042869218693;-0.008875739645;0.021934299123;0.047619047619;0.016062418052;-0.0043457452133;- 0.0087453573207;0.021645305853;0.04718137799;-8.4;31.5;23.2;-0.37899408284;0.8400428484;1.1047619048;-

0.0034869240349;0.013075965131;0.0083966702859;-

0.00015520913551;0.00034402205785;0.00039616647462;2763;2409;2788.6304762;2441.8284503

C- 94;PengXiang;7.99;142;94;95;126;23;142.07001821;94.070018215;94.838506375;126.37247723;23.190727554;0.01580773

29;-0.0050256004336;-0.0081293855896;0.020195105254;0.04347826087;0.015747526548;-0.0050858067853;- 0.0080012800243;0.019922525445;0.043120682508;-12.4;28.6;22.2;-0.36619887044;0.77918877289;0.9652173913;-

0.0056466302368;0.013023679417;0.0085913312693;- 0.00016440889515;0.00034982512401;0.00037046406799;2584;2196;2605.4278261;2227.3665309

15