IndexOfAl.m

function [lam, nAl] = IndexOfAl
% [lam, nAl] = IndexOfAl
%
% from http://refractiveindex.info/tmp/main/Al/Rakic.csv
% wl,n,k

U = CConstants;

A = [
0.2066,0.122846741,2.287852499
0.210895083,0.127663239,2.343802006
0.215279458,0.132638076,2.400694912
0.219754982,0.137780447,2.458564662
0.224323549,0.143101094,2.517444987
0.228987094,0.148612342,2.577369802
0.23374759,0.15432813,2.638373114
0.238607055,0.160264034,2.700488929
0.243567544,0.16643729,2.763751165
0.248631159,0.172866814,2.828193563
0.253800044,0.179573224,2.893849609
0.259076386,0.186578868,2.960752446
0.26446242,0.193907856,3.028934791
0.269960426,0.201586093,3.098428846
0.275572732,0.209641336,3.169266193
0.281301715,0.218103237,3.241477688
0.2871498,0.22700341,3.31509333
0.293119462,0.236375499,3.390142115
0.29921323,0.246255243,3.466651856
0.305433684,0.256680548,3.544648979
0.311783457,0.267691555,3.624158282
0.318265237,0.279330687,3.705202642
0.32488177,0.291642683,3.787802684
0.331635856,0.304674596,3.871976395
0.338530356,0.318475743,3.957738675
0.345568188,0.333097591,4.045100838
0.352752332,0.348593556,4.134070053
0.360085829,0.365018681,4.224648732
0.367571786,0.382429183,4.316833892
0.37521337,0.400881806,4.410616489
0.383013819,0.420432981,4.505980791
0.390976433,0.441137724,4.602903816
0.399104586,0.463048279,4.701354915
0.407401718,0.486212467,4.801295587
0.415871341,0.51067177,4.902679633
0.424517043,0.536459165,5.005453778
0.433342484,0.563596803,5.109558891
0.4423514,0.592093644,5.214931939
0.451547605,0.62194323,5.321508811
0.460934994,0.653121813,5.429228102
0.470517541,0.685587146,5.538035914
0.480299302,0.719278241,5.647891685
0.490284421,0.754116468,5.758774969
0.500477123,0.790008397,5.870693043
0.510881726,0.826850779,5.983689124
0.521502634,0.864538125,6.09785093
0.532344343,0.902973344,6.213319256
0.543411445,0.942082057,6.33029617
0.554708625,0.981831304,6.449052356
0.566240666,1.022253737,6.569932967
0.578012451,1.063478817,6.693361057
0.590028964,1.105773347,6.819837024
0.602295292,1.149594701,6.949931286
0.61481663,1.195661642,7.084264998
0.627598279,1.245049224,7.223469076
0.640645649,1.299315349,7.36810319
0.653964267,1.360664218,7.518500731
0.66755977,1.432138653,7.67447901
0.681437915,1.517790278,7.834814986
0.695604578,1.622666192,7.996354105
0.710065756,1.752227133,8.152676478
0.724827574,1.91052144,8.292597883
0.73989628,2.096478917,8.39965903
0.755278255,2.298903888,8.454776754
0.770980012,2.493347143,8.443684434
0.787008198,2.645617435,8.367043414
0.8033696,2.723491279,8.246450066
0.820071146,2.711037058,8.119920696
0.837119906,2.615965643,8.027720599
0.854523099,2.464780829,7.99728212
0.872288093,2.289721644,8.036555493
0.89042241,2.116797937,8.137837134
0.908933728,1.961008257,8.286476761
0.927829885,1.827896278,8.467966442
0.947118881,1.717352766,8.671111225
0.966808882,1.626804727,8.888371717
0.986908227,1.55306619,9.115070964
1.007425424,1.493167941,9.348463259
1.028369161,1.444627315,9.587009605
1.049748305,1.405468774,9.829893881
1.071571907,1.374155653,10.07672224
1.093849209,1.349503292,10.32734302
1.116589641,1.330599689,10.58174086
1.139802833,1.316740857,10.8399752
1.163498612,1.30738074,11.10214486
1.187687011,1.302093356,11.36836787
1.212378272,1.300544486,11.63877031
1.237582849,1.302470563,11.91348017
1.263311413,1.30766294,12.1926243
1.289574857,1.315956113,12.47632702
1.316384302,1.327218867,12.76470962
1.343751098,1.341347584,13.05789048
1.371686833,1.358261146,13.35598526
1.400203333,1.377897027,13.65910735
1.429312674,1.400208275,13.96736821
1.45902718,1.425161167,14.28087779
1.489359431,1.452733355,14.59974483
1.520322271,1.482912411,14.92407714
1.551928808,1.515694651,15.2539818
1.584192425,1.551084195,15.58956535
1.617126783,1.589092192,15.93093394
1.650745825,1.629736182,16.27819335
1.685063785,1.673039567,16.63144911
1.720095194,1.719031154,16.99080652
1.755854884,1.767744771,17.3563706
1.792357996,1.819218933,17.72824614
1.829619984,1.873496538,18.10653765
1.867656625,1.930624604,18.4913493
1.906484023,1.990654023,18.88278488
1.946118619,2.053639337,19.28094774
1.986577193,2.119638528,19.68594069
2.027876875,2.188712809,20.09786598
2.070035151,2.260926433,20.51682519
2.113069871,2.336346497,20.94291914
2.156999256,2.41504275,21.37624782
2.201841905,2.497087399,21.81691034
2.247616804,2.582554916,22.2650048
2.294343334,2.671521832,22.72062824
2.342041279,2.764066531,23.18387656
2.390730835,2.860269039,23.65484448
2.440432615,2.960210796,24.13362543
2.491167664,3.063974424,24.62031155
2.542957462,3.171643486,25.1149936
2.595823938,3.28330223,25.61776098
2.649789474,3.399035321,26.12870166
2.70487692,3.518927568,26.64790222
2.761109598,3.643063627,27.17544786
2.818511318,3.771527703,27.71142243
2.877106384,3.904403237,28.25590848
2.936919604,4.041772575,28.80898738
2.997976303,4.183716642,29.37073939
3.060302332,4.33031459,29.94124384
3.12392408,4.48164345,30.52057931
3.188868484,4.637777778,31.10882383
3.255163041,4.798789294,31.70605512
3.322835819,4.964746527,32.31235095
3.391915472,5.135714459,32.92778941
3.462431247,5.311754182,33.55244938
3.534413001,5.492922566,34.18641091
3.607891209,5.679271947,34.82975576
3.682896983,5.870849837,35.48256794
3.759462079,6.067698667,36.14493431
3.837618916,6.269855569,36.81694527
3.917400583,6.477352203,37.49869547
3.998840861,6.690214636,38.19028457
4.08197423,6.90846329,38.89181812
4.16683589,7.132112955,39.6034084
4.25346177,7.36117289,40.32517536
4.341888547,7.595647005,41.0572476
4.432153661,7.835534158,41.79976337
4.524295329,8.08082854,42.55287158
4.618352565,8.331520197,43.31673287
4.71436519,8.587595661,44.09152061
4.812373858,8.849038716,44.877422
4.912420063,9.115831304,45.67463899
5.014546166,9.387954561,46.48338931
5.118795406,9.665389996,47.30390732
5.225211921,9.948120811,48.1364449
5.333840769,10.23613335,48.9812721
5.444727941,10.52941867,49.83867781
5.557920388,10.82797428,50.70897018
5.673466033,11.13180587,51.592477
5.7914138,11.44092929,52.4895458
5.911813626,11.75537248,53.40054382
6.034716488,12.07517751,54.3258578
6.160174423,12.40040264,55.26589347
6.288240549,12.73112437,56.22107493
6.418969089,13.06743952,57.19184373
6.552415392,13.4094672,58.17865772
6.688635959,13.75735076,59.18198974
6.827688466,14.11125961,60.20232601
6.969631786,14.47139089,61.24016436
7.114526018,14.83797107,62.29601226
7.262432509,15.21125724,63.37038465
7.413413883,15.59153835,64.46380166
7.567534063,15.9791361,65.57678612
7.724858305,16.37440568,66.709861
7.885453218,16.77773621,67.86354682
8.049386798,17.189551,69.03835893
8.216728453,17.61030748,70.23480477
8.387549035,18.04049689,71.4533812
8.561920869,18.48064377,72.69457179
8.739917783,18.93130515,73.95884422
8.92161514,19.39306952,75.24664775
9.107089869,19.86655559,76.55841077
9.296420502,20.35241085,77.89453853
9.489687198,20.85130994,79.25541095
9.686971786,21.36395281,80.64138069
9.888357796,21.89106287,82.05277128
10.09393049,22.43338482,83.4898755
10.30377692,22.99168257,84.95295395
10.51798592,23.56673694,86.44223373
10.73664818,24.15934335,87.95790747
10.9598563,24.77030949,89.50013235
11.18770477,25.40045293,91.06902946
11.42029007,26.05059874,92.66468328
11.65771067,26.72157707,94.28714131
11.9000671,27.41422083,95.93641391
12.14746196,28.1293633,97.6124743
12.4,28.86783587,99.31525862
];

lam = A(:,1)*U.UM;
nAl = A(:,2) - 1i*A(:,3);