File2
"CREER Mat R(REF)
Mat T(CIBLE)"Ý
Dim Mat R
"ROW":List Ans[1]ÞIÝ
"COL":List Ans[2]ÞJÝ
0ÞÎ
For 1ÞH To I
For 1ÞK To J
Mat R[H,K]‰ÎÞÎ
Next:Next
"G1/":ι(IJ)ÞMÝ
0ÞÎ
For 1ÞH To I
For 1ÞK To J
Mat T[H,K]‰ÎÞÎ
Next:Next
"G2/":ι(IJ)ÞNÝ
0ÞÍ
For 1ÞH To I
For 1ÞK To J
1‰ÍÞÍ
Mat R[H,K]™MÞList 1[Í]
Mat T[H,K]™NÞList 2[Í]
Next:Next
IJÞL
0ÞÍ
For 1ÞF To L
List 1[F]©List 2[F]‰ÍÞÍ
Next
"SIG1.2":ÍÞSÝ
0ÞÍ
For 1ÞF To L
(List 1[F])‹‰ÍÞÍ
Next
"SIG1":ÍÞXÝ
0ÞÍ
For 1ÞF To L
(List 2[F])‹‰ÍÞÍ
Next
"SIG2":ÍÞYÝ
"R":S¹†(XY)Ý
File1