微波系统中散射参量S、阻抗参量Z及导纳参量Y之间的关系及MATLAB验证
用HFSS设计了一微波元件，仿真出了其散射参量S、阻抗参量Z及导纳参量Y，用MATLAB验证他们之间的关系
HFSS设计螺旋线圈
用HFSS设计了一个螺旋线圈，如上图所示。
进行仿真，得出了其散射参量S、阻抗参量Z及导纳参量Y，如下图所示
点“Export Matrix Data…” 生成matlat(*.m文件)， 文件名为：LC_Sensor_3mil-20220930-bak_HFSSDesign1.m
文件如下：
% Matlab m-File exported from HFSS2022.1.0
% Note: In three-dimensional arrays, like S(i,j,k), the first index corresponds to the frequency.
% So, S(N,j,k) is an S(j,k) matrix for frequency N.f = zeros(200,1);
S = zeros(200,2,2);
Y = zeros(200,2,2);
Z = zeros(200,2,2);
Gamma = zeros(200,2,2);
Zo = zeros(200,2,2);f = [1000000 11000000 21000000 31000000 41000000 51000000 61000000 71000000 81000000 91000000 101000000 111000000 121000000 131000000 141000000 151000000 161000000 171000000 181000000 191000000 201000000 211000000 221000000 231000000 241000000 251000000 261000000 271000000 281000000 291000000 301000000 311000000 321000000 331000000 341000000 351000000 361000000 371000000 381000000 391000000 401000000 411000000 421000000 431000000 441000000 451000000 461000000 471000000 481000000 491000000 501000000 511000000 521000000 531000000 541000000 551000000 561000000 571000000 581000000 591000000 601000000 611000000 621000000 631000000 641000000 651000000 661000000 671000000 681000000 691000000 701000000 711000000 721000000 731000000 741000000 751000000 761000000 771000000 781000000 791000000 801000000 811000000 821000000 831000000 841000000 851000000 861000000 871000000 881000000 891000000 901000000 911000000 921000000 931000000 941000000 951000000 961000000 971000000 981000000 991000000 1001000000 1011000000 1021000000 1031000000 1041000000 1051000000 1061000000 1071000000 1081000000 1091000000 1101000000 1111000000 1121000000 1131000000 1141000000 1151000000 1161000000 1171000000 1181000000 1191000000 1201000000 1211000000 1221000000 1231000000 1241000000 1251000000 1261000000 1271000000 1281000000 1291000000 1301000000 1311000000 1321000000 1331000000 1341000000 1351000000 1361000000 1371000000 1381000000 1391000000 1401000000 1411000000 1421000000 1431000000 1441000000 1451000000 1461000000 1471000000 1481000000 1491000000 1501000000 1511000000 1521000000 1531000000 1541000000 1551000000 1561000000 1571000000 1581000000 1591000000 1601000000 1611000000 1621000000 1631000000 1641000000 1651000000 1661000000 1671000000 1681000000 1691000000 1701000000 1711000000 1721000000 1731000000 1741000000 1751000000 1761000000 1771000000 1781000000 1791000000 1801000000 1811000000 1821000000 1831000000 1841000000 1851000000 1861000000 1871000000 1881000000 1891000000 1901000000 1911000000 1921000000 1931000000 1941000000 1951000000 1961000000 1971000000 1981000000 1991000000 ];
S(1,:,:) = [ 2.003693E-02 + 4.368950E-02i, 9.799334E-01 - 4.520220E-02i; 9.799334E-01 - 4.520220E-02i, 2.003713E-02 + 4.368939E-02i];
S(2,:,:) = [ 1.956901E-01 + 3.436366E-01i, 8.039073E-01 - 3.601019E-01i; 8.039073E-01 - 3.601019E-01i, 1.956837E-01 + 3.436395E-01i];
S(3,:,:) = [ 4.308258E-01 + 4.465323E-01i, 5.683294E-01 - 4.781165E-01i; 5.683294E-01 - 4.781165E-01i, 4.308089E-01 + 4.465466E-01i];
S(4,:,:) = [ 6.162726E-01 + 4.364035E-01i, 3.817800E-01 - 4.831507E-01i; 3.817800E-01 - 4.831507E-01i, 6.162476E-01 + 4.364352E-01i];
S(5,:,:) = [ 7.414585E-01 + 3.833982E-01i, 2.554506E-01 - 4.451678E-01i; 2.554506E-01 - 4.451678E-01i, 7.414288E-01 + 3.834497E-01i];
S(6,:,:) = [ 8.228778E-01 + 3.206635E-01i, 1.727249E-01 - 3.974557E-01i; 1.727249E-01 - 3.974557E-01i, 8.228461E-01 + 3.207355E-01i];
S(7,:,:) = [ 8.762045E-01 + 2.599368E-01i, 1.178563E-01 - 3.517220E-01i; 1.178563E-01 - 3.517220E-01i, 8.761730E-01 + 2.600292E-01i];
S(8,:,:) = [ 9.117788E-01 + 2.043985E-01i, 8.050388E-02 - 3.111236E-01i; 8.050388E-02 - 3.111236E-01i, 9.117490E-01 + 2.045110E-01i];
S(9,:,:) = [ 9.359004E-01 + 1.543041E-01i, 5.437958E-02 - 2.759160E-01i; 5.437958E-02 - 2.759160E-01i, 9.358735E-01 + 1.544364E-01i];
S(10,:,:) = [ 9.523893E-01 + 1.090480E-01i, 3.566979E-02 - 2.455027E-01i; 3.566979E-02 - 2.455027E-01i, 9.523664E-01 + 1.091997E-01i];
S(11,:,:) = [ 9.636062E-01 + 6.786741E-02i, 2.201171E-02 - 2.191273E-01i; 2.201171E-02 - 2.191273E-01i, 9.635882E-01 + 6.803813E-02i];
S(12,:,:) = [ 9.710528E-01 + 3.008168E-02i, 1.189645E-02 - 1.960751E-01i; 1.189645E-02 - 1.960751E-01i, 9.710404E-01 + 3.027122E-02i];
S(13,:,:) = [ 9.757320E-01 - 4.894261E-03i, 4.342412E-03 - 1.757742E-01i; 4.342412E-03 - 1.757742E-01i, 9.757260E-01 - 4.686383E-03i];
S(14,:,:) = [ 9.783019E-01 - 3.753403E-02i, -1.313383E-03 - 1.577451E-01i; -1.313383E-03 - 1.577451E-01i, 9.783031E-01 - 3.730820E-02i];
S(15,:,:) = [ 9.792184E-01 - 6.821406E-02i, -5.527738E-03 - 1.416056E-01i; -5.527738E-03 - 1.416056E-01i, 9.792273E-01 - 6.797063E-02i];
S(16,:,:) = [ 9.788047E-01 - 9.723328E-02i, -8.623142E-03 - 1.270515E-01i; -8.623142E-03 - 1.270515E-01i, 9.788220E-01 - 9.697258E-02i];
S(17,:,:) = [ 9.772957E-01 - 1.248299E-01i, -1.083240E-02 - 1.138398E-01i; -1.083240E-02 - 1.138398E-01i, 9.773220E-01 - 1.245522E-01i];
S(18,:,:) = [ 9.748654E-01 - 1.511946E-01i, -1.232703E-02 - 1.017755E-01i; -1.232703E-02 - 1.017755E-01i, 9.749013E-01 - 1.509004E-01i];
S(19,:,:) = [ 9.716452E-01 - 1.764812E-01i, -1.323585E-02 - 9.070051E-02i; -1.323585E-02 - 9.070051E-02i, 9.716913E-01 - 1.761708E-01i];
S(20,:,:) = [ 9.677363E-01 - 2.008145E-01i, -1.365725E-02 - 8.048631E-02i; -1.365725E-02 - 8.048631E-02i, 9.677932E-01 - 2.004883E-01i];
S(21,:,:) = [ 9.632182E-01 - 2.242962E-01i, -1.366765E-02 - 7.102727E-02i; -1.366765E-02 - 7.102727E-02i, 9.632864E-01 - 2.239546E-01i];
S(22,:,:) = [ 9.581539E-01 - 2.470101E-01i, -1.332731E-02 - 6.223603E-02i; -1.332731E-02 - 6.223603E-02i, 9.582340E-01 - 2.466534E-01i];
S(23,:,:) = [ 9.525946E-01 - 2.690252E-01i, -1.268443E-02 - 5.403987E-02i; -1.268443E-02 - 5.403987E-02i, 9.526871E-01 - 2.686538E-01i];
S(24,:,:) = [ 9.465824E-01 - 2.903989E-01i, -1.177810E-02 - 4.637779E-02i; -1.177810E-02 - 4.637779E-02i, 9.466878E-01 - 2.900134E-01i];
S(25,:,:) = [ 9.401526E-01 - 3.111794E-01i, -1.064042E-02 - 3.919832E-02i; -1.064042E-02 - 3.919832E-02i, 9.402713E-01 - 3.107802E-01i];
S(26,:,:) = [ 9.333348E-01 - 3.314069E-01i, -9.298113E-03 - 3.245774E-02i; -9.298113E-03 - 3.245774E-02i, 9.334674E-01 - 3.309944E-01i];
S(27,:,:) = [ 9.261548E-01 - 3.511154E-01i, -7.773653E-03 - 2.611871E-02i; -7.773653E-03 - 2.611871E-02i, 9.263017E-01 - 3.506901E-01i];
S(28,:,:) = [ 9.186350E-01 - 3.703340E-01i, -6.086180E-03 - 2.014912E-02i; -6.086180E-03 - 2.014912E-02i, 9.187966E-01 - 3.698963E-01i];
S(29,:,:) = [ 9.107951E-01 - 3.890871E-01i, -4.252161E-03 - 1.452124E-02i; -4.252161E-03 - 1.452124E-02i, 9.109718E-01 - 3.886376E-01i];
S(30,:,:) = [ 9.026528E-01 - 4.073960E-01i, -2.285911E-03 - 9.210953E-03i; -2.285911E-03 - 9.210953E-03i, 9.028450E-01 - 4.069351E-01i];
S(31,:,:) = [ 8.942241E-01 - 4.252788E-01i, -1.999944E-04 - 4.197192E-03i; -1.999944E-04 - 4.197192E-03i, 8.944322E-01 - 4.248070E-01i];
S(32,:,:) = [ 8.855236E-01 - 4.427512E-01i, 1.994460E-03 + 5.385502E-04i; 1.994460E-03 + 5.385502E-04i, 8.857479E-01 - 4.422690E-01i];
S(33,:,:) = [ 8.765647E-01 - 4.598269E-01i, 4.287516E-03 + 5.012618E-03i; 4.287516E-03 + 5.012618E-03i, 8.768057E-01 - 4.593348E-01i];
S(34,:,:) = [ 8.673599E-01 - 4.765179E-01i, 6.670232E-03 + 9.239523E-03i; 6.670232E-03 + 9.239523E-03i, 8.676179E-01 - 4.760163E-01i];
S(35,:,:) = [ 8.579211E-01 - 4.928347E-01i, 9.134503E-03 + 1.323222E-02i; 9.134503E-03 + 1.323222E-02i, 8.581963E-01 - 4.923242E-01i];
S(36,:,:) = [ 8.482591E-01 - 5.087866E-01i, 1.167294E-02 + 1.700232E-02i; 1.167294E-02 + 1.700232E-02i, 8.485519E-01 - 5.082676E-01i];
S(37,:,:) = [ 8.383845E-01 - 5.243818E-01i, 1.427878E-02 + 2.056031E-02i; 1.427878E-02 + 2.056031E-02i, 8.386953E-01 - 5.238550E-01i];
S(38,:,:) = [ 8.283072E-01 - 5.396280E-01i, 1.694577E-02 + 2.391569E-02i; 1.694577E-02 + 2.391569E-02i, 8.286362E-01 - 5.390936E-01i];
S(39,:,:) = [ 8.180368E-01 - 5.545316E-01i, 1.966814E-02 + 2.707710E-02i; 1.966814E-02 + 2.707710E-02i, 8.183843E-01 - 5.539904E-01i];
S(40,:,:) = [ 8.075823E-01 - 5.690990E-01i, 2.244053E-02 + 3.005249E-02i; 2.244053E-02 + 3.005249E-02i, 8.079486E-01 - 5.685512E-01i];
S(41,:,:) = [ 7.969526E-01 - 5.833356E-01i, 2.525796E-02 + 3.284913E-02i; 2.525796E-02 + 3.284913E-02i, 7.973378E-01 - 5.827818E-01i];
S(42,:,:) = [ 7.861559E-01 - 5.972466E-01i, 2.811577E-02 + 3.547378E-02i; 2.811577E-02 + 3.547378E-02i, 7.865605E-01 - 5.966873E-01i];
S(43,:,:) = [ 7.752005E-01 - 6.108368E-01i, 3.100962E-02 + 3.793270E-02i; 3.100962E-02 + 3.793270E-02i, 7.756247E-01 - 6.102726E-01i];
S(44,:,:) = [ 7.640943E-01 - 6.241108E-01i, 3.393544E-02 + 4.023173E-02i; 3.393544E-02 + 4.023173E-02i, 7.645382E-01 - 6.235419E-01i];
S(45,:,:) = [ 7.528447E-01 - 6.370727E-01i, 3.688941E-02 + 4.237635E-02i; 3.688941E-02 + 4.237635E-02i, 7.533087E-01 - 6.364998E-01i];
S(46,:,:) = [ 7.414591E-01 - 6.497267E-01i, 3.986799E-02 + 4.437171E-02i; 3.986799E-02 + 4.437171E-02i, 7.419435E-01 - 6.491500E-01i];
S(47,:,:) = [ 7.299447E-01 - 6.620765E-01i, 4.286784E-02 + 4.622268E-02i; 4.286784E-02 + 4.622268E-02i, 7.304497E-01 - 6.614966E-01i];
S(48,:,:) = [ 7.183082E-01 - 6.741258E-01i, 4.588585E-02 + 4.793387E-02i; 4.588585E-02 + 4.793387E-02i, 7.188341E-01 - 6.735432E-01i];
S(49,:,:) = [ 7.065564E-01 - 6.858784E-01i, 4.891913E-02 + 4.950966E-02i; 4.891913E-02 + 4.950966E-02i, 7.071033E-01 - 6.852935E-01i];
S(50,:,:) = [ 6.946955E-01 - 6.973376E-01i, 5.196497E-02 + 5.095423E-02i; 5.196497E-02 + 5.095423E-02i, 6.952638E-01 - 6.967507E-01i];
S(51,:,:) = [ 6.827318E-01 - 7.085068E-01i, 5.502088E-02 + 5.227155E-02i; 5.502088E-02 + 5.227155E-02i, 6.833218E-01 - 7.079185E-01i];
S(52,:,:) = [ 6.706712E-01 - 7.193895E-01i, 5.808454E-02 + 5.346547E-02i; 5.808454E-02 + 5.346547E-02i, 6.712832E-01 - 7.188001E-01i];
S(53,:,:) = [ 6.585194E-01 - 7.299888E-01i, 6.115384E-02 + 5.453963E-02i; 6.115384E-02 + 5.453963E-02i, 6.591537E-01 - 7.293988E-01i];
S(54,:,:) = [ 6.462820E-01 - 7.403081E-01i, 6.422684E-02 + 5.549757E-02i; 6.422684E-02 + 5.549757E-02i, 6.469389E-01 - 7.397178E-01i];
S(55,:,:) = [ 6.339642E-01 - 7.503505E-01i, 6.730177E-02 + 5.634265E-02i; 6.730177E-02 + 5.634265E-02i, 6.346441E-01 - 7.497602E-01i];
S(56,:,:) = [ 6.215712E-01 - 7.601191E-01i, 7.037707E-02 + 5.707815E-02i; 7.037707E-02 + 5.707815E-02i, 6.222744E-01 - 7.595294E-01i];
S(57,:,:) = [ 6.091077E-01 - 7.696172E-01i, 7.345133E-02 + 5.770719E-02i; 7.345133E-02 + 5.770719E-02i, 6.098347E-01 - 7.690282E-01i];
S(58,:,:) = [ 5.965785E-01 - 7.788476E-01i, 7.652333E-02 + 5.823279E-02i; 7.652333E-02 + 5.823279E-02i, 5.973296E-01 - 7.782600E-01i];
S(59,:,:) = [ 5.839878E-01 - 7.878137E-01i, 7.959201E-02 + 5.865786E-02i; 7.959201E-02 + 5.865786E-02i, 5.847636E-01 - 7.872276E-01i];
S(60,:,:) = [ 5.713400E-01 - 7.965183E-01i, 8.265652E-02 + 5.898520E-02i; 8.265652E-02 + 5.898520E-02i, 5.721408E-01 - 7.959341E-01i];
S(61,:,:) = [ 5.586388E-01 - 8.049644E-01i, 8.571616E-02 + 5.921749E-02i; 8.571616E-02 + 5.921749E-02i, 5.594653E-01 - 8.043825E-01i];
S(62,:,:) = [ 5.458881E-01 - 8.131551E-01i, 8.877041E-02 + 5.935729E-02i; 8.877041E-02 + 5.935729E-02i, 5.467409E-01 - 8.125758E-01i];
S(63,:,:) = [ 5.330913E-01 - 8.210932E-01i, 9.181894E-02 + 5.940709E-02i; 9.181894E-02 + 5.940709E-02i, 5.339709E-01 - 8.205169E-01i];
S(64,:,:) = [ 5.202516E-01 - 8.287817E-01i, 9.486161E-02 + 5.936923E-02i; 9.486161E-02 + 5.936923E-02i, 5.211587E-01 - 8.282087E-01i];
S(65,:,:) = [ 5.073720E-01 - 8.362233E-01i, 9.789845E-02 + 5.924595E-02i; 9.789845E-02 + 5.924595E-02i, 5.083074E-01 - 8.356540E-01i];
S(66,:,:) = [ 4.944551E-01 - 8.434209E-01i, 1.009297E-01 + 5.903938E-02i; 1.009297E-01 + 5.903938E-02i, 4.954197E-01 - 8.428556E-01i];
S(67,:,:) = [ 4.815036E-01 - 8.503772E-01i, 1.039558E-01 + 5.875151E-02i; 1.039558E-01 + 5.875151E-02i, 4.824981E-01 - 8.498162E-01i];
S(68,:,:) = [ 4.685195E-01 - 8.570948E-01i, 1.069773E-01 + 5.838421E-02i; 1.069773E-01 + 5.838421E-02i, 4.695449E-01 - 8.565385E-01i];
S(69,:,:) = [ 4.555048E-01 - 8.635763E-01i, 1.099951E-01 + 5.793924E-02i; 1.099951E-01 + 5.793924E-02i, 4.565621E-01 - 8.630252E-01i];
S(70,:,:) = [ 4.424610E-01 - 8.698243E-01i, 1.130103E-01 + 5.741819E-02i; 1.130103E-01 + 5.741819E-02i, 4.435514E-01 - 8.692786E-01i];
S(71,:,:) = [ 4.293896E-01 - 8.758411E-01i, 1.160241E-01 + 5.682251E-02i; 1.160241E-01 + 5.682251E-02i, 4.305143E-01 - 8.753012E-01i];
S(72,:,:) = [ 4.162914E-01 - 8.816289E-01i, 1.190380E-01 + 5.615351E-02i; 1.190380E-01 + 5.615351E-02i, 4.174518E-01 - 8.810953E-01i];
S(73,:,:) = [ 4.031672E-01 - 8.871900E-01i, 1.220539E-01 + 5.541229E-02i; 1.220539E-01 + 5.541229E-02i, 4.043647E-01 - 8.866631E-01i];
S(74,:,:) = [ 3.900173E-01 - 8.925264E-01i, 1.250738E-01 + 5.459982E-02i; 1.250738E-01 + 5.459982E-02i, 3.912536E-01 - 8.920067E-01i];
S(75,:,:) = [ 3.768418E-01 - 8.976400E-01i, 1.280998E-01 + 5.371682E-02i; 1.280998E-01 + 5.371682E-02i, 3.781185E-01 - 8.971279E-01i];
S(76,:,:) = [ 3.636401E-01 - 9.025323E-01i, 1.311348E-01 + 5.276384E-02i; 1.311348E-01 + 5.276384E-02i, 3.649591E-01 - 9.020284E-01i];
S(77,:,:) = [ 3.504114E-01 - 9.072049E-01i, 1.341816E-01 + 5.174116E-02i; 1.341816E-01 + 5.174116E-02i, 3.517750E-01 - 9.067098E-01i];
S(78,:,:) = [ 3.371546E-01 - 9.116590E-01i, 1.372436E-01 + 5.064882E-02i; 1.372436E-01 + 5.064882E-02i, 3.385649E-01 - 9.111733E-01i];
S(79,:,:) = [ 3.238679E-01 - 9.158957E-01i, 1.403243E-01 + 4.948657E-02i; 1.403243E-01 + 4.948657E-02i, 3.253274E-01 - 9.154201E-01i];
S(80,:,:) = [ 3.105491E-01 - 9.199156E-01i, 1.434278E-01 + 4.825383E-02i; 1.434278E-01 + 4.825383E-02i, 3.120605E-01 - 9.194508E-01i];
S(81,:,:) = [ 2.971954E-01 - 9.237190E-01i, 1.465587E-01 + 4.694969E-02i; 1.465587E-01 + 4.694969E-02i, 2.987617E-01 - 9.232660E-01i];
S(82,:,:) = [ 2.838035E-01 - 9.273059E-01i, 1.497221E-01 + 4.557281E-02i; 1.497221E-01 + 4.557281E-02i, 2.854279E-01 - 9.268656E-01i];
S(83,:,:) = [ 2.703694E-01 - 9.306758E-01i, 1.529234E-01 + 4.412141E-02i; 1.529234E-01 + 4.412141E-02i, 2.720556E-01 - 9.302493E-01i];
S(84,:,:) = [ 2.568884E-01 - 9.338279E-01i, 1.561688E-01 + 4.259321E-02i; 1.561688E-01 + 4.259321E-02i, 2.586402E-01 - 9.334164E-01i];
S(85,:,:) = [ 2.433551E-01 - 9.367604E-01i, 1.594651E-01 + 4.098534E-02i; 1.594651E-01 + 4.098534E-02i, 2.451769E-01 - 9.363653E-01i];
S(86,:,:) = [ 2.297631E-01 - 9.394712E-01i, 1.628200E-01 + 3.929425E-02i; 1.628200E-01 + 3.929425E-02i, 2.316596E-01 - 9.390940E-01i];
S(87,:,:) = [ 2.161052E-01 - 9.419573E-01i, 1.662419E-01 + 3.751563E-02i; 1.662419E-01 + 3.751563E-02i, 2.180816E-01 - 9.415998E-01i];
S(88,:,:) = [ 2.023730E-01 - 9.442147E-01i, 1.697401E-01 + 3.564426E-02i; 1.697401E-01 + 3.564426E-02i, 2.044351E-01 - 9.438789E-01i];
S(89,:,:) = [ 1.885571E-01 - 9.462385E-01i, 1.733250E-01 + 3.367389E-02i; 1.733250E-01 + 3.367389E-02i, 1.907112E-01 - 9.459268E-01i];
S(90,:,:) = [ 1.746466E-01 - 9.480224E-01i, 1.770082E-01 + 3.159703E-02i; 1.770082E-01 + 3.159703E-02i, 1.768997E-01 - 9.477374E-01i];
S(91,:,:) = [ 1.606292E-01 - 9.495588E-01i, 1.808028E-01 + 2.940475E-02i; 1.808028E-01 + 2.940475E-02i, 1.629891E-01 - 9.493035E-01i];
S(92,:,:) = [ 1.464907E-01 - 9.508381E-01i, 1.847232E-01 + 2.708640E-02i; 1.847232E-01 + 2.708640E-02i, 1.489662E-01 - 9.506162E-01i];
S(93,:,:) = [ 1.322154E-01 - 9.518487E-01i, 1.887858E-01 + 2.462929E-02i; 1.887858E-01 + 2.462929E-02i, 1.348160E-01 - 9.516644E-01i];
S(94,:,:) = [ 1.177849E-01 - 9.525766E-01i, 1.930089E-01 + 2.201823E-02i; 1.930089E-01 + 2.201823E-02i, 1.205214E-01 - 9.524346E-01i];
S(95,:,:) = [ 1.031787E-01 - 9.530045E-01i, 1.974132E-01 + 1.923509E-02i; 1.974132E-01 + 1.923509E-02i, 1.060630E-01 - 9.529106E-01i];
S(96,:,:) = [ 8.837303E-02 - 9.531116E-01i, 2.020220E-01 + 1.625807E-02i; 2.020220E-01 + 1.625807E-02i, 9.141859E-02 - 9.530724E-01i];
S(97,:,:) = [ 7.334114E-02 - 9.528723E-01i, 2.068618E-01 + 1.306093E-02i; 2.068618E-01 + 1.306093E-02i, 7.656306E-02 - 9.528957E-01i];
S(98,:,:) = [ 5.805231E-02 - 9.522554E-01i, 2.119627E-01 + 9.611888E-03i; 2.119627E-01 + 9.611888E-03i, 6.146756E-02 - 9.523509E-01i];
S(99,:,:) = [ 4.247146E-02 - 9.512227E-01i, 2.173588E-01 + 5.872321E-03i; 2.173588E-01 + 5.872321E-03i, 4.609920E-02 - 9.514013E-01i];
S(100,:,:) = [ 2.655848E-02 - 9.497270E-01i, 2.230889E-01 + 1.794953E-03i; 2.230889E-01 + 1.794953E-03i, 3.042040E-02 - 9.500022E-01i];
S(101,:,:) = [ 1.026753E-02 - 9.477100E-01i, 2.291973E-01 - 2.678426E-03i; 2.291973E-01 - 2.678426E-03i, 1.438825E-02 - 9.480980E-01i];
S(102,:,:) = [ -6.453773E-03 - 9.450988E-01i, 2.357345E-01 - 7.620019E-03i; 2.357345E-01 - 7.620019E-03i, -2.046225E-03 - 9.456193E-01i];
S(103,:,:) = [ -2.366512E-02 - 9.418021E-01i, 2.427578E-01 - 1.312009E-02i; 2.427578E-01 - 1.312009E-02i, -1.893877E-02 - 9.424792E-01i];
S(104,:,:) = [ -4.143421E-02 - 9.377043E-01i, 2.503320E-01 - 1.929244E-02i; 2.503320E-01 - 1.929244E-02i, -3.635247E-02 - 9.385678E-01i];
S(105,:,:) = [ -5.983711E-02 - 9.326580E-01i, 2.585299E-01 - 2.628190E-02i; 2.585299E-01 - 2.628190E-02i, -5.435807E-02 - 9.337449E-01i];
S(106,:,:) = [ -7.895800E-02 - 9.264731E-01i, 2.674316E-01 - 3.427459E-02i; 2.674316E-01 - 3.427459E-02i, -7.303361E-02 - 9.278300E-01i];
S(107,:,:) = [ -9.888747E-02 - 9.189026E-01i, 2.771232E-01 - 4.351222E-02i; 2.771232E-01 - 4.351222E-02i, -9.246264E-02 - 9.205885E-01i];
S(108,:,:) = [ -1.197181E-01 - 9.096216E-01i, 2.876921E-01 - 5.431204E-02i; 2.876921E-01 - 5.431204E-02i, -1.127299E-01 - 9.117121E-01i];
S(109,:,:) = [ -1.415345E-01 - 8.981983E-01i, 2.992171E-01 - 6.709501E-02i; 2.992171E-01 - 6.709501E-02i, -1.339117E-01 - 9.007918E-01i];
S(110,:,:) = [ -1.643941E-01 - 8.840536E-01i, 3.117498E-01 - 8.242552E-02i; 3.117498E-01 - 8.242552E-02i, -1.560571E-01 - 8.872788E-01i];
S(111,:,:) = [ -1.882873E-01 - 8.664032E-01i, 3.252755E-01 - 1.010669E-01i; 3.252755E-01 - 1.010669E-01i, -1.791500E-01 - 8.704313E-01i];
S(112,:,:) = [ -2.130632E-01 - 8.441795E-01i, 3.396401E-01 - 1.240570E-01i; 3.396401E-01 - 1.240570E-01i, -2.030380E-01 - 8.492409E-01i];
S(113,:,:) = [ -2.382853E-01 - 8.159322E-01i, 3.544099E-01 - 1.528050E-01i; 3.544099E-01 - 1.528050E-01i, -2.272948E-01 - 8.223393E-01i];
S(114,:,:) = [ -2.629597E-01 - 7.797217E-01i, 3.686061E-01 - 1.891926E-01i; 3.686061E-01 - 1.891926E-01i, -2.509623E-01 - 7.879010E-01i];
S(115,:,:) = [ -2.850322E-01 - 7.330738E-01i, 3.802160E-01 - 2.356165E-01i; 3.802160E-01 - 2.356165E-01i, -2.720745E-01 - 7.436045E-01i];
S(116,:,:) = [ -3.005139E-01 - 6.732067E-01i, 3.853429E-01 - 2.947628E-01i; 3.853429E-01 - 2.947628E-01i, -2.868321E-01 - 6.868553E-01i];
S(117,:,:) = [ -3.021741E-01 - 5.980765E-01i, 3.769401E-01 - 3.685842E-01i; 3.769401E-01 - 3.685842E-01i, -2.883759E-01 - 6.157877E-01i];
S(118,:,:) = [ -2.783855E-01 - 5.093363E-01i, 3.437022E-01 - 4.554155E-01i; 3.437022E-01 - 4.554155E-01i, -2.657223E-01 - 5.320745E-01i];
S(119,:,:) = [ -2.147879E-01 - 4.181569E-01i, 2.717113E-01 - 5.443203E-01i; 2.717113E-01 - 5.443203E-01i, -2.053918E-01 - 4.464184E-01i];
S(120,:,:) = [ -1.041315E-01 - 3.505139E-01i, 1.540373E-01 - 6.099966E-01i; 1.540373E-01 - 6.099966E-01i, -1.007706E-01 - 3.834608E-01i];
S(121,:,:) = [ 3.675302E-02 - 3.387362E-01i, 7.202950E-03 - 6.210801E-01i; 7.202950E-03 - 6.210801E-01i, 3.191433E-02 - 3.736276E-01i];
S(122,:,:) = [ 1.664645E-01 - 3.935867E-01i, -1.284774E-01 - 5.673026E-01i; -1.284774E-01 - 5.673026E-01i, 1.533939E-01 - 4.267111E-01i];
S(123,:,:) = [ 2.503377E-01 - 4.908010E-01i, -2.194130E-01 - 4.724310E-01i; -2.194130E-01 - 4.724310E-01i, 2.311005E-01 - 5.194300E-01i];
S(124,:,:) = [ 2.837382E-01 - 5.953339E-01i, -2.612753E-01 - 3.705699E-01i; -2.612753E-01 - 3.705699E-01i, 2.609786E-01 - 6.185860E-01i];
S(125,:,:) = [ 2.813848E-01 - 6.860149E-01i, -2.684916E-01 - 2.822344E-01i; -2.684916E-01 - 2.822344E-01i, 2.571503E-01 - 7.042889E-01i];
S(126,:,:) = [ 2.595418E-01 - 7.570786E-01i, -2.569189E-01 - 2.129485E-01i; -2.569189E-01 - 2.129485E-01i, 2.350552E-01 - 7.712365E-01i];
S(127,:,:) = [ 2.291646E-01 - 8.103553E-01i, -2.372148E-01 - 1.608734E-01i; -2.372148E-01 - 1.608734E-01i, 2.050384E-01 - 8.212626E-01i];
S(128,:,:) = [ 1.962337E-01 - 8.496875E-01i, -2.151905E-01 - 1.222359E-01i; -2.151905E-01 - 1.222359E-01i, 1.727198E-01 - 8.580574E-01i];
S(129,:,:) = [ 1.636281E-01 - 8.786754E-01i, -1.936433E-01 - 9.351284E-02i; -1.936433E-01 - 9.351284E-02i, 1.407870E-01 - 8.850524E-01i];
S(130,:,:) = [ 1.325699E-01 - 9.001193E-01i, -1.737652E-01 - 7.196482E-02i; -1.737652E-01 - 7.196482E-02i, 1.103677E-01 - 9.049067E-01i];
S(131,:,:) = [ 1.034625E-01 - 9.160556E-01i, -1.559577E-01 - 5.559739E-02i; -1.559577E-01 - 5.559739E-02i, 8.182160E-02 - 9.195489E-01i];
S(132,:,:) = [ 7.632783E-02 - 9.279306E-01i, -1.402573E-01 - 4.298977E-02i; -1.402573E-01 - 4.298977E-02i, 5.515289E-02 - 9.303448E-01i];
S(133,:,:) = [ 5.102345E-02 - 9.367658E-01i, -1.265457E-01 - 3.313178E-02i; -1.265457E-01 - 3.313178E-02i, 3.021371E-02 - 9.382568E-01i];
S(134,:,:) = [ 2.734664E-02 - 9.432852E-01i, -1.146514E-01 - 2.529917E-02i; -1.146514E-01 - 2.529917E-02i, 6.801515E-03 - 9.439648E-01i];
S(135,:,:) = [ 5.082631E-03 - 9.480051E-01i, -1.043969E-01 - 1.896514E-02i; -1.043969E-01 - 1.896514E-02i, -1.529630E-02 - 9.479511E-01i];
S(136,:,:) = [ -1.597471E-02 - 9.512954E-01i, -9.561946E-02 - 1.373906E-02i; -9.561946E-02 - 1.373906E-02i, -3.628359E-02 - 9.505588E-01i];
S(137,:,:) = [ -3.601554E-02 - 9.534215E-01i, -8.817913E-02 - 9.324243E-03i; -8.817913E-02 - 9.324243E-03i, -5.634896E-02 - 9.520311E-01i];
S(138,:,:) = [ -5.521295E-02 - 9.545723E-01i, -8.196104E-02 - 5.488382E-03i; -8.196104E-02 - 5.488382E-03i, -7.566526E-02 - 9.525377E-01i];
S(139,:,:) = [ -7.372483E-02 - 9.548788E-01i, -7.687533E-02 - 2.042346E-03i; -7.687533E-02 - 2.042346E-03i, -9.439170E-02 - 9.521914E-01i];
S(140,:,:) = [ -9.169695E-02 - 9.544260E-01i, -7.285615E-02 + 1.175720E-03i; -7.285615E-02 + 1.175720E-03i, -1.126772E-01 - 9.510595E-01i];
S(141,:,:) = [ -1.092666E-01 - 9.532601E-01i, -6.986078E-02 + 4.313182E-03i; -6.986078E-02 + 4.313182E-03i, -1.306641E-01 - 9.491690E-01i];
S(142,:,:) = [ -1.265664E-01 - 9.513915E-01i, -6.786902E-02 + 7.514295E-03i; -6.786902E-02 + 7.514295E-03i, -1.484923E-01 - 9.465084E-01i];
S(143,:,:) = [ -1.437282E-01 - 9.487940E-01i, -6.688313E-02 + 1.093169E-02i; -6.688313E-02 + 1.093169E-02i, -1.663034E-01 - 9.430252E-01i];
S(144,:,:) = [ -1.608865E-01 - 9.453997E-01i, -6.692818E-02 + 1.473960E-02i; -6.692818E-02 + 1.473960E-02i, -1.842441E-01 - 9.386186E-01i];
S(145,:,:) = [ -1.781822E-01 - 9.410893E-01i, -6.805245E-02 + 1.915095E-02i; -6.805245E-02 + 1.915095E-02i, -2.024701E-01 - 9.331263E-01i];
S(146,:,:) = [ -1.957646E-01 - 9.356738E-01i, -7.032689E-02 + 2.444139E-02i; -7.032689E-02 + 2.444139E-02i, -2.211479E-01 - 9.263011E-01i];
S(147,:,:) = [ -2.137902E-01 - 9.288656E-01i, -7.384135E-02 + 3.098513E-02i; -7.384135E-02 + 3.098513E-02i, -2.404516E-01 - 9.177748E-01i];
S(148,:,:) = [ -2.324140E-01 - 9.202305E-01i, -7.869206E-02 + 3.931045E-02i; -7.869206E-02 + 3.931045E-02i, -2.605513E-01 - 9.069986E-01i];
S(149,:,:) = [ -2.517614E-01 - 9.091100E-01i, -8.494746E-02 + 5.018773E-02i; -8.494746E-02 + 5.018773E-02i, -2.815745E-01 - 8.931469E-01i];
S(150,:,:) = [ -2.718524E-01 - 8.944958E-01i, -9.256131E-02 + 6.476920E-02i; -9.256131E-02 + 6.476920E-02i, -3.035101E-01 - 8.749640E-01i];
S(151,:,:) = [ -2.924139E-01 - 8.748362E-01i, -1.011588E-01 + 8.480290E-02i; -1.011588E-01 + 8.480290E-02i, -3.259675E-01 - 8.505285E-01i];
S(152,:,:) = [ -3.124169E-01 - 8.477777E-01i, -1.095176E-01 + 1.129136E-01i; -1.095176E-01 + 1.129136E-01i, -3.475967E-01 - 8.169457E-01i];
S(153,:,:) = [ -3.289852E-01 - 8.100120E-01i, -1.143512E-01 + 1.527562E-01i; -1.143512E-01 + 1.527562E-01i, -3.647283E-01 - 7.701895E-01i];
S(154,:,:) = [ -3.350975E-01 - 7.581080E-01i, -1.077689E-01 + 2.080555E-01i; -1.077689E-01 + 2.080555E-01i, -3.685466E-01 - 7.062001E-01i];
S(155,:,:) = [ -3.165035E-01 - 6.932909E-01i, -7.392720E-02 + 2.772545E-01i; -7.392720E-02 + 2.772545E-01i, -3.413989E-01 - 6.269015E-01i];
S(156,:,:) = [ -2.555884E-01 - 6.341290E-01i, 6.495102E-03 + 3.395066E-01i; 6.495102E-03 + 3.395066E-01i, -2.619530E-01 - 5.558311E-01i];
S(157,:,:) = [ -1.593457E-01 - 6.209002E-01i, 1.252502E-01 + 3.502255E-01i; 1.252502E-01 + 3.502255E-01i, -1.400190E-01 - 5.427602E-01i];
S(158,:,:) = [ -7.774037E-02 - 6.695665E-01i, 2.267516E-01 + 2.922731E-01i; 2.267516E-01 + 2.922731E-01i, -3.802766E-02 - 6.060893E-01i];
S(159,:,:) = [ -4.499173E-02 - 7.426829E-01i, 2.734037E-01 + 2.075557E-01i; 2.734037E-01 + 2.075557E-01i, 2.611949E-03 - 6.984091E-01i];
S(160,:,:) = [ -4.932700E-02 - 8.048559E-01i, 2.786188E-01 + 1.353018E-01i; 2.786188E-01 + 1.353018E-01i, -2.510497E-03 - 7.761288E-01i];
S(161,:,:) = [ -6.968263E-02 - 8.480635E-01i, 2.659126E-01 + 8.426089E-02i; 2.659126E-01 + 8.426089E-02i, -2.703233E-02 - 8.298746E-01i];
S(162,:,:) = [ -9.421917E-02 - 8.761839E-01i, 2.484492E-01 + 5.001671E-02i; 2.484492E-01 + 5.001671E-02i, -5.636456E-02 - 8.647858E-01i];
S(163,:,:) = [ -1.182731E-01 - 8.942195E-01i, 2.313927E-01 + 2.695759E-02i; 2.313927E-01 + 2.695759E-02i, -8.485516E-02 - 8.871997E-01i];
S(164,:,:) = [ -1.404167E-01 - 9.057794E-01i, 2.163130E-01 + 1.105062E-02i; 2.163130E-01 + 1.105062E-02i, -1.108299E-01 - 9.016355E-01i];
S(165,:,:) = [ -1.604328E-01 - 9.131601E-01i, 2.034408E-01 - 2.634223E-04i; 2.034408E-01 - 2.634223E-04i, -1.340814E-01 - 9.109494E-01i];
S(166,:,:) = [ -1.784998E-01 - 9.177864E-01i, 1.925733E-01 - 8.568488E-03i; 1.925733E-01 - 8.568488E-03i, -1.548691E-01 - 9.169044E-01i];
S(167,:,:) = [ -1.948919E-01 - 9.205494E-01i, 1.834055E-01 - 1.485319E-02i; 1.834055E-01 - 1.485319E-02i, -1.735565E-01 - 9.205992E-01i];
S(168,:,:) = [ -2.098759E-01 - 9.220183E-01i, 1.756425E-01 - 1.974718E-02i; 1.756425E-01 - 1.974718E-02i, -1.904897E-01 - 9.227325E-01i];
S(169,:,:) = [ -2.236827E-01 - 9.225655E-01i, 1.690313E-01 - 2.366115E-02i; 1.690313E-01 - 2.366115E-02i, -2.059641E-01 - 9.237598E-01i];
S(170,:,:) = [ -2.365028E-01 - 9.224403E-01i, 1.633645E-01 - 2.686952E-02i; 1.633645E-01 - 2.686952E-02i, -2.202222E-01 - 9.239853E-01i];
S(171,:,:) = [ -2.484909E-01 - 9.218140E-01i, 1.584750E-01 - 2.955991E-02i; 1.584750E-01 - 2.955991E-02i, -2.334596E-01 - 9.236168E-01i];
S(172,:,:) = [ -2.597720E-01 - 9.208064E-01i, 1.542289E-01 - 3.186336E-02i; 1.542289E-01 - 3.186336E-02i, -2.458339E-01 - 9.227997E-01i];
S(173,:,:) = [ -2.704474E-01 - 9.195033E-01i, 1.505185E-01 - 3.387318E-02i; 1.505185E-01 - 3.387318E-02i, -2.574722E-01 - 9.216374E-01i];
S(174,:,:) = [ -2.805995E-01 - 9.179672E-01i, 1.472574E-01 - 3.565706E-02i; 1.472574E-01 - 3.565706E-02i, -2.684777E-01 - 9.202049E-01i];
S(175,:,:) = [ -2.902959E-01 - 9.162441E-01i, 1.443754E-01 - 3.726487E-02i; 1.443754E-01 - 3.726487E-02i, -2.789346E-01 - 9.185577E-01i];
S(176,:,:) = [ -2.995921E-01 - 9.143687E-01i, 1.418152E-01 - 3.873394E-02i; 1.418152E-01 - 3.873394E-02i, -2.889122E-01 - 9.167370E-01i];
S(177,:,:) = [ -3.085346E-01 - 9.123675E-01i, 1.395299E-01 - 4.009258E-02i; 1.395299E-01 - 4.009258E-02i, -2.984680E-01 - 9.147743E-01i];
S(178,:,:) = [ -3.171621E-01 - 9.102607E-01i, 1.374809E-01 - 4.136258E-02i; 1.374809E-01 - 4.136258E-02i, -3.076499E-01 - 9.126937E-01i];
S(179,:,:) = [ -3.255073E-01 - 9.080642E-01i, 1.356358E-01 - 4.256086E-02i; 1.356358E-01 - 4.256086E-02i, -3.164984E-01 - 9.105139E-01i];
S(180,:,:) = [ -3.335981E-01 - 9.057903E-01i, 1.339680E-01 - 4.370077E-02i; 1.339680E-01 - 4.370077E-02i, -3.250476E-01 - 9.082495E-01i];
S(181,:,:) = [ -3.414583E-01 - 9.034490E-01i, 1.324546E-01 - 4.479292E-02i; 1.324546E-01 - 4.479292E-02i, -3.333268E-01 - 9.059122E-01i];
S(182,:,:) = [ -3.491084E-01 - 9.010481E-01i, 1.310767E-01 - 4.584585E-02i; 1.310767E-01 - 4.584585E-02i, -3.413610E-01 - 9.035111E-01i];
S(183,:,:) = [ -3.565661E-01 - 8.985938E-01i, 1.298180E-01 - 4.686651E-02i; 1.298180E-01 - 4.686651E-02i, -3.491720E-01 - 9.010536E-01i];
S(184,:,:) = [ -3.638471E-01 - 8.960912E-01i, 1.286646E-01 - 4.786061E-02i; 1.286646E-01 - 4.786061E-02i, -3.567785E-01 - 8.985456E-01i];
S(185,:,:) = [ -3.709649E-01 - 8.935445E-01i, 1.276048E-01 - 4.883289E-02i; 1.276048E-01 - 4.883289E-02i, -3.641971E-01 - 8.959920E-01i];
S(186,:,:) = [ -3.779316E-01 - 8.909569E-01i, 1.266282E-01 - 4.978734E-02i; 1.266282E-01 - 4.978734E-02i, -3.714423E-01 - 8.933966E-01i];
S(187,:,:) = [ -3.847578E-01 - 8.883311E-01i, 1.257260E-01 - 5.072736E-02i; 1.257260E-01 - 5.072736E-02i, -3.785268E-01 - 8.907626E-01i];
S(188,:,:) = [ -3.914531E-01 - 8.856691E-01i, 1.248907E-01 - 5.165586E-02i; 1.248907E-01 - 5.165586E-02i, -3.854620E-01 - 8.880924E-01i];
S(189,:,:) = [ -3.980259E-01 - 8.829727E-01i, 1.241154E-01 - 5.257539E-02i; 1.241154E-01 - 5.257539E-02i, -3.922582E-01 - 8.853881E-01i];
S(190,:,:) = [ -4.044840E-01 - 8.802430E-01i, 1.233944E-01 - 5.348818E-02i; 1.233944E-01 - 5.348818E-02i, -3.989243E-01 - 8.826512E-01i];
S(191,:,:) = [ -4.108342E-01 - 8.774812E-01i, 1.227225E-01 - 5.439625E-02i; 1.227225E-01 - 5.439625E-02i, -4.054686E-01 - 8.798831E-01i];
S(192,:,:) = [ -4.170830E-01 - 8.746877E-01i, 1.220953E-01 - 5.530142E-02i; 1.220953E-01 - 5.530142E-02i, -4.118986E-01 - 8.770846E-01i];
S(193,:,:) = [ -4.232360E-01 - 8.718631E-01i, 1.215087E-01 - 5.620537E-02i; 1.215087E-01 - 5.620537E-02i, -4.182208E-01 - 8.742563E-01i];
S(194,:,:) = [ -4.292985E-01 - 8.690074E-01i, 1.209592E-01 - 5.710965E-02i; 1.209592E-01 - 5.710965E-02i, -4.244415E-01 - 8.713987E-01i];
S(195,:,:) = [ -4.352754E-01 - 8.661207E-01i, 1.204438E-01 - 5.801574E-02i; 1.204438E-01 - 5.801574E-02i, -4.305663E-01 - 8.685120E-01i];
S(196,:,:) = [ -4.411711E-01 - 8.632027E-01i, 1.199594E-01 - 5.892506E-02i; 1.199594E-01 - 5.892506E-02i, -4.366003E-01 - 8.655960E-01i];
S(197,:,:) = [ -4.469898E-01 - 8.602530E-01i, 1.195038E-01 - 5.983899E-02i; 1.195038E-01 - 5.983899E-02i, -4.425483E-01 - 8.626508E-01i];
S(198,:,:) = [ -4.527352E-01 - 8.572709E-01i, 1.190744E-01 - 6.075886E-02i; 1.190744E-01 - 6.075886E-02i, -4.484145E-01 - 8.596758E-01i];
S(199,:,:) = [ -4.584110E-01 - 8.542557E-01i, 1.186694E-01 - 6.168602E-02i; 1.186694E-01 - 6.168602E-02i, -4.542031E-01 - 8.566706E-01i];
S(200,:,:) = [ -4.640205E-01 - 8.512064E-01i, 1.182867E-01 - 6.262180E-02i; 1.182867E-01 - 6.262180E-02i, -4.599178E-01 - 8.536345E-01i];
Y(1,:,:) = [ 7.433983E-02 - 1.869355E-01i, -7.433955E-02 + 1.869506E-01i; -7.433955E-02 + 1.869506E-01i, 7.433984E-02 - 1.869354E-01i];
Y(2,:,:) = [ 2.079492E-03 - 2.161312E-02i, -2.076796E-03 + 2.177790E-02i; -2.076796E-03 + 2.177790E-02i, 2.079506E-03 - 2.161329E-02i];
Y(3,:,:) = [ 7.904527E-04 - 1.140818E-02i, -7.869188E-04 + 1.172432E-02i; -7.869188E-04 + 1.172432E-02i, 7.904753E-04 - 1.140853E-02i];
Y(4,:,:) = [ 4.238544E-04 - 7.527308E-03i, -4.151954E-04 + 7.995545E-03i; -4.151954E-04 + 7.995545E-03i, 4.238811E-04 - 7.527833E-03i];
Y(5,:,:) = [ 2.728219E-04 - 5.415076E-03i, -2.608640E-04 + 6.034194E-03i; -2.608640E-04 + 6.034194E-03i, 2.728540E-04 - 5.415775E-03i];
Y(6,:,:) = [ 1.974131E-04 - 4.049489E-03i, -1.828123E-04 + 4.819748E-03i; -1.828123E-04 + 4.819748E-03i, 1.974504E-04 - 4.050364E-03i];
Y(7,:,:) = [ 1.550811E-04 - 3.068843E-03i, -1.377435E-04 + 3.990296E-03i; -1.377435E-04 + 3.990296E-03i, 1.551232E-04 - 3.069893E-03i];
Y(8,:,:) = [ 1.294117E-04 - 2.312454E-03i, -1.092043E-04 + 3.384979E-03i; -1.092043E-04 + 3.384979E-03i, 1.294584E-04 - 2.313680E-03i];
Y(9,:,:) = [ 1.130075E-04 - 1.698019E-03i, -8.989999E-05 + 2.921535E-03i; -8.989999E-05 + 2.921535E-03i, 1.130587E-04 - 1.699421E-03i];
Y(10,:,:) = [ 1.021593E-04 - 1.179011E-03i, -7.618458E-05 + 2.553572E-03i; -7.618458E-05 + 2.553572E-03i, 1.022152E-04 - 1.180590E-03i];
Y(11,:,:) = [ 9.487620E-05 - 7.271579E-04i, -6.605102E-05 + 2.252935E-03i; -6.605102E-05 + 2.252935E-03i, 9.493689E-05 - 7.289138E-04i];
Y(12,:,:) = [ 9.003169E-05 - 3.244817E-04i, -5.823996E-05 + 2.001369E-03i; -5.823996E-05 + 2.001369E-03i, 9.009705E-05 - 3.264166E-04i];
Y(13,:,:) = [ 8.670426E-05 + 4.120042E-05i, -5.205202E-05 + 1.786838E-03i; -5.205202E-05 + 1.786838E-03i, 8.677436E-05 + 3.908727E-05i];
Y(14,:,:) = [ 8.450206E-05 + 3.783733E-04i, -4.702661E-05 + 1.600854E-03i; -4.702661E-05 + 1.600854E-03i, 8.457704E-05 + 3.760818E-04i];
Y(15,:,:) = [ 8.315462E-05 + 6.931168E-04i, -4.286073E-05 + 1.437331E-03i; -4.286073E-05 + 1.437331E-03i, 8.323458E-05 + 6.906463E-04i];
Y(16,:,:) = [ 8.246940E-05 + 9.899029E-04i, -3.934824E-05 + 1.291793E-03i; -3.934824E-05 + 1.291793E-03i, 8.255434E-05 + 9.872526E-04i];
Y(17,:,:) = [ 8.230590E-05 + 1.272096E-03i, -3.634460E-05 + 1.160873E-03i; -3.634460E-05 + 1.160873E-03i, 8.239576E-05 + 1.269265E-03i];
Y(18,:,:) = [ 8.255959E-05 + 1.542275E-03i, -3.374564E-05 + 1.041992E-03i; -3.374564E-05 + 1.041992E-03i, 8.265429E-05 + 1.539262E-03i];
Y(19,:,:) = [ 8.315139E-05 + 1.802452E-03i, -3.147437E-05 + 9.331401E-04i; -3.147437E-05 + 9.331401E-04i, 8.325080E-05 + 1.799257E-03i];
Y(20,:,:) = [ 8.402068E-05 + 2.054220E-03i, -2.947266E-05 + 8.327272E-04i; -2.947266E-05 + 8.327272E-04i, 8.412467E-05 + 2.050842E-03i];
Y(21,:,:) = [ 8.512041E-05 + 2.298857E-03i, -2.769575E-05 + 7.394788E-04i; -2.769575E-05 + 7.394788E-04i, 8.522882E-05 + 2.295294E-03i];
Y(22,:,:) = [ 8.641368E-05 + 2.537398E-03i, -2.610861E-05 + 6.523611E-04i; -2.610861E-05 + 6.523611E-04i, 8.652635E-05 + 2.533650E-03i];
Y(23,:,:) = [ 8.787129E-05 + 2.770696E-03i, -2.468338E-05 + 5.705263E-04i; -2.468338E-05 + 5.705263E-04i, 8.798806E-05 + 2.766761E-03i];
Y(24,:,:) = [ 8.946994E-05 + 2.999454E-03i, -2.339768E-05 + 4.932725E-04i; -2.339768E-05 + 4.932725E-04i, 8.959064E-05 + 2.995332E-03i];
Y(25,:,:) = [ 9.119089E-05 + 3.224263E-03i, -2.223328E-05 + 4.200128E-04i; -2.223328E-05 + 4.200128E-04i, 9.131533E-05 + 3.219952E-03i];
Y(26,:,:) = [ 9.301896E-05 + 3.445618E-03i, -2.117524E-05 + 3.502531E-04i; -2.117524E-05 + 3.502531E-04i, 9.314697E-05 + 3.441117E-03i];
Y(27,:,:) = [ 9.494179E-05 + 3.663943E-03i, -2.021117E-05 + 2.835736E-04i; -2.021117E-05 + 2.835736E-04i, 9.507315E-05 + 3.659250E-03i];
Y(28,:,:) = [ 9.694920E-05 + 3.879597E-03i, -1.933076E-05 + 2.196155E-04i; -1.933076E-05 + 2.196155E-04i, 9.708372E-05 + 3.874712E-03i];
Y(29,:,:) = [ 9.903282E-05 + 4.092892E-03i, -1.852535E-05 + 1.580698E-04i; -1.852535E-05 + 1.580698E-04i, 9.917027E-05 + 4.087814E-03i];
Y(30,:,:) = [ 1.011857E-04 + 4.304098E-03i, -1.778765E-05 + 9.866881E-05i; -1.778765E-05 + 9.866881E-05i, 1.013258E-04 + 4.298824E-03i];
Y(31,:,:) = [ 1.034019E-04 + 4.513451E-03i, -1.711147E-05 + 4.117932E-05i; -1.711147E-05 + 4.117932E-05i, 1.035446E-04 + 4.507980E-03i];
Y(32,:,:) = [ 1.056768E-04 + 4.721156E-03i, -1.649154E-05 - 1.460310E-05i; -1.649154E-05 - 1.460310E-05i, 1.058216E-04 + 4.715487E-03i];
Y(33,:,:) = [ 1.080060E-04 + 4.927396E-03i, -1.592339E-05 - 6.885860E-05i; -1.592339E-05 - 6.885860E-05i, 1.081527E-04 + 4.921526E-03i];
Y(34,:,:) = [ 1.103861E-04 + 5.132333E-03i, -1.540315E-05 - 1.217467E-04i; -1.540315E-05 - 1.217467E-04i, 1.105345E-04 + 5.126261E-03i];
Y(35,:,:) = [ 1.128142E-04 + 5.336111E-03i, -1.492752E-05 - 1.734096E-04i; -1.492752E-05 - 1.734096E-04i, 1.129639E-04 + 5.329835E-03i];
Y(36,:,:) = [ 1.152877E-04 + 5.538860E-03i, -1.449367E-05 - 2.239742E-04i; -1.449367E-05 - 2.239742E-04i, 1.154385E-04 + 5.532377E-03i];
Y(37,:,:) = [ 1.178045E-04 + 5.740696E-03i, -1.409914E-05 - 2.735550E-04i; -1.409914E-05 - 2.735550E-04i, 1.179559E-04 + 5.734004E-03i];
Y(38,:,:) = [ 1.203626E-04 + 5.941725E-03i, -1.374184E-05 - 3.222552E-04i; -1.374184E-05 - 3.222552E-04i, 1.205143E-04 + 5.934822E-03i];
Y(39,:,:) = [ 1.229606E-04 + 6.142044E-03i, -1.341995E-05 - 3.701685E-04i; -1.341995E-05 - 3.701685E-04i, 1.231121E-04 + 6.134927E-03i];
Y(40,:,:) = [ 1.255969E-04 + 6.341740E-03i, -1.313192E-05 - 4.173805E-04i; -1.313192E-05 - 4.173805E-04i, 1.257480E-04 + 6.334406E-03i];
Y(41,:,:) = [ 1.282707E-04 + 6.540895E-03i, -1.287643E-05 - 4.639696E-04i; -1.287643E-05 - 4.639696E-04i, 1.284208E-04 + 6.533340E-03i];
Y(42,:,:) = [ 1.309808E-04 + 6.739584E-03i, -1.265238E-05 - 5.100080E-04i; -1.265238E-05 - 5.100080E-04i, 1.311295E-04 + 6.731806E-03i];
Y(43,:,:) = [ 1.337264E-04 + 6.937877E-03i, -1.245882E-05 - 5.555627E-04i; -1.245882E-05 - 5.555627E-04i, 1.338733E-04 + 6.929871E-03i];
Y(44,:,:) = [ 1.365071E-04 + 7.135838E-03i, -1.229500E-05 - 6.006958E-04i; -1.229500E-05 - 6.006958E-04i, 1.366515E-04 + 7.127602E-03i];
Y(45,:,:) = [ 1.393223E-04 + 7.333530E-03i, -1.216032E-05 - 6.454657E-04i; -1.216032E-05 - 6.454657E-04i, 1.394638E-04 + 7.325059E-03i];
Y(46,:,:) = [ 1.421717E-04 + 7.531010E-03i, -1.205431E-05 - 6.899271E-04i; -1.205431E-05 - 6.899271E-04i, 1.423096E-04 + 7.522300E-03i];
Y(47,:,:) = [ 1.450552E-04 + 7.728334E-03i, -1.197667E-05 - 7.341317E-04i; -1.197667E-05 - 7.341317E-04i, 1.451889E-04 + 7.719380E-03i];
Y(48,:,:) = [ 1.479726E-04 + 7.925554E-03i, -1.192720E-05 - 7.781290E-04i; -1.192720E-05 - 7.781290E-04i, 1.481015E-04 + 7.916351E-03i];
Y(49,:,:) = [ 1.509242E-04 + 8.122722E-03i, -1.190587E-05 - 8.219660E-04i; -1.190587E-05 - 8.219660E-04i, 1.510475E-04 + 8.113264E-03i];
Y(50,:,:) = [ 1.539100E-04 + 8.319885E-03i, -1.191276E-05 - 8.656880E-04i; -1.191276E-05 - 8.656880E-04i, 1.540271E-04 + 8.310167E-03i];
Y(51,:,:) = [ 1.569306E-04 + 8.517091E-03i, -1.194808E-05 - 9.093390E-04i; -1.194808E-05 - 9.093390E-04i, 1.570406E-04 + 8.507107E-03i];
Y(52,:,:) = [ 1.599864E-04 + 8.714388E-03i, -1.201219E-05 - 9.529616E-04i; -1.201219E-05 - 9.529616E-04i, 1.600885E-04 + 8.704131E-03i];
Y(53,:,:) = [ 1.630782E-04 + 8.911821E-03i, -1.210559E-05 - 9.965977E-04i; -1.210559E-05 - 9.965977E-04i, 1.631714E-04 + 8.901284E-03i];
Y(54,:,:) = [ 1.662068E-04 + 9.109436E-03i, -1.222892E-05 - 1.040288E-03i; -1.222892E-05 - 1.040288E-03i, 1.662901E-04 + 9.098611E-03i];
Y(55,:,:) = [ 1.693732E-04 + 9.307277E-03i, -1.238298E-05 - 1.084075E-03i; -1.238298E-05 - 1.084075E-03i, 1.694456E-04 + 9.296156E-03i];
Y(56,:,:) = [ 1.725786E-04 + 9.505389E-03i, -1.256872E-05 - 1.127997E-03i; -1.256872E-05 - 1.127997E-03i, 1.726390E-04 + 9.493964E-03i];
Y(57,:,:) = [ 1.758245E-04 + 9.703819E-03i, -1.278728E-05 - 1.172097E-03i; -1.278728E-05 - 1.172097E-03i, 1.758716E-04 + 9.692079E-03i];
Y(58,:,:) = [ 1.791123E-04 + 9.902612E-03i, -1.303998E-05 - 1.216415E-03i; -1.303998E-05 - 1.216415E-03i, 1.791450E-04 + 9.890547E-03i];
Y(59,:,:) = [ 1.824440E-04 + 1.010182E-02i, -1.332834E-05 - 1.260993E-03i; -1.332834E-05 - 1.260993E-03i, 1.824607E-04 + 1.008941E-02i];
Y(60,:,:) = [ 1.858216E-04 + 1.030148E-02i, -1.365412E-05 - 1.305873E-03i; -1.365412E-05 - 1.305873E-03i, 1.858209E-04 + 1.028873E-02i];
Y(61,:,:) = [ 1.892475E-04 + 1.050164E-02i, -1.401929E-05 - 1.351100E-03i; -1.401929E-05 - 1.351100E-03i, 1.892277E-04 + 1.048853E-02i];
Y(62,:,:) = [ 1.927242E-04 + 1.070237E-02i, -1.442609E-05 - 1.396718E-03i; -1.442609E-05 - 1.396718E-03i, 1.926836E-04 + 1.068888E-02i];
Y(63,:,:) = [ 1.962547E-04 + 1.090370E-02i, -1.487707E-05 - 1.442774E-03i; -1.487707E-05 - 1.442774E-03i, 1.961914E-04 + 1.088982E-02i];
Y(64,:,:) = [ 1.998424E-04 + 1.110570E-02i, -1.537508E-05 - 1.489317E-03i; -1.537508E-05 - 1.489317E-03i, 1.997542E-04 + 1.109142E-02i];
Y(65,:,:) = [ 2.034908E-04 + 1.130841E-02i, -1.592331E-05 - 1.536396E-03i; -1.592331E-05 - 1.536396E-03i, 2.033756E-04 + 1.129371E-02i];
Y(66,:,:) = [ 2.072041E-04 + 1.151191E-02i, -1.652538E-05 - 1.584066E-03i; -1.652538E-05 - 1.584066E-03i, 2.070593E-04 + 1.149676E-02i];
Y(67,:,:) = [ 2.109868E-04 + 1.171625E-02i, -1.718531E-05 - 1.632381E-03i; -1.718531E-05 - 1.632381E-03i, 2.108098E-04 + 1.170064E-02i];
Y(68,:,:) = [ 2.148440E-04 + 1.192150E-02i, -1.790762E-05 - 1.681402E-03i; -1.790762E-05 - 1.681402E-03i, 2.146320E-04 + 1.190541E-02i];
Y(69,:,:) = [ 2.187815E-04 + 1.212773E-02i, -1.869738E-05 - 1.731192E-03i; -1.869738E-05 - 1.731192E-03i, 2.185311E-04 + 1.211113E-02i];
Y(70,:,:) = [ 2.228055E-04 + 1.233501E-02i, -1.956029E-05 - 1.781816E-03i; -1.956029E-05 - 1.781816E-03i, 2.225133E-04 + 1.231787E-02i];
Y(71,:,:) = [ 2.269231E-04 + 1.254343E-02i, -2.050271E-05 - 1.833348E-03i; -2.050271E-05 - 1.833348E-03i, 2.265853E-04 + 1.252573E-02i];
Y(72,:,:) = [ 2.311422E-04 + 1.275307E-02i, -2.153182E-05 - 1.885864E-03i; -2.153182E-05 - 1.885864E-03i, 2.307547E-04 + 1.273477E-02i];
Y(73,:,:) = [ 2.354718E-04 + 1.296402E-02i, -2.265567E-05 - 1.939447E-03i; -2.265567E-05 - 1.939447E-03i, 2.350298E-04 + 1.294509E-02i];
Y(74,:,:) = [ 2.399217E-04 + 1.317637E-02i, -2.388335E-05 - 1.994186E-03i; -2.388335E-05 - 1.994186E-03i, 2.394202E-04 + 1.315678E-02i];
Y(75,:,:) = [ 2.445032E-04 + 1.339025E-02i, -2.522509E-05 - 2.050179E-03i; -2.522509E-05 - 2.050179E-03i, 2.439365E-04 + 1.336996E-02i];
Y(76,:,:) = [ 2.492288E-04 + 1.360576E-02i, -2.669247E-05 - 2.107531E-03i; -2.669247E-05 - 2.107531E-03i, 2.485907E-04 + 1.358472E-02i];
Y(77,:,:) = [ 2.541128E-04 + 1.382303E-02i, -2.829860E-05 - 2.166357E-03i; -2.829860E-05 - 2.166357E-03i, 2.533964E-04 + 1.380119E-02i];
Y(78,:,:) = [ 2.591712E-04 + 1.404220E-02i, -3.005836E-05 - 2.226783E-03i; -3.005836E-05 - 2.226783E-03i, 2.583687E-04 + 1.401951E-02i];
Y(79,:,:) = [ 2.644222E-04 + 1.426341E-02i, -3.198868E-05 - 2.288946E-03i; -3.198868E-05 - 2.288946E-03i, 2.635251E-04 + 1.423981E-02i];
Y(80,:,:) = [ 2.698866E-04 + 1.448684E-02i, -3.410889E-05 - 2.352999E-03i; -3.410889E-05 - 2.352999E-03i, 2.688854E-04 + 1.446227E-02i];
Y(81,:,:) = [ 2.755881E-04 + 1.471266E-02i, -3.644111E-05 - 2.419109E-03i; -3.644111E-05 - 2.419109E-03i, 2.744720E-04 + 1.468705E-02i];
Y(82,:,:) = [ 2.815538E-04 + 1.494108E-02i, -3.901072E-05 - 2.487463E-03i; -3.901072E-05 - 2.487463E-03i, 2.803106E-04 + 1.491435E-02i];
Y(83,:,:) = [ 2.878146E-04 + 1.517231E-02i, -4.184697E-05 - 2.558266E-03i; -4.184697E-05 - 2.558266E-03i, 2.864310E-04 + 1.514439E-02i];
Y(84,:,:) = [ 2.944066E-04 + 1.540661E-02i, -4.498365E-05 - 2.631748E-03i; -4.498365E-05 - 2.631748E-03i, 2.928671E-04 + 1.537739E-02i];
Y(85,:,:) = [ 3.013712E-04 + 1.564426E-02i, -4.845999E-05 - 2.708168E-03i; -4.845999E-05 - 2.708168E-03i, 2.996585E-04 + 1.561364E-02i];
Y(86,:,:) = [ 3.087566E-04 + 1.588555E-02i, -5.232168E-05 - 2.787814E-03i; -5.232168E-05 - 2.787814E-03i, 3.068511E-04 + 1.585341E-02i];
Y(87,:,:) = [ 3.166192E-04 + 1.613084E-02i, -5.662219E-05 - 2.871012E-03i; -5.662219E-05 - 2.871012E-03i, 3.144983E-04 + 1.609706E-02i];
Y(88,:,:) = [ 3.250249E-04 + 1.638052E-02i, -6.142437E-05 - 2.958132E-03i; -6.142437E-05 - 2.958132E-03i, 3.226630E-04 + 1.634495E-02i];
Y(89,:,:) = [ 3.340516E-04 + 1.663503E-02i, -6.680248E-05 - 3.049591E-03i; -6.680248E-05 - 3.049591E-03i, 3.314193E-04 + 1.659752E-02i];
Y(90,:,:) = [ 3.437915E-04 + 1.689488E-02i, -7.284468E-05 - 3.145870E-03i; -7.284468E-05 - 3.145870E-03i, 3.408547E-04 + 1.685525E-02i];
Y(91,:,:) = [ 3.543547E-04 + 1.716066E-02i, -7.965630E-05 - 3.247517E-03i; -7.965630E-05 - 3.247517E-03i, 3.510740E-04 + 1.711869E-02i];
Y(92,:,:) = [ 3.658730E-04 + 1.743301E-02i, -8.736390E-05 - 3.355164E-03i; -8.736390E-05 - 3.355164E-03i, 3.622024E-04 + 1.738849E-02i];
Y(93,:,:) = [ 3.785056E-04 + 1.771273E-02i, -9.612053E-05 - 3.469543E-03i; -9.612053E-05 - 3.469543E-03i, 3.743916E-04 + 1.766538E-02i];
Y(94,:,:) = [ 3.924463E-04 + 1.800069E-02i, -1.061127E-04 - 3.591510E-03i; -1.061127E-04 - 3.591510E-03i, 3.878256E-04 + 1.795022E-02i];
Y(95,:,:) = [ 4.079323E-04 + 1.829794E-02i, -1.175691E-04 - 3.722063E-03i; -1.175691E-04 - 3.722063E-03i, 4.027302E-04 + 1.824401E-02i];
Y(96,:,:) = [ 4.252569E-04 + 1.860572E-02i, -1.307730E-04 - 3.862382E-03i; -1.307730E-04 - 3.862382E-03i, 4.193843E-04 + 1.854794E-02i];
Y(97,:,:) = [ 4.447857E-04 + 1.892548E-02i, -1.460780E-04 - 4.013870E-03i; -1.460780E-04 - 4.013870E-03i, 4.381357E-04 + 1.886340E-02i];
Y(98,:,:) = [ 4.669793E-04 + 1.925896E-02i, -1.639298E-04 - 4.178203E-03i; -1.639298E-04 - 4.178203E-03i, 4.594226E-04 + 1.919206E-02i];
Y(99,:,:) = [ 4.924237E-04 + 1.960827E-02i, -1.848965E-04 - 4.357406E-03i; -1.848965E-04 - 4.357406E-03i, 4.838025E-04 + 1.953593E-02i];
Y(100,:,:) = [ 5.218739E-04 + 1.997596E-02i, -2.097108E-04 - 4.553942E-03i; -2.097108E-04 - 4.553942E-03i, 5.119941E-04 + 1.989746E-02i];
Y(101,:,:) = [ 5.563152E-04 + 2.036515E-02i, -2.393293E-04 - 4.770842E-03i; -2.393293E-04 - 4.770842E-03i, 5.449349E-04 + 2.027965E-02i];
Y(102,:,:) = [ 5.970520E-04 + 2.077973E-02i, -2.750201E-04 - 5.011869E-03i; -2.750201E-04 - 5.011869E-03i, 5.838667E-04 + 2.068621E-02i];
Y(103,:,:) = [ 6.458391E-04 + 2.122459E-02i, -3.184903E-04 - 5.281759E-03i; -3.184903E-04 - 5.281759E-03i, 6.304604E-04 + 2.112181E-02i];
Y(104,:,:) = [ 7.050810E-04 + 2.170592E-02i, -3.720805E-04 - 5.586544E-03i; -3.720805E-04 - 5.586544E-03i, 6.870055E-04 + 2.159241E-02i];
Y(105,:,:) = [ 7.781390E-04 + 2.223177E-02i, -4.390650E-04 - 5.934024E-03i; -4.390650E-04 - 5.934024E-03i, 7.567038E-04 + 2.210567E-02i];
Y(106,:,:) = [ 8.698229E-04 + 2.281264E-02i, -5.241317E-04 - 6.334449E-03i; -5.241317E-04 - 6.334449E-03i, 8.441376E-04 + 2.267168E-02i];
Y(107,:,:) = [ 9.871998E-04 + 2.346262E-02i, -6.341716E-04 - 6.801537E-03i; -6.341716E-04 - 6.801537E-03i, 9.560413E-04 + 2.330390E-02i];
Y(108,:,:) = [ 1.140977E-03 + 2.420093E-02i, -7.796302E-04 - 7.354021E-03i; -7.796302E-04 - 7.354021E-03i, 1.102621E-03 + 2.402072E-02i];
Y(109,:,:) = [ 1.347969E-03 + 2.505436E-02i, -9.769159E-04 - 8.018064E-03i; -9.769159E-04 - 8.018064E-03i, 1.299908E-03 + 2.484779E-02i];
Y(110,:,:) = [ 1.635720E-03 + 2.606128E-02i, -1.252918E-03 - 8.831109E-03i; -1.252918E-03 - 8.831109E-03i, 1.574170E-03 + 2.582180E-02i];
Y(111,:,:) = [ 2.051688E-03 + 2.727792E-02i, -1.653977E-03 - 9.848106E-03i; -1.653977E-03 - 9.848106E-03i, 1.970682E-03 + 2.699659E-02i];
Y(112,:,:) = [ 2.682774E-03 + 2.878865E-02i, -2.264972E-03 - 1.115151E-02i; -2.264972E-03 - 1.115151E-02i, 2.572369E-03 + 2.845291E-02i];
Y(113,:,:) = [ 3.700278E-03 + 3.072081E-02i, -3.253252E-03 - 1.286586E-02i; -3.253252E-03 - 1.286586E-02i, 3.542748E-03 + 3.031273E-02i];
Y(114,:,:) = [ 5.472942E-03 + 3.325628E-02i, -4.979138E-03 - 1.516912E-02i; -4.979138E-03 - 1.516912E-02i, 5.233946E-03 + 3.275037E-02i];
Y(115,:,:) = [ 8.874503E-03 + 3.656527E-02i, -8.296626E-03 - 1.822824E-02i; -8.296626E-03 - 1.822824E-02i, 8.480692E-03 + 3.592980E-02i];
Y(116,:,:) = [ 1.608590E-02 + 4.013472E-02i, -1.533808E-02 - 2.154316E-02i; -1.533808E-02 - 2.154316E-02i, 1.536791E-02 + 3.936387E-02i];
Y(117,:,:) = [ 3.080592E-02 + 3.855396E-02i, -2.972330E-02 - 1.982721E-02i; -2.972330E-02 - 1.982721E-02i, 2.943813E-02 + 3.788731E-02i];
Y(118,:,:) = [ 4.171137E-02 + 1.772870E-02i, -4.039348E-02 + 7.062472E-04i; -4.039348E-02 + 7.062472E-04i, 3.989083E-02 + 1.801475E-02i];
Y(119,:,:) = [ 2.765670E-02 + 8.894553E-04i, -2.666021E-02 + 1.736355E-02i; -2.666021E-02 + 1.736355E-02i, 2.648500E-02 + 1.915654E-03i];
Y(120,:,:) = [ 1.480491E-02 + 1.027573E-03i, -1.408997E-02 + 1.742563E-02i; -1.408997E-02 + 1.742563E-02i, 1.420425E-02 + 2.042810E-03i];
Y(121,:,:) = [ 8.629086E-03 + 4.436300E-03i, -8.043160E-03 + 1.428787E-02i; -8.043160E-03 + 1.428787E-02i, 8.298626E-03 + 5.305466E-03i];
Y(122,:,:) = [ 5.606636E-03 + 7.441606E-03i, -5.078932E-03 + 1.154467E-02i; -5.078932E-03 + 1.154467E-02i, 5.407140E-03 + 8.187531E-03i];
Y(123,:,:) = [ 3.971183E-03 + 9.760683E-03i, -3.470707E-03 + 9.474093E-03i; -3.470707E-03 + 9.474093E-03i, 3.842187E-03 + 1.041622E-02i];
Y(124,:,:) = [ 3.002854E-03 + 1.155372E-02i, -2.514558E-03 + 7.920353E-03i; -2.514558E-03 + 7.920353E-03i, 2.915607E-03 + 1.214362E-02i];
Y(125,:,:) = [ 2.387432E-03 + 1.297682E-02i, -1.903107E-03 + 6.731362E-03i; -1.903107E-03 + 6.731362E-03i, 2.326909E-03 + 1.351850E-02i];
Y(126,:,:) = [ 1.974259E-03 + 1.413960E-02i, -1.488909E-03 + 5.800400E-03i; -1.488909E-03 + 5.800400E-03i, 1.931973E-03 + 1.464543E-02i];
Y(127,:,:) = [ 1.684790E-03 + 1.511555E-02i, -1.195031E-03 + 5.056024E-03i; -1.195031E-03 + 5.056024E-03i, 1.655645E-03 + 1.559460E-02i];
Y(128,:,:) = [ 1.475117E-03 + 1.595438E-02i, -9.784125E-04 + 4.450105E-03i; -9.784125E-04 + 4.450105E-03i, 1.455912E-03 + 1.641349E-02i];
Y(129,:,:) = [ 1.319250E-03 + 1.669042E-02i, -8.134929E-04 + 3.949578E-03i; -8.134929E-04 + 3.949578E-03i, 1.307910E-03 + 1.713497E-02i];
Y(130,:,:) = [ 1.201060E-03 + 1.734801E-02i, -6.843358E-04 + 3.531218E-03i; -6.843358E-04 + 3.531218E-03i, 1.196213E-03 + 1.778235E-02i];
Y(131,:,:) = [ 1.110145E-03 + 1.794486E-02i, -5.805728E-04 + 3.178384E-03i; -5.805728E-04 + 3.178384E-03i, 1.110888E-03 + 1.837263E-02i];
Y(132,:,:) = [ 1.039581E-03 + 1.849416E-02i, -4.951991E-04 + 2.878940E-03i; -4.951991E-04 + 2.878940E-03i, 1.045333E-03 + 1.891851E-02i];
Y(133,:,:) = [ 9.846451E-04 + 1.900597E-02i, -4.233130E-04 + 2.623927E-03i; -4.233130E-04 + 2.623927E-03i, 9.950682E-04 + 1.942974E-02i];
Y(134,:,:) = [ 9.420648E-04 + 1.948819E-02i, -3.613634E-04 + 2.406681E-03i; -3.613634E-04 + 2.406681E-03i, 9.570083E-04 + 1.991402E-02i];
Y(135,:,:) = [ 9.095540E-04 + 1.994716E-02i, -3.066811E-04 + 2.222247E-03i; -3.066811E-04 + 2.222247E-03i, 9.290292E-04 + 2.037758E-02i];
Y(136,:,:) = [ 8.855311E-04 + 2.038811E-02i, -2.571739E-04 + 2.066987E-03i; -2.571739E-04 + 2.066987E-03i, 9.096983E-04 + 2.082564E-02i];
Y(137,:,:) = [ 8.689414E-04 + 2.081553E-02i, -2.111164E-04 + 1.938315E-03i; -2.111164E-04 + 1.938315E-03i, 8.981114E-04 + 2.126274E-02i];
Y(138,:,:) = [ 8.591520E-04 + 2.123337E-02i, -1.669961E-04 + 1.834532E-03i; -1.669961E-04 + 1.834532E-03i, 8.937988E-04 + 2.169298E-02i];
Y(139,:,:) = [ 8.558972E-04 + 2.164529E-02i, -1.233868E-04 + 1.754728E-03i; -1.233868E-04 + 1.754728E-03i, 8.966853E-04 + 2.212026E-02i];
Y(140,:,:) = [ 8.592675E-04 + 2.205485E-02i, -7.883152E-05 + 1.698743E-03i; -7.883152E-05 + 1.698743E-03i, 9.070947E-04 + 2.254844E-02i];
Y(141,:,:) = [ 8.697396E-04 + 2.246564E-02i, -3.171544E-05 + 1.667191E-03i; -3.171544E-05 + 1.667191E-03i, 9.258030E-04 + 2.298160E-02i];
Y(142,:,:) = [ 8.882578E-04 + 2.288157E-02i, 1.989276E-05 + 1.661544E-03i; 1.989276E-05 + 1.661544E-03i, 9.541521E-04 + 2.342421E-02i];
Y(143,:,:) = [ 9.163852E-04 + 2.330701E-02i, 7.846102E-05 + 1.684288E-03i; 7.846102E-05 + 1.684288E-03i, 9.942502E-04 + 2.388147E-02i];
Y(144,:,:) = [ 9.565663E-04 + 2.374716E-02i, 1.473262E-04 + 1.739179E-03i; 1.473262E-04 + 1.739179E-03i, 1.049312E-03 + 2.435962E-02i];
Y(145,:,:) = [ 1.012573E-03 + 2.420844E-02i, 2.312263E-04 + 1.831651E-03i; 2.312263E-04 + 1.831651E-03i, 1.124232E-03 + 2.486652E-02i];
Y(146,:,:) = [ 1.090283E-03 + 2.469909E-02i, 3.371966E-04 + 1.969411E-03i; 3.371966E-04 + 1.969411E-03i, 1.226576E-03 + 2.541235E-02i];
Y(147,:,:) = [ 1.199064E-03 + 2.523000E-02i, 4.761533E-04 + 2.163342E-03i; 4.761533E-04 + 2.163342E-03i, 1.368352E-03 + 2.601062E-02i];
Y(148,:,:) = [ 1.354376E-03 + 2.581587E-02i, 6.658317E-04 + 2.428786E-03i; 6.658317E-04 + 2.428786E-03i, 1.569311E-03 + 2.667972E-02i];
Y(149,:,:) = [ 1.582858E-03 + 2.647679E-02i, 9.365338E-04 + 2.787211E-03i; 9.365338E-04 + 2.787211E-03i, 1.863422E-03 + 2.744476E-02i];
Y(150,:,:) = [ 1.932886E-03 + 2.723945E-02i, 1.343019E-03 + 3.267580E-03i; 1.343019E-03 + 3.267580E-03i, 2.312262E-03 + 2.833909E-02i];
Y(151,:,:) = [ 2.497624E-03 + 2.813485E-02i, 1.990446E-03 + 3.903602E-03i; 1.990446E-03 + 3.903602E-03i, 3.034242E-03 + 2.940120E-02i];
Y(152,:,:) = [ 3.466787E-03 + 2.917629E-02i, 3.092547E-03 + 4.708806E-03i; 3.092547E-03 + 4.708806E-03i, 4.270087E-03 + 3.064646E-02i];
Y(153,:,:) = [ 5.231454E-03 + 3.024477E-02i, 5.089190E-03 + 5.547084E-03i; 5.089190E-03 + 5.547084E-03i, 6.514927E-03 + 3.192088E-02i];
Y(154,:,:) = [ 8.428099E-03 + 3.059681E-02i, 8.694151E-03 + 5.578515E-03i; 8.694151E-03 + 5.578515E-03i, 1.057048E-02 + 3.227664E-02i];
Y(155,:,:) = [ 1.257638E-02 + 2.785489E-02i, 1.335768E-02 + 2.127592E-03i; 1.335768E-02 + 2.127592E-03i, 1.580965E-02 + 2.870164E-02i];
Y(156,:,:) = [ 1.275836E-02 + 2.177387E-02i, 1.354081E-02 - 5.062959E-03i; 1.354081E-02 - 5.062959E-03i, 1.599239E-02 + 2.092195E-02i];
Y(157,:,:) = [ 8.725707E-03 + 1.877593E-02i, 8.990687E-03 - 8.758772E-03i; 8.990687E-03 - 8.758772E-03i, 1.085260E-02 + 1.708623E-02i];
Y(158,:,:) = [ 5.475175E-03 + 1.897956E-02i, 5.337951E-03 - 8.850649E-03i; 5.337951E-03 - 8.850649E-03i, 6.730398E-03 + 1.730587E-02i];
Y(159,:,:) = [ 3.652072E-03 + 1.998218E-02i, 3.294641E-03 - 8.050291E-03i; 3.294641E-03 - 8.050291E-03i, 4.424895E-03 + 1.852733E-02i];
Y(160,:,:) = [ 2.642305E-03 + 2.098627E-02i, 2.163241E-03 - 7.249960E-03i; 2.163241E-03 - 7.249960E-03i, 3.150248E-03 + 1.974443E-02i];
Y(161,:,:) = [ 2.049726E-03 + 2.185196E-02i, 1.498571E-03 - 6.603524E-03i; 1.498571E-03 - 6.603524E-03i, 2.403153E-03 + 2.078332E-02i];
Y(162,:,:) = [ 1.679420E-03 + 2.258538E-02i, 1.082608E-03 - 6.103447E-03i; 1.082608E-03 - 6.103447E-03i, 1.936736E-03 + 2.165331E-02i];
Y(163,:,:) = [ 1.435089E-03 + 2.321474E-02i, 8.076444E-04 - 5.718240E-03i; 8.076444E-04 - 5.718240E-03i, 1.629212E-03 + 2.239079E-02i];
Y(164,:,:) = [ 1.266534E-03 + 2.376538E-02i, 6.174438E-04 - 5.419726E-03i; 6.174438E-04 - 5.419726E-03i, 1.417152E-03 + 2.302821E-02i];
Y(165,:,:) = [ 1.145984E-03 + 2.425650E-02i, 4.808468E-04 - 5.186589E-03i; 4.808468E-04 - 5.186589E-03i, 1.265493E-03 + 2.359007E-02i];
Y(166,:,:) = [ 1.057218E-03 + 2.470211E-02i, 3.796322E-04 - 5.003310E-03i; 3.796322E-04 - 5.003310E-03i, 1.153766E-03 + 2.409418E-02i];
Y(167,:,:) = [ 9.902961E-04 + 2.511240E-02i, 3.026323E-04 - 4.858623E-03i; 3.026323E-04 - 4.858623E-03i, 1.069441E-03 + 2.455353E-02i];
Y(168,:,:) = [ 9.388766E-04 + 2.549488E-02i, 2.427190E-04 - 4.744270E-03i; 2.427190E-04 - 4.744270E-03i, 1.004528E-03 + 2.497763E-02i];
Y(169,:,:) = [ 8.987658E-04 + 2.585514E-02i, 1.951814E-04 - 4.654120E-03i; 1.951814E-04 - 4.654120E-03i, 9.537478E-04 + 2.537359E-02i];
Y(170,:,:) = [ 8.671059E-04 + 2.619743E-02i, 1.568096E-04 - 4.583551E-03i; 1.568096E-04 - 4.583551E-03i, 9.135054E-04 + 2.574679E-02i];
Y(171,:,:) = [ 8.418967E-04 + 2.652502E-02i, 1.253586E-04 - 4.529032E-03i; 1.253586E-04 - 4.529032E-03i, 8.812870E-04 + 2.610137E-02i];
Y(172,:,:) = [ 8.217058E-04 + 2.684048E-02i, 9.922078E-05 - 4.487827E-03i; 9.922078E-05 - 4.487827E-03i, 8.552934E-04 + 2.644056E-02i];
Y(173,:,:) = [ 8.054862E-04 + 2.714583E-02i, 7.722102E-05 - 4.457790E-03i; 7.722102E-05 - 4.457790E-03i, 8.342106E-04 + 2.676692E-02i];
Y(174,:,:) = [ 7.924591E-04 + 2.744270E-02i, 5.848447E-05 - 4.437221E-03i; 5.848447E-05 - 4.437221E-03i, 8.170614E-04 + 2.708251E-02i];
Y(175,:,:) = [ 7.820361E-04 + 2.773243E-02i, 4.234881E-05 - 4.424758E-03i; 4.234881E-05 - 4.424758E-03i, 8.031076E-04 + 2.738900E-02i];
Y(176,:,:) = [ 7.737663E-04 + 2.801611E-02i, 2.830492E-05 - 4.419301E-03i; 2.830492E-05 - 4.419301E-03i, 7.917837E-04 + 2.768774E-02i];
Y(177,:,:) = [ 7.673003E-04 + 2.829464E-02i, 1.595593E-05 - 4.419952E-03i; 1.595593E-05 - 4.419952E-03i, 7.826511E-04 + 2.797989E-02i];
Y(178,:,:) = [ 7.623641E-04 + 2.856880E-02i, 4.988408E-06 - 4.425976E-03i; 4.988408E-06 - 4.425976E-03i, 7.753661E-04 + 2.826639E-02i];
Y(179,:,:) = [ 7.587417E-04 + 2.883923E-02i, -4.848312E-06 - 4.436767E-03i; -4.848312E-06 - 4.436767E-03i, 7.696565E-04 + 2.854805E-02i];
Y(180,:,:) = [ 7.562610E-04 + 2.910649E-02i, -1.375708E-05 - 4.451822E-03i; -1.375708E-05 - 4.451822E-03i, 7.653054E-04 + 2.882556E-02i];
Y(181,:,:) = [ 7.547846E-04 + 2.937107E-02i, -2.190401E-05 - 4.470721E-03i; -2.190401E-05 - 4.470721E-03i, 7.621389E-04 + 2.909951E-02i];
Y(182,:,:) = [ 7.542024E-04 + 2.963339E-02i, -2.942671E-05 - 4.493115E-03i; -2.942671E-05 - 4.493115E-03i, 7.600165E-04 + 2.937041E-02i];
Y(183,:,:) = [ 7.544261E-04 + 2.989383E-02i, -3.644058E-05 - 4.518711E-03i; -3.644058E-05 - 4.518711E-03i, 7.588250E-04 + 2.963873E-02i];
Y(184,:,:) = [ 7.553851E-04 + 3.015271E-02i, -4.304355E-05 - 4.547264E-03i; -4.304355E-05 - 4.547264E-03i, 7.584727E-04 + 2.990486E-02i];
Y(185,:,:) = [ 7.570236E-04 + 3.041033E-02i, -4.931981E-05 - 4.578570E-03i; -4.931981E-05 - 4.578570E-03i, 7.588856E-04 + 3.016915E-02i];
Y(186,:,:) = [ 7.592978E-04 + 3.066697E-02i, -5.534275E-05 - 4.612456E-03i; -5.534275E-05 - 4.612456E-03i, 7.600046E-04 + 3.043194E-02i];
Y(187,:,:) = [ 7.621745E-04 + 3.092287E-02i, -6.117722E-05 - 4.648783E-03i; -6.117722E-05 - 4.648783E-03i, 7.617827E-04 + 3.069350E-02i];
Y(188,:,:) = [ 7.656292E-04 + 3.117827E-02i, -6.688147E-05 - 4.687431E-03i; -6.688147E-05 - 4.687431E-03i, 7.641836E-04 + 3.095411E-02i];
Y(189,:,:) = [ 7.696454E-04 + 3.143337E-02i, -7.250861E-05 - 4.728308E-03i; -7.250861E-05 - 4.728308E-03i, 7.671799E-04 + 3.121401E-02i];
Y(190,:,:) = [ 7.742137E-04 + 3.168837E-02i, -7.810789E-05 - 4.771336E-03i; -7.810789E-05 - 4.771336E-03i, 7.707522E-04 + 3.147342E-02i];
Y(191,:,:) = [ 7.793312E-04 + 3.194348E-02i, -8.372580E-05 - 4.816458E-03i; -8.372580E-05 - 4.816458E-03i, 7.748883E-04 + 3.173257E-02i];
Y(192,:,:) = [ 7.850010E-04 + 3.219886E-02i, -8.940694E-05 - 4.863628E-03i; -8.940694E-05 - 4.863628E-03i, 7.795826E-04 + 3.199165E-02i];
Y(193,:,:) = [ 7.912320E-04 + 3.245471E-02i, -9.519484E-05 - 4.912818E-03i; -9.519484E-05 - 4.912818E-03i, 7.848355E-04 + 3.225085E-02i];
Y(194,:,:) = [ 7.980389E-04 + 3.271118E-02i, -1.011327E-04 - 4.964009E-03i; -1.011327E-04 - 4.964009E-03i, 7.906532E-04 + 3.251036E-02i];
Y(195,:,:) = [ 8.054420E-04 + 3.296844E-02i, -1.072641E-04 - 5.017196E-03i; -1.072641E-04 - 5.017196E-03i, 7.970474E-04 + 3.277037E-02i];
Y(196,:,:) = [ 8.134675E-04 + 3.322667E-02i, -1.136334E-04 - 5.072383E-03i; -1.136334E-04 - 5.072383E-03i, 8.040358E-04 + 3.303104E-02i];
Y(197,:,:) = [ 8.221475E-04 + 3.348604E-02i, -1.202868E-04 - 5.129586E-03i; -1.202868E-04 - 5.129586E-03i, 8.116412E-04 + 3.329254E-02i];
Y(198,:,:) = [ 8.315203E-04 + 3.374670E-02i, -1.272725E-04 - 5.188829E-03i; -1.272725E-04 - 5.188829E-03i, 8.198926E-04 + 3.355506E-02i];
Y(199,:,:) = [ 8.416313E-04 + 3.400883E-02i, -1.346416E-04 - 5.250146E-03i; -1.346416E-04 - 5.250146E-03i, 8.288249E-04 + 3.381875E-02i];
Y(200,:,:) = [ 8.525329E-04 + 3.427261E-02i, -1.424485E-04 - 5.313581E-03i; -1.424485E-04 - 5.313581E-03i, 8.384795E-04 + 3.408380E-02i];
Z(1,:,:) = [ 6.212511E+02 - 3.303855E+04i, 6.203310E+02 - 3.304086E+04i; 6.203310E+02 - 3.304086E+04i, 6.212476E+02 - 3.303856E+04i];
Z(2,:,:) = [ 5.091808E+01 - 3.023700E+03i, 4.873061E+01 - 3.046525E+03i; 4.873061E+01 - 3.046525E+03i, 5.091804E+01 - 3.023676E+03i];
Z(3,:,:) = [ 1.922099E+01 - 1.560784E+03i, 1.628674E+01 - 1.603789E+03i; 1.628674E+01 - 1.603789E+03i, 1.922062E+01 - 1.560737E+03i];
Z(4,:,:) = [ 2.152960E+01 - 1.035987E+03i, 1.805713E+01 - 1.100183E+03i; 1.805713E+01 - 1.100183E+03i, 2.152849E+01 - 1.035915E+03i];
Z(5,:,:) = [ 1.766313E+01 - 7.642278E+02i, 1.359989E+01 - 8.513282E+02i; 1.359989E+01 - 8.513282E+02i, 1.766129E+01 - 7.641291E+02i];
Z(6,:,:) = [ 1.474347E+01 - 5.930627E+02i, 9.917796E+00 - 7.055356E+02i; 9.917796E+00 - 7.055356E+02i, 1.474106E+01 - 5.929346E+02i];
Z(7,:,:) = [ 1.316441E+01 - 4.721154E+02i, 7.297247E+00 - 6.134411E+02i; 7.297247E+00 - 6.134411E+02i, 1.316159E+01 - 4.719539E+02i];
Z(8,:,:) = [ 1.247062E+01 - 3.787947E+02i, 5.131931E+00 - 5.538858E+02i; 5.131931E+00 - 5.538858E+02i, 1.246760E+01 - 3.785940E+02i];
Z(9,:,:) = [ 1.247816E+01 - 3.008595E+02i, 2.988526E+00 - 5.167569E+02i; 2.988526E+00 - 5.167569E+02i, 1.247530E+01 - 3.006114E+02i];
Z(10,:,:) = [ 1.327173E+01 - 2.303628E+02i, 5.024129E-01 - 4.974532E+02i; 5.024129E-01 - 4.974532E+02i, 1.326971E+01 - 2.300552E+02i];
Z(11,:,:) = [ 1.523261E+01 - 1.607231E+02i, -2.827870E+00 - 4.950161E+02i; -2.827870E+00 - 4.950161E+02i, 1.523280E+01 - 1.603372E+02i];
Z(12,:,:) = [ 1.930132E+01 - 8.446745E+01i, -7.977481E+00 - 5.122523E+02i; -7.977481E+00 - 5.122523E+02i, 1.930672E+01 - 8.397209E+01i];
Z(13,:,:) = [ 2.778814E+01 + 1.055217E+01i, -1.740879E+01 - 5.580356E+02i; -1.740879E+01 - 5.580356E+02i, 2.780607E+01 + 1.121228E+01i];
Z(14,:,:) = [ 4.819922E+01 + 1.508019E+02i, -3.864154E+01 - 6.566303E+02i; -3.864154E+01 - 6.566303E+02i, 4.825140E+01 + 1.517421E+02i];
Z(15,:,:) = [ 1.146258E+02 + 4.165825E+02i, -1.058212E+02 - 8.868331E+02i; -1.058212E+02 - 8.868331E+02i, 1.148038E+02 + 4.181073E+02i];
Z(16,:,:) = [ 5.741315E+02 + 1.198820E+03i, -5.664120E+02 - 1.638869E+03i; -5.664120E+02 - 1.638869E+03i, 5.752882E+02 + 1.202184E+03i];
Z(17,:,:) = [ 2.270980E+03 - 2.303113E+03i, -2.265964E+03 + 1.894307E+03i; -2.265964E+03 + 1.894307E+03i, 2.276508E+03 - 2.307730E+03i];
Z(18,:,:) = [ 2.251274E+02 - 1.143146E+03i, -2.181193E+02 + 7.571965E+02i; -2.181193E+02 + 7.571965E+02i, 2.257559E+02 - 1.145336E+03i];
Z(19,:,:) = [ 7.818440E+01 - 7.484961E+02i, -7.138705E+01 + 3.835183E+02i; -7.138705E+01 + 3.835183E+02i, 7.842537E+01 - 7.498098E+02i];
Z(20,:,:) = [ 4.103837E+01 - 5.791408E+02i, -3.454977E+01 + 2.331483E+02i; -3.454977E+01 + 2.331483E+02i, 4.117416E+01 - 5.800872E+02i];
Z(21,:,:) = [ 2.621031E+01 - 4.835593E+02i, -2.002441E+01 + 1.547293E+02i; -2.002441E+01 + 1.547293E+02i, 2.630154E+01 - 4.843053E+02i];
Z(22,:,:) = [ 1.875109E+01 - 4.210432E+02i, -1.284745E+01 + 1.077777E+02i; -1.284745E+01 + 1.077777E+02i, 1.881873E+01 - 4.216630E+02i];
Z(23,:,:) = [ 1.443046E+01 - 3.762773E+02i, -8.787145E+00 + 7.718295E+01i; -8.787145E+00 + 7.718295E+01i, 1.448381E+01 - 3.768102E+02i];
Z(24,:,:) = [ 1.167710E+01 - 3.422190E+02i, -6.273488E+00 + 5.607790E+01i; -6.273488E+00 + 5.607790E+01i, 1.172100E+01 - 3.426882E+02i];
Z(25,:,:) = [ 9.797046E+00 - 3.151690E+02i, -4.614371E+00 + 4.091236E+01i; -4.614371E+00 + 4.091236E+01i, 9.834271E+00 - 3.155896E+02i];
Z(26,:,:) = [ 8.444352E+00 - 2.929910E+02i, -3.465754E+00 + 2.967623E+01i; -3.465754E+00 + 2.967623E+01i, 8.476639E+00 - 2.933731E+02i];
Z(27,:,:) = [ 7.430406E+00 - 2.743600E+02i, -2.640754E+00 + 2.115188E+01i; -2.640754E+00 + 2.115188E+01i, 7.458898E+00 - 2.747108E+02i];
Z(28,:,:) = [ 6.644972E+00 - 2.584069E+02i, -2.030680E+00 + 1.456226E+01i; -2.030680E+00 + 1.456226E+01i, 6.670461E+00 - 2.587318E+02i];
Z(29,:,:) = [ 6.019954E+00 - 2.445359E+02i, -1.568796E+00 + 9.390506E+00i; -1.568796E+00 + 9.390506E+00i, 6.043007E+00 - 2.448390E+02i];
Z(30,:,:) = [ 5.511335E+00 - 2.323232E+02i, -1.212281E+00 + 5.281021E+00i; -1.212281E+00 + 5.281021E+00i, 5.532374E+00 - 2.326075E+02i];
Z(31,:,:) = [ 5.089566E+00 - 2.214579E+02i, -9.326357E-01 + 1.982224E+00i; -9.326357E-01 + 1.982224E+00i, 5.108908E+00 - 2.217261E+02i];
Z(32,:,:) = [ 4.734160E+00 - 2.117062E+02i, -7.103002E-01 - 6.881170E-01i; -7.103002E-01 - 6.881170E-01i, 4.752053E+00 - 2.119602E+02i];
Z(33,:,:) = [ 4.430519E+00 - 2.028881E+02i, -5.314944E-01 - 2.864685E+00i; -5.314944E-01 - 2.864685E+00i, 4.447159E+00 - 2.031296E+02i];
Z(34,:,:) = [ 4.167987E+00 - 1.948626E+02i, -3.862874E-01 - 4.648765E+00i; -3.862874E-01 - 4.648765E+00i, 4.183532E+00 - 1.950930E+02i];
Z(35,:,:) = [ 3.938621E+00 - 1.875172E+02i, -2.673806E-01 - 6.117689E+00i; -2.673806E-01 - 6.117689E+00i, 3.953197E+00 - 1.877376E+02i];
Z(36,:,:) = [ 3.736387E+00 - 1.807608E+02i, -1.693161E-01 - 7.331290E+00i; -1.693161E-01 - 7.331290E+00i, 3.750101E+00 - 1.809722E+02i];
Z(37,:,:) = [ 3.556627E+00 - 1.745189E+02i, -8.794991E-02 - 8.336417E+00i; -8.794991E-02 - 8.336417E+00i, 3.569568E+00 - 1.747223E+02i];
Z(38,:,:) = [ 3.395692E+00 - 1.687298E+02i, -2.009253E-02 - 9.170138E+00i; -2.009253E-02 - 9.170138E+00i, 3.407932E+00 - 1.689257E+02i];
Z(39,:,:) = [ 3.250681E+00 - 1.633416E+02i, 3.674105E-02 - 9.862062E+00i; 3.674105E-02 - 9.862062E+00i, 3.262285E+00 - 1.635308E+02i];
Z(40,:,:) = [ 3.119264E+00 - 1.583107E+02i, 8.450818E-02 - 1.043604E+01i; 8.450818E-02 - 1.043604E+01i, 3.130284E+00 - 1.584937E+02i];
Z(41,:,:) = [ 2.999547E+00 - 1.535997E+02i, 1.247660E-01 - 1.091144E+01i; 1.247660E-01 - 1.091144E+01i, 3.010030E+00 - 1.537770E+02i];
Z(42,:,:) = [ 2.889974E+00 - 1.491767E+02i, 1.587645E-01 - 1.130411E+01i; 1.587645E-01 - 1.130411E+01i, 2.899961E+00 - 1.493488E+02i];
Z(43,:,:) = [ 2.789257E+00 - 1.450140E+02i, 1.875151E-01 - 1.162705E+01i; 1.875151E-01 - 1.162705E+01i, 2.798782E+00 - 1.451812E+02i];
Z(44,:,:) = [ 2.696320E+00 - 1.410875E+02i, 2.118427E-01 - 1.189108E+01i; 2.118427E-01 - 1.189108E+01i, 2.705415E+00 - 1.412503E+02i];
Z(45,:,:) = [ 2.610257E+00 - 1.373762E+02i, 2.324244E-01 - 1.210515E+01i; 2.324244E-01 - 1.210515E+01i, 2.618948E+00 - 1.375349E+02i];
Z(46,:,:) = [ 2.530299E+00 - 1.338616E+02i, 2.498195E-01 - 1.227679E+01i; 2.498195E-01 - 1.227679E+01i, 2.538612E+00 - 1.340164E+02i];
Z(47,:,:) = [ 2.455793E+00 - 1.305274E+02i, 2.644929E-01 - 1.241231E+01i; 2.644929E-01 - 1.241231E+01i, 2.463747E+00 - 1.306786E+02i];
Z(48,:,:) = [ 2.386174E+00 - 1.273589E+02i, 2.768327E-01 - 1.251702E+01i; 2.768327E-01 - 1.251702E+01i, 2.393788E+00 - 1.275068E+02i];
Z(49,:,:) = [ 2.320957E+00 - 1.243433E+02i, 2.871648E-01 - 1.259545E+01i; 2.871648E-01 - 1.259545E+01i, 2.328248E+00 - 1.244881E+02i];
Z(50,:,:) = [ 2.259721E+00 - 1.214690E+02i, 2.957639E-01 - 1.265144E+01i; 2.957639E-01 - 1.265144E+01i, 2.266704E+00 - 1.216109E+02i];
Z(51,:,:) = [ 2.202098E+00 - 1.187255E+02i, 3.028626E-01 - 1.268827E+01i; 3.028626E-01 - 1.268827E+01i, 2.208786E+00 - 1.188647E+02i];
Z(52,:,:) = [ 2.147766E+00 - 1.161035E+02i, 3.086585E-01 - 1.270874E+01i; 3.086585E-01 - 1.270874E+01i, 2.154171E+00 - 1.162402E+02i];
Z(53,:,:) = [ 2.096442E+00 - 1.135945E+02i, 3.133199E-01 - 1.271528E+01i; 3.133199E-01 - 1.271528E+01i, 2.102575E+00 - 1.137288E+02i];
Z(54,:,:) = [ 2.047877E+00 - 1.111908E+02i, 3.169910E-01 - 1.270995E+01i; 3.169910E-01 - 1.270995E+01i, 2.053747E+00 - 1.113230E+02i];
Z(55,:,:) = [ 2.001849E+00 - 1.088854E+02i, 3.197950E-01 - 1.269455E+01i; 3.197950E-01 - 1.269455E+01i, 2.007464E+00 - 1.090156E+02i];
Z(56,:,:) = [ 1.958161E+00 - 1.066720E+02i, 3.218382E-01 - 1.267066E+01i; 3.218382E-01 - 1.267066E+01i, 1.963528E+00 - 1.068002E+02i];
Z(57,:,:) = [ 1.916638E+00 - 1.045446E+02i, 3.232117E-01 - 1.263961E+01i; 3.232117E-01 - 1.263961E+01i, 1.921765E+00 - 1.046711E+02i];
Z(58,:,:) = [ 1.877124E+00 - 1.024980E+02i, 3.239942E-01 - 1.260259E+01i; 3.239942E-01 - 1.260259E+01i, 1.882015E+00 - 1.026229E+02i];
Z(59,:,:) = [ 1.839477E+00 - 1.005272E+02i, 3.242536E-01 - 1.256064E+01i; 3.242536E-01 - 1.256064E+01i, 1.844138E+00 - 1.006507E+02i];
Z(60,:,:) = [ 1.803573E+00 - 9.862780E+01i, 3.240484E-01 - 1.251465E+01i; 3.240484E-01 - 1.251465E+01i, 1.808007E+00 - 9.874993E+01i];
Z(61,:,:) = [ 1.769298E+00 - 9.679550E+01i, 3.234292E-01 - 1.246542E+01i; 3.234292E-01 - 1.246542E+01i, 1.773508E+00 - 9.691642E+01i];
Z(62,:,:) = [ 1.736549E+00 - 9.502650E+01i, 3.224395E-01 - 1.241366E+01i; 3.224395E-01 - 1.241366E+01i, 1.740538E+00 - 9.514631E+01i];
Z(63,:,:) = [ 1.705235E+00 - 9.331721E+01i, 3.211166E-01 - 1.235998E+01i; 3.211166E-01 - 1.235998E+01i, 1.709005E+00 - 9.343604E+01i];
Z(64,:,:) = [ 1.675271E+00 - 9.166432E+01i, 3.194927E-01 - 1.230493E+01i; 3.194927E-01 - 1.230493E+01i, 1.678824E+00 - 9.178229E+01i];
Z(65,:,:) = [ 1.646584E+00 - 9.006475E+01i, 3.175950E-01 - 1.224901E+01i; 3.175950E-01 - 1.224901E+01i, 1.649920E+00 - 9.018196E+01i];
Z(66,:,:) = [ 1.619105E+00 - 8.851560E+01i, 3.154467E-01 - 1.219264E+01i; 3.154467E-01 - 1.219264E+01i, 1.622223E+00 - 8.863218E+01i];
Z(67,:,:) = [ 1.592773E+00 - 8.701421E+01i, 3.130670E-01 - 1.213623E+01i; 3.130670E-01 - 1.213623E+01i, 1.595673E+00 - 8.713026E+01i];
Z(68,:,:) = [ 1.567533E+00 - 8.555806E+01i, 3.104720E-01 - 1.208014E+01i; 3.104720E-01 - 1.208014E+01i, 1.570212E+00 - 8.567369E+01i];
Z(69,:,:) = [ 1.543334E+00 - 8.414478E+01i, 3.076746E-01 - 1.202468E+01i; 3.076746E-01 - 1.202468E+01i, 1.545791E+00 - 8.426012E+01i];
Z(70,:,:) = [ 1.520132E+00 - 8.277218E+01i, 3.046845E-01 - 1.197015E+01i; 3.046845E-01 - 1.197015E+01i, 1.522364E+00 - 8.288734E+01i];
Z(71,:,:) = [ 1.497887E+00 - 8.143817E+01i, 3.015093E-01 - 1.191683E+01i; 3.015093E-01 - 1.191683E+01i, 1.499890E+00 - 8.155327E+01i];
Z(72,:,:) = [ 1.476564E+00 - 8.014079E+01i, 2.981537E-01 - 1.186497E+01i; 2.981537E-01 - 1.186497E+01i, 1.478334E+00 - 8.025595E+01i];
Z(73,:,:) = [ 1.456132E+00 - 7.887818E+01i, 2.946202E-01 - 1.181481E+01i; 2.946202E-01 - 1.181481E+01i, 1.457662E+00 - 7.899352E+01i];
Z(74,:,:) = [ 1.436562E+00 - 7.764860E+01i, 2.909087E-01 - 1.176659E+01i; 2.909087E-01 - 1.176659E+01i, 1.437846E+00 - 7.776425E+01i];
Z(75,:,:) = [ 1.417833E+00 - 7.645037E+01i, 2.870171E-01 - 1.172051E+01i; 2.870171E-01 - 1.172051E+01i, 1.418864E+00 - 7.656647E+01i];
Z(76,:,:) = [ 1.399925E+00 - 7.528192E+01i, 2.829407E-01 - 1.167680E+01i; 2.829407E-01 - 1.167680E+01i, 1.400693E+00 - 7.539860E+01i];
Z(77,:,:) = [ 1.382822E+00 - 7.414173E+01i, 2.786726E-01 - 1.163566E+01i; 2.786726E-01 - 1.163566E+01i, 1.383317E+00 - 7.425913E+01i];
Z(78,:,:) = [ 1.366513E+00 - 7.302836E+01i, 2.742033E-01 - 1.159731E+01i; 2.742033E-01 - 1.159731E+01i, 1.366724E+00 - 7.314664E+01i];
Z(79,:,:) = [ 1.350989E+00 - 7.194043E+01i, 2.695207E-01 - 1.156194E+01i; 2.695207E-01 - 1.156194E+01i, 1.350904E+00 - 7.205974E+01i];
Z(80,:,:) = [ 1.336248E+00 - 7.087660E+01i, 2.646099E-01 - 1.152979E+01i; 2.646099E-01 - 1.152979E+01i, 1.335851E+00 - 7.099711E+01i];
Z(81,:,:) = [ 1.322289E+00 - 6.983559E+01i, 2.594528E-01 - 1.150107E+01i; 2.594528E-01 - 1.150107E+01i, 1.321565E+00 - 6.995747E+01i];
Z(82,:,:) = [ 1.309118E+00 - 6.881615E+01i, 2.540282E-01 - 1.147602E+01i; 2.540282E-01 - 1.147602E+01i, 1.308048E+00 - 6.893959E+01i];
Z(83,:,:) = [ 1.296746E+00 - 6.781706E+01i, 2.483109E-01 - 1.145488E+01i; 2.483109E-01 - 1.145488E+01i, 1.295309E+00 - 6.794226E+01i];
Z(84,:,:) = [ 1.285187E+00 - 6.683715E+01i, 2.422713E-01 - 1.143792E+01i; 2.422713E-01 - 1.143792E+01i, 1.283360E+00 - 6.696432E+01i];
Z(85,:,:) = [ 1.274463E+00 - 6.587525E+01i, 2.358751E-01 - 1.142542E+01i; 2.358751E-01 - 1.142542E+01i, 1.272219E+00 - 6.600462E+01i];
Z(86,:,:) = [ 1.264601E+00 - 6.493021E+01i, 2.290827E-01 - 1.141768E+01i; 2.290827E-01 - 1.141768E+01i, 1.261911E+00 - 6.506202E+01i];
Z(87,:,:) = [ 1.255638E+00 - 6.400088E+01i, 2.218475E-01 - 1.141504E+01i; 2.218475E-01 - 1.141504E+01i, 1.252468E+00 - 6.413540E+01i];
Z(88,:,:) = [ 1.247617E+00 - 6.308612E+01i, 2.141159E-01 - 1.141787E+01i; 2.141159E-01 - 1.141787E+01i, 1.243930E+00 - 6.322363E+01i];
Z(89,:,:) = [ 1.240592E+00 - 6.218478E+01i, 2.058253E-01 - 1.142658E+01i; 2.058253E-01 - 1.142658E+01i, 1.236345E+00 - 6.232560E+01i];
Z(90,:,:) = [ 1.234629E+00 - 6.129570E+01i, 1.969027E-01 - 1.144161E+01i; 1.969027E-01 - 1.144161E+01i, 1.229774E+00 - 6.144016E+01i];
Z(91,:,:) = [ 1.229807E+00 - 6.041767E+01i, 1.872629E-01 - 1.146347E+01i; 1.872629E-01 - 1.146347E+01i, 1.224287E+00 - 6.056614E+01i];
Z(92,:,:) = [ 1.226220E+00 - 5.954947E+01i, 1.768062E-01 - 1.149274E+01i; 1.768062E-01 - 1.149274E+01i, 1.219974E+00 - 5.970236E+01i];
Z(93,:,:) = [ 1.223982E+00 - 5.868981E+01i, 1.654149E-01 - 1.153004E+01i; 1.654149E-01 - 1.153004E+01i, 1.216938E+00 - 5.884756E+01i];
Z(94,:,:) = [ 1.223231E+00 - 5.783734E+01i, 1.529501E-01 - 1.157612E+01i; 1.529501E-01 - 1.157612E+01i, 1.215306E+00 - 5.800045E+01i];
Z(95,:,:) = [ 1.224131E+00 - 5.699064E+01i, 1.392472E-01 - 1.163179E+01i; 1.392472E-01 - 1.163179E+01i, 1.215230E+00 - 5.715965E+01i];
Z(96,:,:) = [ 1.226879E+00 - 5.614815E+01i, 1.241095E-01 - 1.169801E+01i; 1.241095E-01 - 1.169801E+01i, 1.216892E+00 - 5.632368E+01i];
Z(97,:,:) = [ 1.231716E+00 - 5.530823E+01i, 1.073010E-01 - 1.177587E+01i; 1.073010E-01 - 1.177587E+01i, 1.220515E+00 - 5.549094E+01i];
Z(98,:,:) = [ 1.238932E+00 - 5.446904E+01i, 8.853719E-02 - 1.186663E+01i; 8.853719E-02 - 1.186663E+01i, 1.226368E+00 - 5.465971E+01i];
Z(99,:,:) = [ 1.248883E+00 - 5.362856E+01i, 6.747194E-02 - 1.197177E+01i; 6.747194E-02 - 1.197177E+01i, 1.234781E+00 - 5.382804E+01i];
Z(100,:,:) = [ 1.262005E+00 - 5.278452E+01i, 4.368190E-02 - 1.209300E+01i; 4.368190E-02 - 1.209300E+01i, 1.246159E+00 - 5.299379E+01i];
Z(101,:,:) = [ 1.278838E+00 - 5.193437E+01i, 1.664482E-02 - 1.223235E+01i; 1.664482E-02 - 1.223235E+01i, 1.261002E+00 - 5.215453E+01i];
Z(102,:,:) = [ 1.300055E+00 - 5.107516E+01i, -1.428897E-02 - 1.239221E+01i; -1.428897E-02 - 1.239221E+01i, 1.279935E+00 - 5.130747E+01i];
Z(103,:,:) = [ 1.326502E+00 - 5.020347E+01i, -4.993523E-02 - 1.257547E+01i; -4.993523E-02 - 1.257547E+01i, 1.303744E+00 - 5.044940E+01i];
Z(104,:,:) = [ 1.359253E+00 - 4.931532E+01i, -9.132869E-02 - 1.278554E+01i; -9.132869E-02 - 1.278554E+01i, 1.333427E+00 - 4.957654E+01i];
Z(105,:,:) = [ 1.399685E+00 - 4.840595E+01i, -1.397966E-01 - 1.302663E+01i; -1.397966E-01 - 1.302663E+01i, 1.370264E+00 - 4.868443E+01i];
Z(106,:,:) = [ 1.449589E+00 - 4.746967E+01i, -1.970625E-01 - 1.330384E+01i; -1.970625E-01 - 1.330384E+01i, 1.415919E+00 - 4.776770E+01i];
Z(107,:,:) = [ 1.511322E+00 - 4.649951E+01i, -2.653951E-01 - 1.362348E+01i; -2.653951E-01 - 1.362348E+01i, 1.472584E+00 - 4.681982E+01i];
Z(108,:,:) = [ 1.588032E+00 - 4.548690E+01i, -3.478265E-01 - 1.399347E+01i; -3.478265E-01 - 1.399347E+01i, 1.543188E+00 - 4.583275E+01i];
Z(109,:,:) = [ 1.683999E+00 - 4.442112E+01i, -4.484778E-01 - 1.442380E+01i; -4.484778E-01 - 1.442380E+01i, 1.631712E+00 - 4.479641E+01i];
Z(110,:,:) = [ 1.805147E+00 - 4.328850E+01i, -5.730584E-01 - 1.492728E+01i; -5.730584E-01 - 1.492728E+01i, 1.743670E+00 - 4.369802E+01i];
Z(111,:,:) = [ 1.959864E+00 - 4.207141E+01i, -7.296498E-01 - 1.552059E+01i; -7.296498E-01 - 1.552059E+01i, 1.886869E+00 - 4.252104E+01i];
Z(112,:,:) = [ 2.160308E+00 - 4.074663E+01i, -9.299759E-01 - 1.622581E+01i; -9.299759E-01 - 1.622581E+01i, 2.072632E+00 - 4.124373E+01i];
Z(113,:,:) = [ 2.424621E+00 - 3.928302E+01i, -1.191532E+00 - 1.707266E+01i; -1.191532E+00 - 1.707266E+01i, 2.317856E+00 - 3.983695E+01i];
Z(114,:,:) = [ 2.780765E+00 - 3.763795E+01i, -1.541293E+00 - 1.810200E+01i; -1.541293E+00 - 1.810200E+01i, 2.648592E+00 - 3.826077E+01i];
Z(115,:,:) = [ 3.273523E+00 - 3.575173E+01i, -2.022476E+00 - 1.937117E+01i; -2.022476E+00 - 1.937117E+01i, 3.106581E+00 - 3.645934E+01i];
Z(116,:,:) = [ 3.977948E+00 - 3.353900E+01i, -2.707527E+00 - 2.096235E+01i; -2.707527E+00 - 2.096235E+01i, 3.761793E+00 - 3.435272E+01i];
Z(117,:,:) = [ 5.026765E+00 - 3.087549E+01i, -3.724590E+00 - 2.299535E+01i; -3.724590E+00 - 2.299535E+01i, 4.738015E+00 - 3.182459E+01i];
Z(118,:,:) = [ 6.670255E+00 - 2.757995E+01i, -5.315365E+00 - 2.564514E+01i; -5.315365E+00 - 2.564514E+01i, 6.268754E+00 - 2.870516E+01i];
Z(119,:,:) = [ 9.417248E+00 - 2.340180E+01i, -7.971363E+00 - 2.915399E+01i; -7.971363E+00 - 2.915399E+01i, 8.828934E+00 - 2.475943E+01i];
Z(120,:,:) = [ 1.439000E+01 - 1.809240E+01i, -1.277701E+01 - 3.376281E+01i; -1.277701E+01 - 3.376281E+01i, 1.346653E+01 - 1.975319E+01i];
Z(121,:,:) = [ 2.420377E+01 - 1.203399E+01i, -2.226036E+01 - 3.910406E+01i; -2.226036E+01 - 3.910406E+01i, 2.262531E+01 - 1.403907E+01i];
Z(122,:,:) = [ 4.401126E+01 - 9.949948E+00i, -4.140586E+01 - 4.061647E+01i; -4.140586E+01 - 4.061647E+01i, 4.112678E+01 - 1.202078E+01i];
Z(123,:,:) = [ 7.016784E+01 - 3.078573E+01i, -6.670740E+01 - 1.998493E+01i; -6.670740E+01 - 1.998493E+01i, 6.559823E+01 - 3.140279E+01i];
Z(124,:,:) = [ 6.292952E+01 - 6.950214E+01i, -5.974676E+01 + 1.795539E+01i; -5.974676E+01 + 1.795539E+01i, 5.890329E+01 - 6.754472E+01i];
Z(125,:,:) = [ 3.689806E+01 - 8.010535E+01i, -3.459658E+01 + 2.873796E+01i; -3.459658E+01 + 2.873796E+01i, 3.460484E+01 - 7.745551E+01i];
Z(126,:,:) = [ 2.131348E+01 - 7.611107E+01i, -1.952987E+01 + 2.540108E+01i; -1.952987E+01 + 2.540108E+01i, 2.004107E+01 - 7.371171E+01i];
Z(127,:,:) = [ 1.349942E+01 - 7.059013E+01i, -1.197118E+01 + 2.058105E+01i; -1.197118E+01 + 2.058105E+01i, 1.273389E+01 - 6.852820E+01i];
Z(128,:,:) = [ 9.332549E+00 - 6.596618E+01i, -7.937194E+00 + 1.662471E+01i; -7.937194E+00 + 1.662471E+01i, 8.835522E+00 - 6.417599E+01i];
Z(129,:,:) = [ 6.911821E+00 - 6.231619E+01i, -5.590424E+00 + 1.360890E+01i; -5.590424E+00 + 1.360890E+01i, 6.570190E+00 - 6.073009E+01i];
Z(130,:,:) = [ 5.397894E+00 - 5.941002E+01i, -4.119256E+00 + 1.131280E+01i; -4.119256E+00 + 1.131280E+01i, 5.153447E+00 - 5.797682E+01i];
Z(131,:,:) = [ 4.393569E+00 - 5.704250E+01i, -3.139399E+00 + 9.539443E+00i; -3.139399E+00 + 9.539443E+00i, 4.213923E+00 - 5.572507E+01i];
Z(132,:,:) = [ 3.695480E+00 - 5.506599E+01i, -2.453916E+00 + 8.147392E+00i; -2.453916E+00 + 8.147392E+00i, 3.561431E+00 - 5.383711E+01i];
Z(133,:,:) = [ 3.191966E+00 - 5.337793E+01i, -1.954489E+00 + 7.038886E+00i; -1.954489E+00 + 7.038886E+00i, 3.091534E+00 - 5.221715E+01i];
Z(134,:,:) = [ 2.818003E+00 - 5.190666E+01i, -1.577839E+00 + 6.146145E+00i; -1.577839E+00 + 6.146145E+00i, 2.743426E+00 - 5.079819E+01i];
Z(135,:,:) = [ 2.533836E+00 - 5.060115E+01i, -1.285039E+00 + 5.421516E+00i; -1.285039E+00 + 5.421516E+00i, 2.479950E+00 - 4.953238E+01i];
Z(136,:,:) = [ 2.314169E+00 - 4.942419E+01i, -1.051045E+00 + 4.830962E+00i; -1.051045E+00 + 4.830962E+00i, 2.277502E+00 - 4.838476E+01i];
Z(137,:,:) = [ 2.142392E+00 - 4.834796E+01i, -8.590772E-01 + 4.349851E+00i; -8.590772E-01 + 4.349851E+00i, 2.120624E+00 - 4.732907E+01i];
Z(138,:,:) = [ 2.007342E+00 - 4.735113E+01i, -6.974428E-01 + 3.960202E+00i; -6.974428E-01 + 3.960202E+00i, 1.998986E+00 - 4.634504E+01i];
Z(139,:,:) = [ 1.901422E+00 - 4.641686E+01i, -5.576611E-01 + 3.648886E+00i; -5.576611E-01 + 3.648886E+00i, 1.905633E+00 - 4.541653E+01i];
Z(140,:,:) = [ 1.819477E+00 - 4.553145E+01i, -4.332935E-01 + 3.406432E+00i; -4.332935E-01 + 3.406432E+00i, 1.835946E+00 - 4.453022E+01i];
Z(141,:,:) = [ 1.758120E+00 - 4.468332E+01i, -3.191747E-01 + 3.226250E+00i; -3.191747E-01 + 3.226250E+00i, 1.787021E+00 - 4.367469E+01i];
Z(142,:,:) = [ 1.715339E+00 - 4.386230E+01i, -2.108670E-01 + 3.104142E+00i; -2.108670E-01 + 3.104142E+00i, 1.757333E+00 - 4.283965E+01i];
Z(143,:,:) = [ 1.690298E+00 - 4.305899E+01i, -1.042257E-01 + 3.038034E+00i; -1.042257E-01 + 3.038034E+00i, 1.746583E+00 - 4.201537E+01i];
Z(144,:,:) = [ 1.683306E+00 - 4.226422E+01i, 5.002266E-03 + 3.027892E+00i; 5.002266E-03 + 3.027892E+00i, 1.755714E+00 - 4.119206E+01i];
Z(145,:,:) = [ 1.695935E+00 - 4.146853E+01i, 1.216224E-01 + 3.075812E+00i; 1.216224E-01 + 3.075812E+00i, 1.787113E+00 - 4.035934E+01i];
Z(146,:,:) = [ 1.731347E+00 - 4.066152E+01i, 2.515683E-01 + 3.186310E+00i; 2.515683E-01 + 3.186310E+00i, 1.845033E+00 - 3.950549E+01i];
Z(147,:,:) = [ 1.794914E+00 - 3.983114E+01i, 4.027458E-01 + 3.366860E+00i; 4.027458E-01 + 3.366860E+00i, 1.936390E+00 - 3.861662E+01i];
Z(148,:,:) = [ 1.895338E+00 - 3.896270E+01i, 5.863847E-01 + 3.628757E+00i; 5.863847E-01 + 3.628757E+00i, 2.072143E+00 - 3.767547E+01i];
Z(149,:,:) = [ 2.046657E+00 - 3.803746E+01i, 8.193456E-01 + 3.988448E+00i; 8.193456E-01 + 3.988448E+00i, 2.269785E+00 - 3.665981E+01i];
Z(150,:,:) = [ 2.271958E+00 - 3.703077E+01i, 1.128285E+00 + 4.469486E+00i; 1.128285E+00 + 4.469486E+00i, 2.557905E+00 - 3.554012E+01i];
Z(151,:,:) = [ 2.610522E+00 - 3.590950E+01i, 1.557593E+00 + 5.105185E+00i; 1.557593E+00 + 5.105185E+00i, 2.984962E+00 - 3.427653E+01i];
Z(152,:,:) = [ 3.132288E+00 - 3.462947E+01i, 2.185367E+00 + 5.941369E+00i; 2.185367E+00 + 5.941369E+00i, 3.637024E+00 - 3.281580E+01i];
Z(153,:,:) = [ 3.968668E+00 - 3.313616E+01i, 3.157385E+00 + 7.035411E+00i; 3.157385E+00 + 7.035411E+00i, 4.675496E+00 - 3.109241E+01i];
Z(154,:,:) = [ 5.380686E+00 - 3.138542E+01i, 4.762201E+00 + 8.433444E+00i; 4.762201E+00 + 8.433444E+00i, 6.420440E+00 - 2.905431E+01i];
Z(155,:,:) = [ 7.904028E+00 - 2.945838E+01i, 7.591536E+00 + 1.004383E+01i; 7.591536E+00 + 1.004383E+01i, 9.527587E+00 - 2.680460E+01i];
Z(156,:,:) = [ 1.253681E+01 - 2.807928E+01i, 1.274946E+01 + 1.106439E+01i; 1.274946E+01 + 1.106439E+01i, 1.521533E+01 - 2.523733E+01i];
Z(157,:,:) = [ 1.984721E+01 - 3.021840E+01i, 2.086353E+01 + 8.204704E+00i; 2.086353E+01 + 8.204704E+00i, 2.416035E+01 - 2.799664E+01i];
Z(158,:,:) = [ 2.427785E+01 - 3.974995E+01i, 2.577278E+01 - 2.817414E+00i; 2.577278E+01 - 2.817414E+00i, 2.952550E+01 - 3.979250E+01i];
Z(159,:,:) = [ 1.903373E+01 - 4.847270E+01i, 1.997263E+01 - 1.290705E+01i; 1.997263E+01 - 1.290705E+01i, 2.304112E+01 - 5.052796E+01i];
Z(160,:,:) = [ 1.212226E+01 - 5.006298E+01i, 1.234304E+01 - 1.508515E+01i; 1.234304E+01 - 1.508515E+01i, 1.456311E+01 - 5.251043E+01i];
Z(161,:,:) = [ 7.841034E+00 - 4.874681E+01i, 7.629738E+00 - 1.404082E+01i; 7.629738E+00 - 1.404082E+01i, 9.327687E+00 - 5.094804E+01i];
Z(162,:,:) = [ 5.450281E+00 - 4.701788E+01i, 5.007998E+00 - 1.253257E+01i; 5.007998E+00 - 1.253257E+01i, 6.411170E+00 - 4.889108E+01i];
Z(163,:,:) = [ 4.060880E+00 - 4.546486E+01i, 3.492712E+00 - 1.121036E+01i; 3.492712E+00 - 1.121036E+01i, 4.720167E+00 - 4.705472E+01i];
Z(164,:,:) = [ 3.201072E+00 - 4.415525E+01i, 2.561828E+00 - 1.014852E+01i; 2.561828E+00 - 1.014852E+01i, 3.676240E+00 - 4.551854E+01i];
Z(165,:,:) = [ 2.636863E+00 - 4.305275E+01i, 1.956589E+00 - 9.307009E+00i; 1.956589E+00 - 9.307009E+00i, 2.992968E+00 - 4.423655E+01i];
Z(166,:,:) = [ 2.247716E+00 - 4.211151E+01i, 1.543780E+00 - 8.635383E+00i; 1.543780E+00 - 8.635383E+00i, 2.522991E+00 - 4.315185E+01i];
Z(167,:,:) = [ 1.967941E+00 - 4.129398E+01i, 1.250850E+00 - 8.092465E+00i; 1.250850E+00 - 8.092465E+00i, 2.186087E+00 - 4.221804E+01i];
Z(168,:,:) = [ 1.759712E+00 - 4.057200E+01i, 1.036058E+00 - 7.647510E+00i; 1.036058E+00 - 7.647510E+00i, 1.936111E+00 - 4.140046E+01i];
Z(169,:,:) = [ 1.600156E+00 - 3.992491E+01i, 8.741885E-01 - 7.278010E+00i; 8.741885E-01 - 7.278010E+00i, 1.745183E+00 - 4.067369E+01i];
Z(170,:,:) = [ 1.474837E+00 - 3.933742E+01i, 7.493469E-01 - 6.967443E+00i; 7.493469E-01 - 6.967443E+00i, 1.595725E+00 - 4.001899E+01i];
Z(171,:,:) = [ 1.374304E+00 - 3.879816E+01i, 6.511424E-01 - 6.703556E+00i; 6.511424E-01 - 6.703556E+00i, 1.476238E+00 - 3.942238E+01i];
Z(172,:,:) = [ 1.292164E+00 - 3.829848E+01i, 5.725623E-01 - 6.477134E+00i; 5.725623E-01 - 6.477134E+00i, 1.378954E+00 - 3.887331E+01i];
Z(173,:,:) = [ 1.223977E+00 - 3.783177E+01i, 5.087416E-01 - 6.281155E+00i; 5.087416E-01 - 6.281155E+00i, 1.298479E+00 - 3.836368E+01i];
Z(174,:,:) = [ 1.166577E+00 - 3.739286E+01i, 4.562230E-01 - 6.110194E+00i; 4.562230E-01 - 6.110194E+00i, 1.230974E+00 - 3.788717E+01i];
Z(175,:,:) = [ 1.117661E+00 - 3.697764E+01i, 4.124964E-01 - 5.960004E+00i; 4.124964E-01 - 5.960004E+00i, 1.173646E+00 - 3.743881E+01i];
Z(176,:,:) = [ 1.075520E+00 - 3.658286E+01i, 3.757050E-01 - 5.827226E+00i; 3.757050E-01 - 5.827226E+00i, 1.124428E+00 - 3.701462E+01i];
Z(177,:,:) = [ 1.038865E+00 - 3.620585E+01i, 3.444517E-01 - 5.709170E+00i; 3.444517E-01 - 5.709170E+00i, 1.081758E+00 - 3.661137E+01i];
Z(178,:,:) = [ 1.006709E+00 - 3.584444E+01i, 3.176694E-01 - 5.603662E+00i; 3.176694E-01 - 5.603662E+00i, 1.044445E+00 - 3.622642E+01i];
Z(179,:,:) = [ 9.782848E-01 - 3.549682E+01i, 2.945317E-01 - 5.508930E+00i; 2.945317E-01 - 5.508930E+00i, 1.011561E+00 - 3.585761E+01i];
Z(180,:,:) = [ 9.529898E-01 - 3.516149E+01i, 2.743907E-01 - 5.423513E+00i; 2.743907E-01 - 5.423513E+00i, 9.823796E-01 - 3.550309E+01i];
Z(181,:,:) = [ 9.303450E-01 - 3.483716E+01i, 2.567326E-01 - 5.346206E+00i; 2.567326E-01 - 5.346206E+00i, 9.563226E-01 - 3.516136E+01i];
Z(182,:,:) = [ 9.099662E-01 - 3.452276E+01i, 2.411453E-01 - 5.275998E+00i; 2.411453E-01 - 5.275998E+00i, 9.329270E-01 - 3.483110E+01i];
Z(183,:,:) = [ 8.915424E-01 - 3.421735E+01i, 2.272955E-01 - 5.212042E+00i; 2.272955E-01 - 5.212042E+00i, 9.118176E-01 - 3.451120E+01i];
Z(184,:,:) = [ 8.748196E-01 - 3.392012E+01i, 2.149108E-01 - 5.153624E+00i; 2.149108E-01 - 5.153624E+00i, 8.926885E-01 - 3.420070E+01i];
Z(185,:,:) = [ 8.595898E-01 - 3.363037E+01i, 2.037666E-01 - 5.100135E+00i; 2.037666E-01 - 5.100135E+00i, 8.752884E-01 - 3.389877E+01i];
Z(186,:,:) = [ 8.456806E-01 - 3.334749E+01i, 1.936765E-01 - 5.051057E+00i; 1.936765E-01 - 5.051057E+00i, 8.594094E-01 - 3.360468E+01i];
Z(187,:,:) = [ 8.329496E-01 - 3.307093E+01i, 1.844839E-01 - 5.005945E+00i; 1.844839E-01 - 5.005945E+00i, 8.448787E-01 - 3.331778E+01i];
Z(188,:,:) = [ 8.212778E-01 - 3.280020E+01i, 1.760569E-01 - 4.964416E+00i; 1.760569E-01 - 4.964416E+00i, 8.315520E-01 - 3.303751E+01i];
Z(189,:,:) = [ 8.105661E-01 - 3.253488E+01i, 1.682829E-01 - 4.926141E+00i; 1.682829E-01 - 4.926141E+00i, 8.193086E-01 - 3.276337E+01i];
Z(190,:,:) = [ 8.007319E-01 - 3.227456E+01i, 1.610655E-01 - 4.890832E+00i; 1.610655E-01 - 4.890832E+00i, 8.080469E-01 - 3.249490E+01i];
Z(191,:,:) = [ 7.917064E-01 - 3.201891E+01i, 1.543211E-01 - 4.858240E+00i; 1.543211E-01 - 4.858240E+00i, 7.976816E-01 - 3.223169E+01i];
Z(192,:,:) = [ 7.834322E-01 - 3.176760E+01i, 1.479768E-01 - 4.828150E+00i; 1.479768E-01 - 4.828150E+00i, 7.881410E-01 - 3.197338E+01i];
Z(193,:,:) = [ 7.758624E-01 - 3.152033E+01i, 1.419684E-01 - 4.800372E+00i; 1.419684E-01 - 4.800372E+00i, 7.793652E-01 - 3.171964E+01i];
Z(194,:,:) = [ 7.689585E-01 - 3.127683E+01i, 1.362387E-01 - 4.774740E+00i; 1.362387E-01 - 4.774740E+00i, 7.713041E-01 - 3.147014E+01i];
Z(195,:,:) = [ 7.626899E-01 - 3.103686E+01i, 1.307365E-01 - 4.751110E+00i; 1.307365E-01 - 4.751110E+00i, 7.639162E-01 - 3.122462E+01i];
Z(196,:,:) = [ 7.570330E-01 - 3.080018E+01i, 1.254154E-01 - 4.729355E+00i; 1.254154E-01 - 4.729355E+00i, 7.571677E-01 - 3.098282E+01i];
Z(197,:,:) = [ 7.519701E-01 - 3.056657E+01i, 1.202327E-01 - 4.709364E+00i; 1.202327E-01 - 4.709364E+00i, 7.510318E-01 - 3.074448E+01i];
Z(198,:,:) = [ 7.474895E-01 - 3.033583E+01i, 1.151489E-01 - 4.691041E+00i; 1.151489E-01 - 4.691041E+00i, 7.454875E-01 - 3.050939E+01i];
Z(199,:,:) = [ 7.435850E-01 - 3.010776E+01i, 1.101268E-01 - 4.674300E+00i; 1.101268E-01 - 4.674300E+00i, 7.405194E-01 - 3.027734E+01i];
Z(200,:,:) = [ 7.402554E-01 - 2.988218E+01i, 1.051311E-01 - 4.659067E+00i; 1.051311E-01 - 4.659067E+00i, 7.361176E-01 - 3.004812E+01i];
Gamma(1,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(2,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(3,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(4,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(5,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(6,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(7,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(8,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(9,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(10,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(11,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(12,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(13,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(14,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(15,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(16,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(17,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(18,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(19,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(20,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(21,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(22,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(23,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(24,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(25,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(26,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(27,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(28,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(29,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(30,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(31,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(32,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(33,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(34,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(35,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(36,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(37,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(38,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(39,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(40,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(41,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(42,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(43,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(44,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(45,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(46,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(47,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(48,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(49,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(50,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(51,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(52,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(53,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(54,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(55,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(56,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(57,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(58,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(59,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(60,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(61,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(62,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(63,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(64,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(65,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(66,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(67,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(68,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(69,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(70,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(71,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(72,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(73,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(74,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(75,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(76,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(77,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(78,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(79,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(80,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(81,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(82,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(83,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(84,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(85,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(86,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(87,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(88,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(89,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(90,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(91,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(92,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(93,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(94,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(95,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(96,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(97,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(98,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(99,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(100,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(101,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(102,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(103,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(104,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(105,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(106,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(107,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(108,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(109,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(110,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(111,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(112,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(113,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(114,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(115,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(116,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(117,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(118,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(119,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(120,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(121,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(122,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(123,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(124,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(125,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(126,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(127,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(128,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(129,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(130,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(131,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(132,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(133,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(134,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(135,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(136,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(137,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(138,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(139,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(140,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(141,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(142,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(143,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(144,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(145,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(146,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(147,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(148,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(149,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(150,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(151,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(152,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(153,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(154,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(155,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(156,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(157,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(158,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(159,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(160,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(161,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(162,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(163,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(164,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(165,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(166,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(167,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(168,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(169,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(170,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(171,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(172,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(173,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(174,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(175,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(176,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(177,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(178,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(179,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(180,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(181,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(182,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(183,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(184,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(185,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(186,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(187,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(188,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(189,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(190,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(191,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(192,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(193,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(194,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(195,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(196,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(197,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(198,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(199,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Gamma(200,:,:) = [ 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i ];
Zo(1,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(2,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(3,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(4,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(5,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(6,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(7,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(8,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(9,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(10,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(11,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(12,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(13,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(14,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(15,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(16,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(17,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(18,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(19,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(20,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(21,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(22,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(23,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(24,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(25,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(26,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(27,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(28,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(29,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(30,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(31,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(32,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(33,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(34,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(35,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(36,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(37,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(38,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(39,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(40,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(41,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(42,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(43,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(44,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(45,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(46,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(47,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(48,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(49,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(50,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(51,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(52,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(53,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(54,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(55,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(56,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(57,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(58,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(59,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(60,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(61,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(62,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(63,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(64,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(65,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(66,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(67,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(68,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(69,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(70,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(71,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(72,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(73,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(74,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(75,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(76,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(77,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(78,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(79,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(80,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(81,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(82,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(83,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(84,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(85,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(86,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(87,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(88,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(89,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(90,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(91,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(92,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(93,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(94,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(95,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(96,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(97,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(98,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(99,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(100,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(101,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(102,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(103,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(104,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(105,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(106,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(107,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(108,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(109,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(110,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(111,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(112,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(113,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(114,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(115,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(116,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(117,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(118,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(119,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(120,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(121,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(122,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(123,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(124,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(125,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(126,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(127,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(128,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(129,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(130,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(131,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(132,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(133,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(134,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(135,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(136,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(137,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(138,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(139,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(140,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(141,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(142,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(143,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(144,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(145,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(146,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(147,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(148,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(149,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(150,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(151,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(152,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(153,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(154,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(155,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(156,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(157,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(158,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(159,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(160,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(161,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(162,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(163,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(164,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(165,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(166,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(167,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(168,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(169,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(170,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(171,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(172,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(173,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(174,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(175,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(176,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(177,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(178,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(179,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(180,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(181,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(182,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(183,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(184,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(185,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(186,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(187,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(188,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(189,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(190,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(191,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(192,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(193,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(194,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(195,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(196,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(197,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(198,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(199,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
Zo(200,:,:) = [ 5.000000E+01 + 0.000000E+00i, 0.000000E+00 + 0.000000E+00i; 0.000000E+00 + 0.000000E+00i, 5.000000E+01 + 0.000000E+00i ];
散射参量S、阻抗参量Z及导纳参量Y之间的关系
1. 散射参量S到阻抗参量的转换
Z = U I = U + + U − I + + I − = U + U + + U − U + I + U + + I − U + = Z 0 E + S E − S = Z 0 ( E + S ) ( E − S ) − 1 \begin{align} Z &=\frac{U}{I} \\ &=\frac{U^++U^-}{I^++I^-}\\ &=\frac{\frac{U^+}{U^+}+\frac{U^-}{U^+}}{\frac{I^+}{U^+}+\frac{I^-}{U^+}}\\ &=Z_0\frac{E+S}{E-S}\\ &=Z_0(E+S)(E-S)^{-1} \end{align} Z=IU=I++I−U++U−=U+I++U+I−U+U++U+U−=Z0E−SE+S=Z0(E+S)(E−S)−1
2. 阻抗参量与导纳参量是逆矩阵关系
Y = Z − 1 \begin{align} \bm Y=\bm Z^{-1} \end{align} Y=Z−1
通过MATLAB验证S与Z, Z与Y之间的关系
>> Z100 = [Z(100,:,1);Z(100,:,2)]Z100 =1.2620 -52.7845i 0.0437 -12.0930i0.0437 -12.0930i 1.2462 -52.9938i>> Y100 = [Y(100,:,1);Y(100,:,2)]Y100 =0.0005 + 0.0200i -0.0002 - 0.0046i-0.0002 - 0.0046i 0.0005 + 0.0199i>> S100 = [S(100,:,1);S(100,:,2)]S100 =0.0266 - 0.9497i 0.2231 + 0.0018i0.2231 + 0.0018i 0.0304 - 0.9500i>> Z100^-1-Y100ans =1.0e-08 *0.0090 - 0.1266i -0.0039 - 0.1629i-0.0039 - 0.1629i 0.0057 + 0.2981i>> 50*(eye(2,2)+S100)*(eye(2,2)-S100)^-1-Z100ans =1.0e-05 *0.0505 - 0.3132i 0.0193 - 0.0303i0.0193 - 0.0303i 0.1133 - 0.2976i>>
由运行结果可知， Y − Z − 1 \bm Y-\bm Z^{-1} Y−Z−1近似等于0矩阵， 50 ∗ ( E + S ) ( E − S ) − 1 50*(E+S)(E-S)^{-1} 50∗(E+S)(E−S)−1近似等于0矩阵，验证了公式（5）和公式（6）的正确性。
