This repository has been archived by the owner on Jul 30, 2018. It is now read-only.
-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathxrayfilter.html
executable file
·1486 lines (1404 loc) · 172 KB
/
xrayfilter.html
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
<!DOCTYPE HTML>
<html>
<head>
<meta charset="UTF-8"/>
<link rel="icon" type="image/png" href="data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAEAAAABAAgMAAADXB5lNAAAADFBMVEV0AJEaAPdEALz/AADZDi/HAAAAAXRSTlMAQObYZgAAATpJREFUOMulkzFOxDAQRcey0iGZAjccgYoWtGJ8hBSeJhyC09BTkAIqjpA9DP1QbBcpjI1izw7lunJeovd/xgnAxevagmSunX1guDLgxoLxYMG9cSY2TljOQfQGZAPcGIziH0i4b32Ni9B6hQqoAyzAZWi9Nq5OA2LyO/AVUGq9KnAEYQehggytVwVDhtYrlNg4qhoFUIJVA3H2GgcBA0GrAauAmC0Ye40KSAHPyE5C1HiQxXkOxNlr+AVZFD0kLPhjwUmcPVXAd3E2gIBzViGyeypgU+BxHlWq7O7mpEIETPN+en/ATe86xPMwvekQz3H60s6w0MTgO8AjPbN2YqQXVk5YiWSEvac/UUZWikCUkLErHkhOmbemcB9l3ltX3L7Ki+LWFPFzLMlbn2e9hWo4S/tO9Tpc8vP/AihehecLZnBQAAAAAElFTkSuQmCC" />
<style type="text/css">
<!--
html, body, #content td { margin:0; padding:0; height:100%; }
#content { position:absolute; top:0; bottom:0; border:0;
border-collapse:collapse; height:100%}
#content td { text-align:left; vertical-align:top; }
#bar { position:relative; float:left; width:92px; z-index:20;
height:100%; background:#eee; border-right:1px solid #999; }
.barnormal, .barhover, .barsmall { width:92px; padding:4px; cursor:pointer;
padding-right:8px; text-align:right; }
.barnormal { background:transparent; border:1px solid transparent;
border-left:0; border-right:0;}
.barnormal:hover, .barhover { background-color:#E9E0DB;
border:1px solid #C9A798; border-left:0; border-right:0;}
.barsmall { background:transparent; border:1px solid transparent;
width:25px; height:25px; margin:0 0 0 12px; float:left; padding:0;}
.barsmall > * { background:transparent; border:0; width:25px; height:25px; cursor:pointer}
.barsmall:hover { background-color:#E9E0DB; border:1px solid #C9A798; }
#bar > *, .drawer, .drawer * {font-size: 12px; font-family:sans-serif;}
.drawer { display:none; position:absolute; top:0; left:90px; }
.drawer > div { background:#E9E0DB; padding:15px; border:1px solid #C9A798;}
#xdrawer > div { margin-top:63px; }
#ydrawer > div { margin-top:88px; }
#ldrawer > div { margin-top:80px; }
#sdrawer > div { margin-top:80px; width:380px }
#hdrawer > div { width:340px }
#cdrawer { overflow:auto; }
#cdrawer a { cursor:pointer; padding-left:20px; color:#2244ee; }
#cdrawer > div { width:400px }
.drawer > div > div { padding:3px;}
.pushed, .poped, .pushed *, .poped * { cursor:pointer; }
.pushed input[type=button], .poped input[type=button]
{ float:left; font-size:1px; border:2px solid #fff; width:8px;
height:8px; padding:0; margin:2px 4px 4px 4px }
.pushed input { background-color: #f00; }
.poped input { background-color: #fff; }
.pushed:hover, .poped:hover { background-color: #F9F0EB; }
.drawer input[type=text] { border:0; text-align:center}
.drawer input[type=text]:enabled { background-color: #ddd; }
.drawer input[type=text]:disabled { background-color: transparent; }
#compt { border:0 }
#compt td { padding:2px; }
#bg { position:fixed; width:100%; height:100%; top:0; left:0;
background-color:rgba(1,1,1,0.5); z-index:30;}
#menu { position:fixed; top:50%; left:50%;
background-color:#eee; border:2px solid #888; padding:10px;
box-shadow:2px 2px 10px 0px rgba(1,1,1,0.4);
font-family:sans-serif; font-size:12px; z-index:40; }
#menu { width:340px; height:120px; margin-top:-100px; margin-left:-200px;}
#changename { position:absolute; border:1px solid #aaa; font:12px black;
top:5px; right:5px; background-color: #ddd;}
#colortable div { font-size:1px; border:0; position:absolute; }
.code {font-family:Monospace; width:100%; text-align:center; color:#559}
.store {font-family:Monospace; width:100%; text-align:left; color:#559; padding-left:10px}
-->
</style>
<script language="javascript">
<!--
var svgns="http://www.w3.org/2000/svg", chars="0123456789abcdefghijklmnopqurstuvwxyzABCDEFGHIJKLMNOPQURSTUVWXYZ";
// Add functions to SVG elements
SVGElement.prototype.svgLine = function(x1,y1,x2,y2,stroke,thickness,dash) {
var e=document.createElementNS(svgns,"line");
this.appendChild(e);
if(!dash) { dash="none"; }
e.setAttribute("x1",""+x1); e.setAttribute("y1",""+y1);
e.setAttribute("x2",""+x2); e.setAttribute("y2",""+y2);
e.setAttribute("style","stroke:"+stroke+"; stroke-width:"+thickness+"; stroke-dasharray:"+dash+";");
return e;
};
SVGElement.prototype.svgRect = function(x,y,w,h,fill,stroke,thickness) {
var e=document.createElementNS(svgns,"rect");
this.appendChild(e);
e.setAttribute("x",""+x); e.setAttribute("width",""+w);
e.setAttribute("y",""+y); e.setAttribute("height",""+h);
e.setAttribute("style","fill:"+fill+"; stroke:"+stroke+"; stroke-width:"+thickness+";");
return e;
};
SVGElement.prototype.svgCircle = function(cx,cy,r,fill,stroke,thickness) {
var e=document.createElementNS(svgns,"circle");
this.appendChild(e);
e.setAttribute("cx",""+cx); e.setAttribute("cy",""+cy); e.setAttribute("r",""+r);
e.setAttribute("fill",""+fill);
e.setAttribute("style","stroke:"+stroke+"; stroke-width:"+thickness+";");
return e;
};
SVGElement.prototype.svgTriangle = function(cx,cy,r,orientation,fill,stroke,thickness) {
var e=document.createElementNS(svgns,"polygon");
this.appendChild(e);
var p = "",a;
for(var i=0;i<3;i+=1) {
a = Math.PI*(120.*i+orientation)/180.;
p += (cx+Math.cos(a)*r) + "," + (cy+Math.sin(a)*r) + " ";
}
e.setAttribute("points",p);
e.setAttribute("fill",""+fill);
e.setAttribute("style","stroke:"+stroke+"; stroke-width:"+thickness+";");
return e;
};
SVGElement.prototype.svgPolyline = function(points,stroke,thickness,dash) {
var e=document.createElementNS(svgns,"polyline");
this.appendChild(e);
if(!dash) { dash="none"; }
e.setAttribute("points",points);
e.setAttribute("style","fill:none;stroke:"+stroke+"; stroke-width:"+thickness+"; stroke-dasharray:"+dash+";");
return e;
};
SVGElement.prototype.svgText = function(str,x,y,fontsize,color,align,rot) {
var t=document.createElementNS(svgns,"text");
this.appendChild(t);
t.setAttribute("x",x); t.setAttribute("y",y);
t.setAttribute("style","font-size:"+fontsize+"px; fill:"+color+";");
t.svgCustom(str,["tspan"]); // insert the text as a tspan
// Now get size and set alignment
// 'align' can contain 'N', 'S', 'W', 'E' positions, or 'M' and 'C' for centering
var tw=parseFloat(t.getBBox().width);
var th=parseFloat(t.getBBox().height)*0.72;
if (align==undefined) {align='SW';}
if (align.indexOf('E')>=0) { t.setAttribute("x",x-tw ); }
else if(align.indexOf('C')>=0) { t.setAttribute("x",x-tw/2); }
if (align.indexOf('N')>=0) { t.setAttribute("y",y+th ); }
else if(align.indexOf('M')>=0) { t.setAttribute("y",y+th/2); }
// Now rotate
if (rot==undefined) { rot=""; }
if (rot.length>0) { t.setAttribute("transform","rotate("+rot+","+x+","+y+")"); }
return t;
};
SVGElement.prototype.svgCustom = function(str,tag) {
// create custom element
var ts=document.createElementNS(svgns,tag[0]);
this.appendChild(ts);
for(var k=1;k<tag.length;k+=2){ ts.setAttribute(tag[k],tag[k+1]);}
// find tags inside and
var i,ii,iii,tagi,j,jj,tagj;
while(str.length>0) {
i=str.search(/<[^\/<][^<]+>/); ii=str.length; tagi=[""];
if(i<0) { i=str.length; }
else {
ii=str.indexOf('>',i+1);
iii=str.substring(i+1,ii); // inside tag
tagi=parseTag(iii);
}
j=str.indexOf('</'+tag[0]+'>'); tagj="";
if(j<0) { j=str.length; }
else {
jj=str.indexOf('>',j+2);
tagj=str.substring(j+2,jj); // inside tag
}
if(j<i && tagj==tag[0]) {
ts.appendChild(document.createTextNode(str.substring(0,j)));
return str.substring(jj+1);
}
ts.appendChild(document.createTextNode(str.substring(0,i)));
str=str.substr(ii+1);
if(str.length>0) { str=ts.svgCustom(str,tagi); }
}
return "";
};
function parseTag(intag) {
var list=new Array(),i,j;
i=intag.indexOf(' ');
list[0]=intag.substring(0,i); // tag name
intag=intag.substring(i).replace(/^\s*/,"");
j=1;
while(intag.length>0) {
i=intag.indexOf('=');
if(i<0) { break; }
list[j]=intag.substring(0,i); // option
j+=1;
intag=intag.substring(i+1).replace(/^\s*/,"");
if (intag[0]=='"') { i=intag.search(/[^\\]"/)+2; }
else if (intag[0]=="'") { i=intag.search(/[^\\]'/)+2; }
else { i=intag.indexOf(' '); }
if(i<0) { break; }
list[j]=intag.substring(0,i).replace(/^["']/,'').replace(/["']\s*$/,''); // value
j+=1;
intag=intag.substring(i+1).replace(/^\s*/,"");
}
return list;
}
// Make SVG object movable
// The "axis" argument can be 0 for moving in any direction, or 1 for
// moving east-west, or -1 for moving north-south.
var currentMoving="", savePosition=[];
SVGElement.prototype.makeMovable = function(axis,cursor) {
var g, b=this.getBBox(), id0, tr=this.getAttribute("transform");
if(this.id.length<1) { // if no ID, generate a random one
do { id0=""; for(var i=0;i<8;i++) {id0+=chars[Math.floor(Math.random()*65)];}
} while(document.getElementById(id0))
this.id=id0;
}
if(this.tagName=="g") { g=this; }
else { // if not group, then group it
g=document.createElementNS(svgns,"g");
g.setAttribute("id",this.id); this.id+="_old";
this.parentNode.appendChild(g); g.appendChild(this);
}
if(!savePosition[this.id]) { savePosition[this.id] = "translate(0,0)"; } // initialize position
g.setAttribute("transform",savePosition[this.id]);
g.style.cursor = cursor; g.axis = axis;
rect=g.svgRect(b.x,b.y,b.width,b.height,"transparent","transparent",0); // put a draggable transparent rectangle on top
if(tr) {rect.setAttribute("transform",tr);}
rect.onmousedown = function(evt) { // mouse down initiates dragging
evt.preventDefault(); // prevent the default svg dragging
var e = evt.target.parentNode, tr=e.getAttribute("transform").match(/[0-9.+-]+/g);
e.x0=parseFloat(tr[0]) || 0; e.y0=parseFloat(tr[1]) || 0;
e.cx0=evt.clientX; e.cy0=evt.clientY;
currentMoving=e.id;
};
};
function mouseMove(evt) {
if(currentMoving.length<1) return;
var e = document.getElementById(currentMoving);
var x = (e.axis>=0) ? evt.clientX-e.cx0+e.x0 : e.x0;
var y = (e.axis<=0) ? evt.clientY-e.cy0+e.y0 : e.y0;
e.setAttribute("transform","translate("+ x +","+ y +")");
}
function mouseUp(evt) {
if(currentMoving.length<1) return;
var e = document.getElementById(currentMoving);
var X = evt.clientX-e.cx0+e.x0, Y = evt.clientY-e.cy0+e.y0;
switch (currentMoving) {
case "ax1": y1 += Y; break;
case "ax2": y2 += Y; break;
case "ay1": x1 += X; break;
case "ay2": x2 += X; break;
case "legend": lx1+=X; ly1+=Y; break;
case "t1": t1x+=X; t1y+=Y; break;
case "t2": t2x+=X; t2y+=Y; break;
}
currentMoving="";
var b=im.getBoundingClientRect();
dBG.style.width=""+Math.round(Math.max(610,b.right-100))+"px";
dBG.style.height=""+Math.round(Math.max(200,b.bottom+20))+"px";
plot();
}
var atom=new Array(), A_=new Array(), dens=new Array();
var ene =new Array(), att =new Array();
atom[1]="Ac"; A_[1]=227; dens[1]=10.07; ene[1]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;8.314e-05;8.448e-05;8.585e-05;8.724e-05;8.865e-05;9.008e-05;9.154e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001039;0.00108;0.00108;0.001171;0.001269;0.001269;0.0015;0.002;0.003;0.003219;0.003219;0.003294;0.00337;0.00337;0.00363;0.003909;0.003909;0.004;0.004656;0.004656;0.005;0.005002;0.005002;0.006;0.008;0.01;0.015;0.01587;0.01587;0.0174;0.01908;0.01908;0.01946;0.01984;0.01984;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.1068;0.1068;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[1]="2.215e+04;1.362e+04;8667;9785;4.488e+04;8.395e+04;9.057e+04;6.821e+04;3.85e+04;1.859e+04;9124;5237;3816;4716;1.01e+04;1.631e+04;4.015e+04;6.127e+04;6.631e+04;6.9e+04;7.165e+04;7.23e+04;6.979e+04;4.032e+04;1.997e+04;8905;4057;2333;1892;2077;4908;9509;1.105e+04;1.072e+04;9483;7885;6686;6469;6034;5622;5702;4905;4203;4289;3082;1696;698.1;595.9;1537;1404;1307;1892;1564;1296;1504;1426;974.5;1034;868.7;867.8;905.1;582.9;287.8;165.3;60.02;52.13;121.4;104.2;74.26;103.6;107.9;94.03;108.2;106.2;38.11;18.23;10.27;6.433;3.1;1.786;1.525;5.622;2.434;1.213;0.4859;0.2749;0.1872;0.1421;0.09804;0.07686;0.06251;0.05504;0.04822;0.04409;0.04363;0.04438;0.0456;0.04856;0.05171;0.05895;0.06473";
atom[2]="Ag"; A_[2]=107.9; dens[2]=10.5; ene[2]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0003879;0.0003942;0.0004006;0.0004071;0.0004136;0.0004203;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.003351;0.003351;0.003436;0.003524;0.003524;0.003662;0.003806;0.003806;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.02551;0.02551;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[2]="4.625e+04;6.225e+04;8.56e+04;1.061e+05;1.15e+05;1.376e+05;1.376e+05;1.369e+05;1.364e+05;1.312e+05;1.251e+05;1.186e+05;1.097e+05;9.452e+04;6.936e+04;2.159e+04;6291;4503;6763;7553;7507;6790;5433;7068;7448;9135;1.102e+04;1.289e+04;1.464e+04;1.619e+04;1.917e+04;1.937e+04;1.682e+04;1.374e+04;1.016e+04;7108;7039;2790;1401;513.6;388.7;1274;1200;1126;1547;1409;1282;1468;1305;738.5;461;216.4;119.3;39.98;18.36;9.527;55.39;36.68;17.2;9.444;5.766;2.651;1.47;0.5426;0.2972;0.156;0.1131;0.09321;0.08153;0.06766;0.05921;0.05217;0.04754;0.04209;0.03754;0.03606;0.03577;0.03601;0.03723;0.03882;0.04276;0.04609";
atom[3]="Al"; A_[3]=26.98; dens[3]=2.7; ene[3]="1e-05;1.172e-05;1.374e-05;1.446e-05;1.47e-05;1.494e-05;1.518e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.26e-05;7.28e-05;7.879e-05;8.448e-05;8.585e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.00156;0.00156;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[3]="4.866e+05;3.506e+05;2.464e+05;1.955e+05;1.443e+05;9.419e+04;6.26e+04;2.889e+04;1.124e+04;8237;8814;9050;8929;8464;7402;5558;5333;5764;6.542e+04;7.95e+04;9.339e+04;9.681e+04;1.026e+05;1.121e+05;1.168e+05;1.011e+05;8.422e+04;6.057e+04;4.318e+04;3.085e+04;2.068e+04;1.411e+04;9766;6562;4332;2829;1839;1190;1185;402.2;362.1;3957;2263;788;360.5;193.4;115.3;50.33;26.23;7.955;3.441;1.128;0.5685;0.3681;0.2778;0.2018;0.1704;0.1378;0.1223;0.1042;0.09276;0.08445;0.07802;0.06841;0.06146;0.05496;0.05006;0.04324;0.03541;0.03106;0.02836;0.02655;0.02437;0.02318;0.02195;0.02168";
atom[4]="Ar"; A_[4]=39.95; dens[4]=1.78; ene[4]="1e-05;1.172e-05;1.374e-05;1.57e-05;1.59e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;3.61e-05;3.668e-05;3.788e-05;3.849e-05;3.911e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002483;0.0002485;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.003203;0.003203;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[4]="1e-10;1e-10;1e-10;1e-10;4.888e+05;4.954e+05;5.671e+05;5.546e+05;5.078e+05;3.987e+05;2.264e+05;2.144e+05;1.876e+05;1.438e+05;1.186e+05;9.538e+04;3.931e+04;1.359e+04;1.521e+04;1.998e+04;2.187e+04;2.084e+04;1.849e+04;1.518e+04;1.189e+04;9569;7059;5031;4635;7.473e+04;5.437e+04;4.288e+04;3.082e+04;2.179e+04;1.583e+04;1.102e+04;7549;5049;3349;3184;1105;512;170.3;142.4;1275;757.2;422.5;259.3;118;63.16;19.83;8.629;2.697;1.228;0.7012;0.4664;0.276;0.2043;0.1427;0.1205;0.09953;0.08776;0.07958;0.07335;0.06419;0.05762;0.0515;0.04695;0.04074;0.03384;0.03019;0.02802;0.02667;0.02517;0.02451;0.02418;0.02453";
atom[5]="As"; A_[5]=74.92; dens[5]=5.72; ene[5]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;9.452e-05;9.605e-05;9.761e-05;0.0001082;0.0001202;0.0001222;0.0001269;0.0001412;0.0001435;0.0001458;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.00115;0.001323;0.001323;0.001341;0.001359;0.001359;0.0015;0.001527;0.001527;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.01187;0.01187;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[5]="2.598e+05;2.473e+05;2.164e+05;1.824e+05;1.276e+05;7.515e+04;3.534e+04;1.578e+04;8142;1.709e+04;1.747e+04;2.312e+04;3.221e+04;3.872e+04;4.407e+04;4.471e+04;4.517e+04;4.563e+04;4.701e+04;4.809e+04;4.825e+04;4.835e+04;4.843e+04;4.844e+04;4.845e+04;4.821e+04;4.503e+04;4.111e+04;3.409e+04;2.728e+04;2.096e+04;1.609e+04;1.189e+04;8638;6172;4365;3054;2115;2121;1523;1092;4513;4469;4452;6093;5227;4997;5653;2931;1049;492;270.9;165.6;75.73;41.15;25.77;179.2;98.56;45.64;15.06;6.76;3.635;2.203;1.03;0.5971;0.2622;0.1719;0.115;0.09414;0.08259;0.07483;0.0644;0.05735;0.05106;0.04661;0.04093;0.03539;0.03296;0.03187;0.03141;0.03146;0.03207;0.03405;0.03603";
atom[6]="At"; A_[6]=210; dens[6]=9; ene[6]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.305e-05;5.391e-05;5.478e-05;5.567e-05;5.735e-05;6.329e-05;6.431e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.000111;0.0001128;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001021;0.001042;0.001042;0.0015;0.002;0.002787;0.002787;0.002847;0.002909;0.002909;0.003;0.003426;0.003426;0.004;0.004008;0.004008;0.00416;0.004317;0.004317;0.005;0.006;0.008;0.01;0.01421;0.01421;0.015;0.01678;0.01678;0.01714;0.01749;0.01749;0.02;0.03;0.04;0.05;0.06;0.08;0.09573;0.09573;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[6]="1.76e+05;1.551e+05;1.259e+05;1.018e+05;7.977e+04;5.395e+04;3.065e+04;1.472e+04;1.037e+04;1.315e+04;2.738e+04;4.115e+04;4.471e+04;4.859e+04;5.279e+04;5.749e+04;7.234e+04;7.472e+04;7.857e+04;8.306e+04;6.489e+04;4.078e+04;3.744e+04;3.475e+04;2.196e+04;1.251e+04;5351;3229;3126;4669;9024;1.201e+04;1.283e+04;1.285e+04;1.142e+04;9316;8118;6228;5868;5651;5435;5551;2731;1495;722.5;2431;1928;1686;2763;2250;1614;1866;1275;1269;1345;1234;1126;1175;825.1;529.9;260.1;149;61.62;146.1;127.9;94.17;130.2;133.8;118.1;136;97.04;34.42;16.38;9.196;5.748;2.769;1.777;6.895;6.174;2.249;1.118;0.4491;0.2565;0.1765;0.1354;0.09495;0.07538;0.06189;0.05479;0.04821;0.04424;0.04383;0.04461;0.04585;0.04883;0.05195;0.05918;0.06493";
atom[7]="Au"; A_[7]=197; dens[7]=19.32; ene[7]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;2.883e-05;2.93e-05;2.977e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002075;0.0002108;0.0002143;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002206;0.002206;0.002248;0.002291;0.002291;0.002507;0.002743;0.002743;0.003;0.003148;0.003148;0.003283;0.003425;0.003425;0.004;0.005;0.006;0.008;0.01;0.01192;0.01192;0.01279;0.01373;0.01373;0.01404;0.01435;0.01435;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.08072;0.08072;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[7]="3.71e+04;4.85e+04;5.765e+04;6.639e+04;8.072e+04;9.61e+04;7.289e+04;8.01e+04;8.301e+04;8.572e+04;8.747e+04;7.386e+04;6.47e+04;5.534e+04;5.299e+04;4.49e+04;3.456e+04;2.439e+04;1.403e+04;9007;6415;7180;1.047e+04;1.084e+04;1.123e+04;1.162e+04;1.346e+04;1.513e+04;1.546e+04;1.493e+04;1.356e+04;1.191e+04;1.037e+04;8666;7068;5410;4652;2089;1137;918.7;997.1;1386;2258;2389;2380;2203;2541;2049;1822;1933;1748;1585;1652;1144;666.1;425.3;207.2;118.1;75.82;187;154.6;128.3;176.4;176.6;158.8;183;163.7;78.83;27.52;12.98;7.256;4.528;2.185;2.137;8.904;5.158;1.86;0.9214;0.3744;0.218;0.153;0.1194;0.08603;0.06953;0.05794;0.05167;0.0457;0.04201;0.04166;0.04239;0.04355;0.04633;0.04926;0.05598;0.06136";
atom[8]="B"; A_[8]=10.81; dens[8]=2.34; ene[8]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0001879;0.0001881;0.0001884;0.0001915;0.0001946;0.0002043;0.0002143;0.0002177;0.0002212;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[8]="5.797e+05;4.674e+05;3.768e+05;2.998e+05;2.334e+05;1.817e+05;1.417e+05;1.108e+05;8.776e+04;6.858e+04;5.298e+04;4.024e+04;3.011e+04;2.213e+04;1.599e+04;1.131e+04;8011;5582;3743;3155;8.798e+04;8.764e+04;8.47e+04;8.185e+04;7.404e+04;6.696e+04;6.455e+04;6.22e+04;5.182e+04;3.584e+04;2.432e+04;1.65e+04;1.101e+04;7233;4717;3032;1937;1229;1229;376.6;159.7;46.67;19.27;9.683;5.538;2.346;1.255;0.4827;0.3014;0.2063;0.1793;0.1665;0.1583;0.1472;0.1391;0.1243;0.1136;0.09862;0.08834;0.08065;0.0746;0.06549;0.0589;0.05266;0.04791;0.04108;0.03284;0.02798;0.02476;0.02248;0.01945;0.01755;0.01495;0.01368";
atom[9]="Ba"; A_[9]=137.3; dens[9]=3.59; ene[9]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;9.919e-05;0.0001008;0.0001024;0.0001041;0.0001058;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0007801;0.0007803;0.0008529;0.0009997;0.001;0.001031;0.001062;0.001062;0.001099;0.001137;0.001137;0.001212;0.001293;0.001293;0.0015;0.002;0.003;0.004;0.005;0.005247;0.005247;0.005432;0.005624;0.005624;0.005803;0.005989;0.005989;0.006;0.008;0.01;0.015;0.02;0.03;0.03744;0.03744;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[9]="3143;4304;6693;1.21e+04;3.074e+05;3.043e+05;1.577e+05;8.021e+04;3.913e+04;1.733e+04;8506;5689;5530;7140;2.411e+04;2.924e+04;5.271e+04;1.05e+05;1.414e+05;1.659e+05;1.628e+05;7.886e+04;1.671e+04;3968;3718;5266;6881;7298;6630;5674;4730;3625;2745;2392;1.26e+04;1.113e+04;8865;8543;7990;7465;8547;7957;7404;7837;6861;5985;6255;4499;2319;869.6;424.6;241.4;213.5;609.8;563.4;516.9;701.6;650.7;601.3;693;689.8;333.4;186;63.47;29.38;9.904;5.498;29.19;24.57;13.79;8.511;3.963;2.196;0.7828;0.4046;0.1891;0.1265;0.09923;0.0841;0.06744;0.05803;0.05058;0.04592;0.04078;0.03692;0.03598;0.03612;0.03669;0.03844;0.04042;0.04518;0.04902";
atom[10]="Be"; A_[10]=9.012; dens[10]=1.85; ene[10]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001116;0.0001118;0.0001222;0.0001242;0.0001269;0.0001324;0.0001345;0.0001367;0.0001389;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[10]="1.859e+05;1.951e+05;1.838e+05;1.637e+05;1.344e+05;1.067e+05;8.451e+04;6.727e+04;5.467e+04;4.317e+04;3.322e+04;2.515e+04;1.811e+04;1.304e+04;9172;6027;5559;1.165e+05;1.488e+05;1.555e+05;1.604e+05;1.583e+05;1.381e+05;1.194e+05;1.085e+05;9.262e+04;6.764e+04;4.716e+04;3.259e+04;2.138e+04;1.405e+04;9288;5976;3824;2433;1534;958.7;599.2;604.1;179.7;74.69;21.27;8.685;4.369;2.527;1.124;0.6466;0.307;0.2251;0.1792;0.164;0.1554;0.1493;0.1401;0.1328;0.119;0.1089;0.09463;0.08471;0.07739;0.07155;0.06286;0.05652;0.05054;0.04597;0.03938;0.03138;0.02664;0.02347;0.02121;0.01819;0.01627;0.01361;0.01227";
atom[11]="Bi"; A_[11]=209; dens[11]=9.75; ene[11]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.378e-05;2.417e-05;2.456e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;9.605e-05;9.761e-05;9.919e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.00258;0.00258;0.002633;0.002688;0.002688;0.003;0.003177;0.003177;0.003427;0.003696;0.003696;0.003845;0.003999;0.003999;0.004;0.005;0.006;0.008;0.01;0.01342;0.01342;0.015;0.01571;0.01571;0.01605;0.01639;0.01639;0.02;0.03;0.04;0.05;0.06;0.08;0.09053;0.09053;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[11]="1.127e+05;9.921e+04;8.027e+04;5.375e+04;2.81e+04;1.516e+04;1.554e+04;2.647e+04;4.313e+04;4.881e+04;3.366e+04;3.204e+04;5.202e+04;6.83e+04;7.785e+04;8.204e+04;7.215e+04;5.223e+04;4.727e+04;4.458e+04;4.205e+04;3.044e+04;1.483e+04;8477;4866;4662;6726;9516;1.194e+04;1.284e+04;1.298e+04;1.236e+04;1.046e+04;8716;7361;5849;5441;2468;1348;772.4;1777;1850;1852;2576;2053;1774;2048;1707;1415;1498;1366;1243;1297;1296;758;485.5;237.8;136;64.91;156;116;102.7;141.6;135.1;128.2;147.8;89.52;31.52;14.95;8.379;5.233;2.522;1.856;7.38;5.739;2.082;1.033;0.4163;0.2391;0.1656;0.1277;0.09036;0.07214;0.05955;0.05285;0.04659;0.04279;0.04242;0.04317;0.04437;0.04725;0.05025;0.05721;0.06276";
atom[12]="Br"; A_[12]=79.9; dens[12]=3.12; ene[12]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;6.749e-05;6.858e-05;6.969e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001367;0.0001389;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.00155;0.00155;0.001573;0.001596;0.001596;0.001686;0.001782;0.001782;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.01347;0.01347;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[12]="2.718e+05;3.117e+05;3.383e+05;3.206e+05;2.765e+05;2.059e+05;1.368e+05;7.555e+04;3.589e+04;1.595e+04;7385;4688;4946;5110;8110;1.162e+04;1.182e+04;1.781e+04;2.763e+04;3.475e+04;3.772e+04;3.84e+04;3.956e+04;4.15e+04;4.174e+04;3.721e+04;3.185e+04;2.479e+04;1.928e+04;1.437e+04;1.051e+04;7574;5384;3769;2626;2624;1002;925.5;4289;3838;3587;5097;4595;3969;4495;3407;1231;581.5;321.3;196.8;90.26;49.12;21.76;147.1;111.9;52.66;17.53;7.9;4.264;2.582;1.198;0.6861;0.2899;0.1838;0.1186;0.09563;0.08328;0.07515;0.06443;0.05728;0.05094;0.0465;0.04089;0.03552;0.03327;0.03229;0.03194;0.03218;0.03293;0.03521;0.03738";
atom[13]="C"; A_[13]=12.01; dens[13]=2.26; ene[13]="1e-05;1.172e-05;1.272e-05;1.293e-05;1.314e-05;1.335e-05;1.374e-05;1.423e-05;1.446e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.0002841;0.0002843;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[13]="2.827e+05;4.218e+05;5.151e+05;5.351e+05;5.559e+05;5.775e+05;6.029e+05;6.338e+05;6.483e+05;7.003e+05;6.685e+05;5.692e+05;4.259e+05;3.022e+05;2.116e+05;1.477e+05;1.036e+05;7.715e+04;5.668e+04;4.046e+04;2.888e+04;2.061e+04;1.471e+04;1.031e+04;7182;4778;3127;1878;1802;5.162e+04;3.734e+04;2.612e+04;1.762e+04;1.184e+04;7924;5307;3440;2219;2211;700.2;302.6;90.33;37.78;19.12;10.95;4.576;2.373;0.8071;0.442;0.2562;0.2076;0.1871;0.1753;0.161;0.1514;0.1347;0.1229;0.1066;0.09546;0.08715;0.08058;0.07076;0.06361;0.0569;0.05179;0.04442;0.03562;0.03047;0.02708;0.02469;0.02154;0.01959;0.01698;0.01575";
atom[14]="Ca"; A_[14]=40.08; dens[14]=1.55; ene[14]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;2.977e-05;3.026e-05;3.039e-05;3.074e-05;3.124e-05;3.562e-05;3.911e-05;3.974e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003461;0.0003463;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.004038;0.004038;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[14]="4494;6442;7491;8410;9204;1.042e+04;1.261e+04;4.06e+04;3.29e+05;3.674e+05;4.673e+05;5.343e+05;6.658e+05;5.564e+05;4.983e+05;3.551e+05;1.078e+05;2.109e+04;1.061e+04;1.694e+04;2.148e+04;2.252e+04;2.096e+04;1.911e+04;1.575e+04;1.189e+04;9261;6791;5168;4758;4.481e+04;3.676e+04;3.017e+04;2.159e+04;1.517e+04;1.052e+04;7133;4824;4867;1714;799.9;267.6;121.8;118.7;1023;602.6;373.1;172.6;93.41;29.79;13.06;4.08;1.83;1.019;0.6578;0.3656;0.2571;0.1674;0.1376;0.1116;0.09783;0.08851;0.08148;0.07122;0.06388;0.05709;0.05207;0.04524;0.0378;0.03395;0.0317;0.03035;0.02892;0.02839;0.02838;0.02903";
atom[15]="Cd"; A_[15]=112.4; dens[15]=8.65; ene[15]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004482;0.0004519;0.0004554;0.0004628;0.0004703;0.0004779;0.0004856;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.003537;0.003538;0.003631;0.003727;0.003727;0.004;0.004018;0.004018;0.005;0.006;0.008;0.01;0.015;0.02;0.02671;0.02671;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[15]="1.498e+04;3.13e+04;3.979e+04;4.185e+04;4.513e+04;5.526e+04;6.906e+04;7.965e+04;8.606e+04;8.878e+04;9.016e+04;8.764e+04;8.214e+04;7.179e+04;5.864e+04;3.277e+04;1.173e+04;4948;5001;6041;6423;5950;5046;4393;1.031e+04;1.117e+04;1.198e+04;1.391e+04;1.615e+04;1.855e+04;2.005e+04;1.886e+04;1.572e+04;1.337e+04;1.041e+04;7467;7350;2931;1473;541.4;357.5;1152;1083;1013;1389;1170;1157;1324;768.5;479.3;225.4;124.4;41.78;19.2;8.809;50.65;37.65;17.78;9.779;5.975;2.751;1.524;0.5593;0.3038;0.1571;0.1129;0.0925;0.08064;0.0667;0.05826;0.05129;0.04673;0.04139;0.03698;0.03559;0.03536;0.03563;0.03691;0.03853;0.04253;0.04587";
atom[16]="Ce"; A_[16]=140.1; dens[16]=6.77; ene[16]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001164;0.0001183;0.0001202;0.0001222;0.0001269;0.0001282;0.0001303;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0008837;0.0008839;0.0009997;0.001;0.001089;0.001185;0.001185;0.001228;0.001273;0.001273;0.001352;0.001437;0.001437;0.0015;0.002;0.003;0.004;0.005;0.005723;0.005723;0.006;0.006164;0.006164;0.006354;0.006549;0.006549;0.008;0.01;0.015;0.02;0.03;0.04;0.04044;0.04044;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[16]="3.855e+04;2.82e+04;2.148e+04;1.411e+04;1.236e+04;2.722e+04;2.003e+05;1.351e+05;7.777e+04;4.332e+04;2.501e+04;1.599e+04;1.154e+04;8980;8601;2.073e+04;6.134e+04;1.101e+05;1.718e+05;2.289e+05;2.185e+05;2.04e+05;1.736e+05;4.568e+04;1.172e+04;5199;5959;7860;7840;7223;6283;5198;4174;3114;2161;1992;1.585e+04;1.22e+04;9711;7991;6563;7545;6984;6465;6853;6031;5293;5532;5033;2607;985.7;481.1;274;194.3;545.4;490.8;455.4;618.8;575.6;533.2;614.9;373.2;208.2;71.43;33.12;11.19;5.215;5.066;26.35;15.2;9.447;4.409;2.445;0.8687;0.4452;0.2039;0.1342;0.1041;0.08757;0.06962;0.05961;0.05181;0.04701;0.04177;0.03792;0.03705;0.03727;0.03792;0.03981;0.04194;0.04699;0.05103";
atom[17]="Cl"; A_[17]=35.45; dens[17]=3.21; ene[17]="1e-05;1.137e-05;1.155e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;2.883e-05;2.93e-05;3.039e-05;3.175e-05;3.226e-05;3.278e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0001999;0.0002001;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002822;0.002822;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[17]="1.744e+05;3.642e+05;3.982e+05;4.168e+05;5.516e+05;6.041e+05;6.06e+05;5.192e+05;3.497e+05;2.298e+05;2.109e+05;1.735e+05;1.368e+05;1.185e+05;1.026e+05;4.902e+04;1.145e+04;1.301e+04;1.765e+04;2.16e+04;2.152e+04;1.9e+04;1.623e+04;1.321e+04;1.059e+04;8210;6521;6.209e+04;6.237e+04;5.766e+04;4.955e+04;3.771e+04;2.861e+04;2.008e+04;1.382e+04;9395;6337;4243;2820;2832;977.1;452;177.4;1637;1473;703.7;390.1;238.4;107.5;57.25;17.84;7.739;2.425;1.117;0.6483;0.4395;0.2696;0.205;0.148;0.1266;0.1054;0.09311;0.08453;0.07795;0.06826;0.06128;0.05478;0.04994;0.04328;0.03585;0.03188;0.0295;0.02798;0.02628;0.02549;0.02496;0.0252";
atom[18]="Co"; A_[18]=58.93; dens[18]=8.9; ene[18]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;5.748e-05;5.841e-05;5.936e-05;6.032e-05;6.129e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.000778;0.0007782;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.007709;0.007709;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[18]="1.014e+05;1.128e+05;1.182e+05;1.226e+05;1.229e+05;1.197e+05;1.144e+05;1.02e+05;8.418e+04;6.894e+04;5.695e+04;6.171e+04;6.269e+04;7.663e+04;9.367e+04;1.145e+05;1.241e+05;1.076e+05;8.063e+04;6.892e+04;5.961e+04;4.998e+04;4.124e+04;3.322e+04;2.614e+04;2.009e+04;1.518e+04;1.13e+04;8297;6023;4325;3104;2213;1914;1.537e+04;1.261e+04;9723;9796;3697;1779;612.9;283;154.3;93.7;47.1;355.5;324.8;184.1;62.01;28.03;8.962;3.981;2.144;1.314;0.6414;0.3949;0.2023;0.1476;0.1094;0.09311;0.08315;0.07604;0.06604;0.05906;0.0527;0.0481;0.04204;0.0358;0.03283;0.03127;0.03045;0.02991;0.03002;0.03115;0.03256";
atom[19]="Cr"; A_[19]=52; dens[19]=7.19; ene[19]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.376e-05;4.447e-05;4.519e-05;4.592e-05;4.666e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.000574;0.0005742;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.005989;0.005989;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[19]="8.554e+04;1.109e+05;1.406e+05;1.711e+05;1.722e+05;1.538e+05;1.167e+05;7.457e+04;4.841e+04;4.236e+04;5.259e+04;6.06e+04;6.983e+04;8.046e+04;9.213e+04;1.06e+05;1.185e+05;8.809e+04;6.288e+04;4.995e+04;4.179e+04;3.666e+04;3.02e+04;2.444e+04;1.914e+04;1.505e+04;1.163e+04;8611;6081;4405;3225;2697;2.392e+04;1.919e+04;1.549e+04;1.113e+04;7434;7405;2694;1277;433.9;198.8;108;65.74;597.7;516;251.3;138.6;45.71;20.38;6.434;2.856;1.55;0.9639;0.4905;0.3166;0.1788;0.1378;0.1067;0.09213;0.08281;0.07598;0.0662;0.0593;0.05295;0.04832;0.04213;0.03559;0.03235;0.03057;0.02956;0.02869;0.02855;0.0292;0.03026";
atom[20]="Cs"; A_[20]=132.9; dens[20]=1.87; ene[20]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;8.865e-05;9.008e-05;9.154e-05;9.235e-05;0.0001082;0.0001262;0.0001269;0.0001282;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007265;0.0007267;0.0007277;0.0008529;0.0009997;0.001;0.001032;0.001065;0.001065;0.001139;0.001217;0.001217;0.0015;0.002;0.003;0.004;0.005;0.005012;0.005012;0.005183;0.005359;0.005359;0.005534;0.005714;0.005714;0.006;0.008;0.01;0.015;0.02;0.03;0.03598;0.03598;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[20]="1360;1883;3.44e+04;2.309e+05;2.386e+05;1.614e+05;9.017e+04;4.848e+04;2.379e+04;1.153e+04;6799;5379;5800;2.487e+04;7.641e+04;8.586e+04;9.647e+04;9.952e+04;1.252e+05;6.587e+04;6.308e+04;5.781e+04;1.375e+04;4366;4175;5473;6565;6746;6235;5371;4385;3482;2720;1.596e+04;1.59e+04;1.08e+04;9095;9365;8775;8214;8685;7576;6584;6888;4335;2226;831.9;405.5;230.3;229;667.4;618.4;564.5;769.2;714.6;655.6;754.7;671.1;321.4;179.3;61.04;28.22;9.507;5.863;31.43;23.81;13.4;8.248;3.836;2.124;0.7589;0.3941;0.1863;0.1257;0.09912;0.08431;0.06789;0.05854;0.05108;0.04641;0.04121;0.03725;0.03625;0.03635;0.03689;0.0386;0.04057;0.04529;0.0491";
atom[21]="Cu"; A_[21]=63.55; dens[21]=8.96; ene[21]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009324;0.0009326;0.0009376;0.0009527;0.0009681;0.0009838;0.0009997;0.0009997;0.001;0.001047;0.001096;0.001096;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.008979;0.008979;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[21]="8.614e+04;9.408e+04;1.027e+05;1.108e+05;1.094e+05;9.634e+04;9.756e+04;1.07e+05;8.839e+04;7.662e+04;7.612e+04;7.407e+04;7.165e+04;6.694e+04;6.366e+04;6.194e+04;5.911e+04;5.401e+04;4.573e+04;3.589e+04;2.753e+04;2.091e+04;1.571e+04;1.166e+04;8342;6113;4328;2998;2123;1527;1.312e+04;1.292e+04;1.234e+04;1.178e+04;1.125e+04;1.074e+04;1.074e+04;1.057e+04;9307;8242;9347;4418;2154;748.8;347.3;189.9;115.6;52.55;38.29;278.4;215.9;74.05;33.79;10.92;4.862;2.613;1.593;0.763;0.4584;0.2217;0.1559;0.1119;0.09413;0.08362;0.07625;0.06605;0.05901;0.05261;0.04803;0.04205;0.03599;0.03318;0.03177;0.03108;0.03074;0.03103;0.03247;0.03408";
atom[22]="Dy"; A_[22]=162.5; dens[22]=8.55; ene[22]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001481;0.0001487;0.0001505;0.000153;0.000158;0.0001605;0.0001631;0.0001657;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001138;0.001295;0.001295;0.001314;0.001332;0.001333;0.0015;0.001676;0.001676;0.001757;0.001842;0.001842;0.002;0.002047;0.002047;0.003;0.004;0.005;0.006;0.00779;0.00779;0.008;0.008581;0.008581;0.00881;0.009046;0.009046;0.01;0.015;0.02;0.03;0.04;0.05;0.05379;0.05379;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[22]="4049;4953;6120;7135;8096;1.063e+04;2.88e+04;1.088e+05;1.226e+05;8.491e+04;5.789e+04;4.299e+04;3.647e+04;3.244e+04;2.92e+04;2.603e+04;1.982e+04;1.113e+04;1.286e+04;1.825e+04;7.281e+04;6.331e+04;5.517e+04;4.767e+04;3.922e+04;3.425e+04;2.499e+04;1.891e+04;1.551e+04;1.348e+04;1.164e+04;9670;7757;6136;4699;3560;2650;2494;1953;1521;2173;3293;4745;5551;5550;4229;4896;4382;3924;4168;3467;3286;3433;1405;695.3;398.8;252;129.9;343.7;326.9;269.5;367.2;345.2;322.8;372.5;290.2;101.6;47.65;16.25;7.582;4.227;3.5;16.76;12.59;6.012;3.36;1.189;0.5953;0.2558;0.159;0.1181;0.09644;0.07393;0.06204;0.05318;0.04801;0.04265;0.03905;0.03848;0.03896;0.03986;0.04214;0.0446;0.05033;0.05492";
atom[23]="Er"; A_[23]=167.3; dens[23]=9.07; ene[23]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.577e-05;2.593e-05;2.619e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.000158;0.0001605;0.0001631;0.0001657;0.0001684;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001187;0.001409;0.001409;0.001431;0.001453;0.001453;0.0015;0.001812;0.001812;0.002;0.002006;0.002006;0.002104;0.002207;0.002207;0.003;0.004;0.005;0.006;0.008;0.008358;0.008358;0.008799;0.009264;0.009264;0.009505;0.009751;0.009751;0.01;0.015;0.02;0.03;0.04;0.05;0.05749;0.05749;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[23]="4612;4874;5688;6495;7459;8509;2.695e+04;3.547e+04;4.932e+04;1.13e+05;8.701e+04;6.593e+04;5.07e+04;4.136e+04;3.501e+04;3.142e+04;2.762e+04;2.511e+04;2.355e+04;1.814e+04;1.189e+04;2.898e+04;6.401e+04;4.087e+04;3.542e+04;3.053e+04;2.42e+04;2.042e+04;1.712e+04;1.522e+04;1.264e+04;1.067e+04;8734;6895;5286;3986;2964;2748;1978;1408;2069;3170;4339;4952;6069;3841;4452;3523;3499;3717;3337;2995;3127;1526;758.7;435.9;275.7;133;119;312.6;279.9;239.7;327.1;308;288.6;333;312.9;110.6;52.04;17.8;8.315;4.634;3.232;15.14;13.62;6.478;3.628;1.285;0.6415;0.2724;0.1672;0.123;0.09968;0.07569;0.06317;0.05392;0.0486;0.04317;0.03958;0.03907;0.03961;0.04056;0.04294;0.04549;0.05141;0.05613";
atom[24]="Eu"; A_[24]=152; dens[24]=5.24; ene[24]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001324;0.0001345;0.0001367;0.0001389;0.0001412;0.0001435;0.0001458;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001063;0.001131;0.001131;0.001146;0.001161;0.001161;0.001311;0.001481;0.001481;0.0015;0.001614;0.001614;0.001704;0.0018;0.0018;0.002;0.003;0.004;0.005;0.006;0.006977;0.006977;0.00729;0.007617;0.007617;0.008;0.008052;0.008052;0.01;0.015;0.02;0.03;0.04;0.04852;0.04852;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[24]="5146;6809;8181;9336;1.057e+04;2.882e+04;1.407e+05;1.485e+05;1.028e+05;6.719e+04;4.758e+04;3.658e+04;3.028e+04;2.638e+04;2.198e+04;1.628e+04;8119;9125;3.097e+04;8.378e+04;1.319e+05;1.134e+05;8.119e+04;5.982e+04;5.1e+04;3.121e+04;2.096e+04;1.503e+04;1.219e+04;1.065e+04;9683;8061;6538;5168;4020;3070;2302;2216;1978;1763;2443;3617;5416;6540;6291;5031;5810;5624;4771;5064;4492;3980;4158;3278;1256;619.3;354.2;223.4;152.2;412.7;369.6;330.2;449.2;398.9;392.1;452.4;262.9;90.87;42.42;14.41;6.716;4.051;20.01;18.5;11.55;5.455;3.04;1.076;0.5425;0.238;0.1509;0.1139;0.09404;0.07312;0.06186;0.05331;0.04822;0.04285;0.03913;0.03845;0.03885;0.03967;0.04185;0.04422;0.0498;0.05423";
atom[25]="F"; A_[25]=19; dens[25]=1.7; ene[25]="1e-05;1.172e-05;1.193e-05;1.212e-05;1.232e-05;1.374e-05;1.61e-05;1.887e-05;1.931e-05;1.962e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0006966;0.0006968;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[25]="1.144e+04;2.745e+04;3.396e+04;5.24e+04;7.683e+04;1.57e+05;2.448e+05;3.167e+05;3.257e+05;3.323e+05;3.461e+05;3.691e+05;3.617e+05;3.121e+05;2.767e+05;2.418e+05;2.126e+05;1.737e+05;1.357e+05;1.02e+05;7.402e+04;5.312e+04;3.747e+04;2.619e+04;1.815e+04;1.245e+04;8473;5682;3780;2398;1531;967;661.7;1.354e+04;1.222e+04;8384;5677;5649;1979;904.7;288.8;125.6;65.14;37.89;16.02;8.205;2.492;1.133;0.4487;0.2828;0.2214;0.192;0.1639;0.1496;0.1298;0.1176;0.1015;0.09073;0.08274;0.07649;0.06717;0.06037;0.05399;0.04915;0.04228;0.03422;0.0296;0.02663;0.02457;0.02195;0.02039;0.01846;0.01769";
atom[26]="Fe"; A_[26]=55.85; dens[26]=7.87; ene[26]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.305e-05;5.391e-05;5.478e-05;5.567e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007069;0.0007137;0.0007253;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.007112;0.007112;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[26]="1.039e+05;1.265e+05;1.295e+05;1.298e+05;1.2e+05;1.083e+05;9.451e+04;7.946e+04;6.397e+04;5.089e+04;3.932e+04;3.657e+04;6.716e+04;1.277e+05;1.351e+05;1.402e+05;9.019e+04;7.015e+04;6.147e+04;5.428e+04;4.753e+04;4.01e+04;3.3e+04;2.617e+04;2.018e+04;1.594e+04;1.175e+04;8155;5745;4011;2825;2153;4679;1.707e+04;1.694e+04;1.3e+04;9021;9085;3399;1626;557.6;256.7;139.8;84.84;53.19;407.6;305.6;170.6;57.08;25.68;8.176;3.629;1.958;1.205;0.5952;0.3717;0.1964;0.146;0.1099;0.094;0.08414;0.07704;0.06699;0.05995;0.0535;0.04883;0.04265;0.03621;0.03312;0.03146;0.03057;0.02991;0.02994;0.03092;0.03224";
atom[27]="Fr"; A_[27]=223; dens[27]=9; ene[27]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;6.749e-05;6.858e-05;6.969e-05;7.081e-05;7.196e-05;7.312e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001074;0.001153;0.001153;0.0015;0.002;0.003;0.003;0.003;0.003136;0.003136;0.003389;0.003663;0.003663;0.004;0.004327;0.004327;0.004487;0.004652;0.004652;0.005;0.006;0.008;0.01;0.015;0.01503;0.01503;0.01641;0.01791;0.01791;0.01827;0.01864;0.01864;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.1011;0.1011;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[27]="951.8;1.561e+04;1.114e+05;1.16e+05;1.096e+05;9.65e+04;6.956e+04;4.145e+04;2.174e+04;1.041e+04;5102;4193;2.588e+04;2.723e+04;3.583e+04;4.591e+04;5.371e+04;6.068e+04;6.724e+04;7.904e+04;8.181e+04;6.008e+04;3.389e+04;1.844e+04;8747;3909;2532;2959;5107;9215;1.128e+04;1.185e+04;1.192e+04;9758;7620;6490;6238;5356;4673;4772;2846;1562;641.4;1995;1994;1449;2255;1761;1415;1641;1322;1086;1153;1059;966.6;1008;848.9;545.1;268.4;153.9;55.73;55.44;130.4;103.1;81.84;113.7;117.9;103.1;118.7;99.33;35.5;16.94;9.525;5.959;2.871;1.655;1.61;6.089;2.295;1.141;0.4577;0.2601;0.178;0.1358;0.09444;0.0745;0.06087;0.05376;0.04721;0.04324;0.04283;0.04358;0.04479;0.04769;0.05077;0.05786;0.0635";
atom[28]="Ga"; A_[28]=69.72; dens[28]=5.91; ene[28]="1e-05;1.172e-05;1.356e-05;1.374e-05;1.378e-05;1.401e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001092;0.000111;0.0001128;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001056;0.001115;0.001115;0.001129;0.001142;0.001142;0.001218;0.001298;0.001298;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.01037;0.01037;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[28]="1.802e+05;1.428e+05;7.598e+04;6.596e+04;6.336e+04;5.348e+04;1.687e+04;2.035e+04;3.722e+04;3.348e+04;3.825e+04;4.562e+04;5.22e+04;5.682e+04;5.988e+04;6.171e+04;6.092e+04;6.001e+04;6.062e+04;6.066e+04;6.074e+04;6.083e+04;5.82e+04;5.312e+04;4.621e+04;3.913e+04;3.296e+04;2.669e+04;2.079e+04;1.545e+04;1.119e+04;8062;5632;3752;2440;1676;1697;1492;1312;3990;4887;5664;7405;7138;6358;7206;5087;2515;885.7;413;226.6;138.2;63.02;34.21;30.99;221.4;85.37;39.28;12.81;5.726;3.076;1.868;0.8823;0.5197;0.2387;0.1619;0.1123;0.09325;0.08236;0.07487;0.06466;0.05767;0.05139;0.04692;0.04113;0.03538;0.0328;0.03156;0.03099;0.03086;0.0313;0.033;0.03479";
atom[29]="Gd"; A_[29]=157.2; dens[29]=7.9; ene[29]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001435;0.0001458;0.0001481;0.0001487;0.0001505;0.000153;0.0001554;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001089;0.001185;0.001185;0.001201;0.001217;0.001217;0.0015;0.001544;0.001544;0.001615;0.001688;0.001688;0.001782;0.001881;0.001881;0.002;0.003;0.004;0.005;0.006;0.007243;0.007243;0.007579;0.00793;0.00793;0.008;0.008376;0.008376;0.01;0.015;0.02;0.03;0.04;0.05;0.05024;0.05024;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[29]="5.568e+04;2.972e+04;2.293e+04;1.913e+04;1.791e+04;2.65e+04;6.449e+04;1.044e+05;9.059e+04;5.513e+04;3.999e+04;3.208e+04;2.783e+04;2.49e+04;2.202e+04;1.929e+04;1.316e+04;3.576e+04;7.423e+04;1.429e+05;1.334e+05;1.039e+05;7.095e+04;5.134e+04;2.982e+04;2.083e+04;1.62e+04;1.285e+04;1.068e+04;9163;7702;6497;5217;4068;3110;2341;2291;1960;1668;1931;2527;3961;4764;5041;4701;5432;4900;4421;4694;4164;3691;3854;3360;1292;638;365.3;230.5;142.9;384.4;342.7;304.9;414.9;406.8;363.1;419;269.3;93.35;43.63;14.84;6.92;3.859;3.812;18.64;11.75;5.573;3.109;1.1;0.5534;0.241;0.1517;0.1139;0.09371;0.07252;0.0612;0.05262;0.04759;0.04228;0.03865;0.03802;0.03844;0.03928;0.04147;0.04384;0.04943;0.05385";
atom[30]="Ge"; A_[30]=72.61; dens[30]=5.32; ene[30]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;2.93e-05;2.977e-05;3.026e-05;3.039e-05;3.074e-05;3.124e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;6.749e-05;6.858e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001103;0.001217;0.001217;0.001232;0.001248;0.001248;0.001328;0.001414;0.001414;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.0111;0.0111;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[30]="1.745e+05;1.566e+05;1.128e+05;6.861e+04;4.023e+04;2.071e+04;9991;1.792e+04;2.286e+04;2.917e+04;3.14e+04;3.721e+04;4.121e+04;3.629e+04;3.063e+04;3.727e+04;4.336e+04;5.156e+04;5.178e+04;5.276e+04;5.457e+04;5.617e+04;5.71e+04;5.756e+04;5.597e+04;5.108e+04;4.518e+04;3.735e+04;3.023e+04;2.286e+04;1.719e+04;1.261e+04;8862;6142;4192;2814;1880;1893;1502;1190;4389;4734;4974;6698;6348;5554;6287;5475;2711;961.3;449.7;247.2;150.9;68.9;37.42;28.11;198.1;91.52;42.22;13.85;6.207;3.335;2.023;0.9501;0.555;0.2491;0.1661;0.1131;0.09327;0.08212;0.07452;0.06426;0.05727;0.05101;0.04657;0.04086;0.03524;0.03275;0.03158;0.03107;0.03103;0.03156;0.0334;0.03528";
atom[31]="H"; A_[31]=1.008; dens[31]=0.09; ene[31]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.644e-05;1.671e-05;1.698e-05;1.726e-05;1.753e-05;1.782e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[31]="1e-10;1e-10;1e-10;4.151e-08;0.4699;2.181e+05;2.361e+06;2.253e+06;2.151e+06;2.053e+06;1.738e+06;1.077e+06;6.626e+05;4.068e+05;2.565e+05;1.612e+05;1.008e+05;6.279e+04;3.891e+04;2.4e+04;1.473e+04;9017;5516;3350;2029;1221;735.1;442.5;265.1;157.6;93.65;55.65;33.06;19.51;11.5;6.785;7.217;2.148;1.059;0.5612;0.4546;0.4193;0.4042;0.3914;0.3854;0.3764;0.3695;0.357;0.3458;0.3355;0.326;0.3091;0.2944;0.2651;0.2429;0.2112;0.1893;0.1729;0.1599;0.1405;0.1263;0.1129;0.1027;0.08769;0.06921;0.05806;0.05049;0.04498;0.03746;0.03254;0.02539;0.02153";
atom[32]="He"; A_[32]=4.003; dens[32]=0.18; ene[32]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.45e-05;2.47e-05;2.496e-05;2.536e-05;2.577e-05;2.593e-05;2.619e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[32]="1e-10;1e-10;1e-10;1e-10;1e-10;1e-10;1e-10;1.178e+06;1.157e+06;1.124e+06;1.093e+06;1.081e+06;1.062e+06;8.167e+05;6.128e+05;4.508e+05;3.264e+05;2.378e+05;1.624e+05;1.135e+05;7.792e+04;5.23e+04;3.384e+04;2.122e+04;1.328e+04;8403;5284;3205;1965;1204;729.4;442.3;267.6;160.9;96.82;58.93;60.84;16.76;6.863;2.007;0.9329;0.5766;0.4195;0.2933;0.2476;0.2092;0.196;0.1838;0.1763;0.1703;0.1651;0.1562;0.1486;0.1336;0.1224;0.1064;0.09535;0.08707;0.08054;0.07076;0.06362;0.05688;0.05173;0.04422;0.03503;0.02949;0.02577;0.02307;0.0194;0.01703;0.01363;0.01183";
atom[33]="Hf"; A_[33]=178.5; dens[33]=13.31; ene[33]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.552e-05;3.562e-05;3.61e-05;3.668e-05;3.727e-05;3.788e-05;3.849e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.001662;0.001662;0.001689;0.001716;0.001716;0.002;0.002108;0.002108;0.002233;0.002365;0.002365;0.00248;0.002601;0.002601;0.003;0.004;0.005;0.006;0.008;0.009561;0.009561;0.01;0.01074;0.01074;0.011;0.01127;0.01127;0.015;0.02;0.03;0.04;0.05;0.06;0.06535;0.06535;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[33]="6.185e+04;6.829e+04;6.256e+04;4.981e+04;3.62e+04;2.667e+04;2.012e+04;2.07e+04;4.581e+04;4.67e+04;5.094e+04;5.657e+04;6.218e+04;6.676e+04;7.168e+04;8.598e+04;8.148e+04;5.624e+04;3.505e+04;2.623e+04;2.411e+04;2.335e+04;2.296e+04;2.251e+04;2.197e+04;2.113e+04;1.976e+04;1.81e+04;1.555e+04;1.341e+04;1.16e+04;9869;8308;6422;4834;3593;3335;1489;1203;1505;2189;3273;3682;3598;3152;3659;3182;2769;2943;2637;2363;2465;1768;885.9;511.3;324.4;157.1;99.97;255.7;230.1;189.4;258.9;252.2;230.6;265.9;129;60.87;20.98;9.828;5.478;3.42;2.751;12.37;7.352;4.154;1.477;0.7339;0.3054;0.1834;0.1324;0.1058;0.0788;0.06502;0.05505;0.04944;0.04387;0.0403;0.03989;0.04052;0.04155;0.04409;0.04677;0.05301;0.05796";
atom[34]="Hg"; A_[34]=200.6; dens[34]=13.55; ene[34]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002725;0.000277;0.0002807;0.0002814;0.000286;0.0003049;0.0003099;0.0003149;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002295;0.002295;0.002339;0.002385;0.002385;0.002606;0.002847;0.002847;0.003;0.003279;0.003279;0.003417;0.003562;0.003562;0.004;0.005;0.006;0.008;0.01;0.01228;0.01228;0.01321;0.01421;0.01421;0.01452;0.01484;0.01484;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.0831;0.0831;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[34]="6.446e+04;5.559e+04;5.207e+04;5.376e+04;5.878e+04;6.818e+04;7.707e+04;8.112e+04;8.455e+04;8.484e+04;8.126e+04;7.226e+04;6.021e+04;4.417e+04;3.019e+04;1.963e+04;1.116e+04;6943;6765;9057;1.201e+04;1.407e+04;1.433e+04;1.455e+04;1.46e+04;1.484e+04;1.554e+04;1.572e+04;1.591e+04;1.603e+04;1.583e+04;1.431e+04;1.229e+04;1.062e+04;8818;7131;5329;4830;2174;1184;877.3;992.5;1407;2151;2316;2257;2080;2400;2117;1704;1808;1638;1486;1549;1179;686.9;438.7;214;122.1;72.66;178;146.4;120.9;166.3;167.4;150.1;172.8;168.1;81.23;28.41;13.42;7.504;4.683;2.259;2.055;8.464;5.279;1.909;0.9456;0.3834;0.2224;0.1555;0.121;0.08679;0.06993;0.05814;0.05179;0.04575;0.04207;0.04172;0.04246;0.04362;0.04643;0.04937;0.05613;0.06154";
atom[35]="Ho"; A_[35]=164.9; dens[35]=8.8; ene[35]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.000153;0.0001554;0.000158;0.0001605;0.0001631;0.0001657;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001162;0.001351;0.001351;0.001371;0.001391;0.001392;0.0015;0.001741;0.001741;0.00183;0.001923;0.001923;0.002;0.002128;0.002128;0.003;0.004;0.005;0.006;0.008;0.008071;0.008071;0.008484;0.008918;0.008918;0.009153;0.009394;0.009394;0.01;0.015;0.02;0.03;0.04;0.05;0.05562;0.05562;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[35]="4277;4855;5779;6569;7393;8864;2.676e+04;7.07e+04;9.228e+04;7.485e+04;5.672e+04;4.346e+04;3.501e+04;2.998e+04;2.696e+04;2.402e+04;2.011e+04;1.238e+04;1.054e+04;1.871e+04;7.983e+04;6.521e+04;5.164e+04;4.092e+04;3.292e+04;2.383e+04;1.946e+04;1.57e+04;1.338e+04;1.166e+04;9988;8281;6461;4974;3746;2789;2616;1961;1462;2108;3193;4528;5239;5847;4038;4677;4161;3703;3934;3590;3127;3266;1465;726.4;417;263.6;127.1;124.2;328.3;288.9;254;346.3;325.9;305.1;352;301.2;106;49.8;17.01;7.94;4.425;3.361;15.92;13.09;6.244;3.492;1.236;0.6178;0.2639;0.1629;0.1205;0.098;0.07477;0.06257;0.05351;0.04828;0.04289;0.0393;0.03877;0.03927;0.0402;0.04253;0.04504;0.05088;0.05551";
atom[36]="I"; A_[36]=126.9; dens[36]=4.93; ene[36]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;4.896e-05;4.975e-05;5.056e-05;5.138e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.000111;0.0001128;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006199;0.0006201;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001035;0.001072;0.001072;0.0015;0.002;0.003;0.004;0.004557;0.004557;0.004702;0.004852;0.004852;0.005;0.005188;0.005188;0.006;0.008;0.01;0.015;0.02;0.03;0.03317;0.03317;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[36]="2.592e+05;2.594e+05;2.688e+05;1.958e+05;1.276e+05;7.504e+04;3.804e+04;1.916e+04;1.007e+04;6436;3.096e+04;3.131e+04;4.684e+04;3.17e+04;1.82e+04;1.451e+04;3.743e+04;8.472e+04;1.1e+05;8.833e+04;8.013e+04;7.312e+04;3.737e+04;1.339e+04;4611;4987;6353;7387;7171;6189;5043;3916;3068;2.195e+04;2.188e+04;1.449e+04;1.031e+04;9117;9096;8465;7863;8198;3919;1997;742;360.7;259.2;755;712.3;663.6;894.3;843;766.5;883.7;617.3;292.2;162.6;55.12;25.43;8.561;6.553;35.82;22.1;12.32;7.579;3.51;1.942;0.6978;0.3663;0.1771;0.1217;0.09701;0.08313;0.06749;0.05841;0.05111;0.04647;0.04124;0.03716;0.03607;0.03608;0.03655;0.03815;0.04002;0.04455;0.04823";
atom[37]="In"; A_[37]=114.8; dens[37]=7.31; ene[37]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004482;0.0004519;0.0004554;0.0004628;0.0004703;0.0004779;0.0004856;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.00373;0.00373;0.003833;0.003938;0.003938;0.004;0.004237;0.004238;0.005;0.006;0.008;0.01;0.015;0.02;0.02794;0.02794;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[37]="7.925e+04;2.085e+04;1.11e+04;1.09e+04;3.763e+04;2.965e+04;4.002e+04;5.798e+04;7.665e+04;9.263e+04;1.041e+05;1.082e+05;1.053e+05;1.076e+05;8.798e+04;4.136e+04;1.736e+04;4806;4713;5938;7060;7359;6466;5118;3674;4526;5316;7692;9756;1.175e+04;1.415e+04;1.718e+04;1.43e+04;1.407e+04;1.09e+04;7900;7809;3131;1578;580.8;335.6;1046;993;931.3;1261;1231;1066;1223;813.4;507.2;239.1;132.1;44.45;20.44;8.316;47.33;39.49;18.73;10.3;6.306;2.907;1.609;0.5876;0.3167;0.1614;0.1149;0.09371;0.08138;0.06707;0.05849;0.05144;0.04684;0.04151;0.03715;0.03582;0.03564;0.03596;0.0373;0.03898;0.04311;0.04654";
atom[38]="Ir"; A_[38]=192.2; dens[38]=22.4; ene[38]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.818e-05;4.893e-05;4.896e-05;4.975e-05;5.735e-05;6.723e-05;7.081e-05;7.196e-05;7.312e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0008653;0.0008793;0.0009997;0.001;0.0015;0.002;0.00204;0.00204;0.002078;0.002116;0.002116;0.002323;0.002551;0.002551;0.002724;0.002909;0.002909;0.003;0.003174;0.003174;0.004;0.005;0.006;0.008;0.01;0.01122;0.01122;0.01199;0.01282;0.01282;0.01312;0.01342;0.01342;0.015;0.02;0.03;0.04;0.05;0.06;0.07611;0.07611;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[38]="4.876e+04;5.735e+04;5.663e+04;6.199e+04;7.715e+04;8.672e+04;8.17e+04;6.754e+04;4.616e+04;3.873e+04;4.009e+04;4.487e+04;4.504e+04;5.081e+04;4.726e+04;5.159e+04;4.522e+04;4.228e+04;3.953e+04;2.918e+04;1.816e+04;1.284e+04;1.085e+04;1.222e+04;1.419e+04;1.598e+04;1.748e+04;1.706e+04;1.608e+04;1.516e+04;1.366e+04;1.19e+04;9780;7804;6227;6101;5770;4558;4243;1898;1032;988.2;1066;1492;2478;2608;2621;2424;2800;2393;2041;2166;2011;1767;1843;1063;617.8;393.5;191.4;109;81.55;203.8;170.2;142.6;195.9;193.3;175.6;202.5;153;73.17;25.46;11.99;6.693;4.176;2.284;9.728;8.585;4.855;1.74;0.8628;0.3525;0.2068;0.1463;0.1149;0.08357;0.06794;0.05688;0.05083;0.04501;0.04139;0.04104;0.04174;0.04286;0.04558;0.04844;0.05502;0.06024";
atom[39]="K"; A_[39]=39.1; dens[39]=0.86; ene[39]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;1.994e-05;2.026e-05;2.059e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;3.727e-05;3.788e-05;3.849e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.0002945;0.0002947;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.003607;0.003607;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[39]="3688;4203;4358;5035;1.608e+04;7.382e+04;2.484e+05;2.896e+05;3.872e+05;5.518e+05;5.569e+05;4.064e+05;3.253e+05;2.922e+05;2.624e+05;1.494e+05;3.419e+04;1.05e+04;1.604e+04;2.267e+04;2.385e+04;2.118e+04;1.836e+04;1.515e+04;1.223e+04;9621;7389;5605;5155;5.548e+04;4.536e+04;3.607e+04;2.706e+04;1.896e+04;1.309e+04;8927;5922;4169;4058;1418;659.2;219.8;132.7;1201;925.6;518.9;320.5;146.9;79.07;25.03;10.93;3.413;1.541;0.8679;0.5678;0.3251;0.2345;0.1582;0.1319;0.108;0.09495;0.086;0.07922;0.06929;0.06216;0.05556;0.05068;0.04399;0.03666;0.03282;0.03054;0.02915;0.02766;0.02704;0.02687;0.02737";
atom[40]="Kr"; A_[40]=83.8; dens[40]=3.75; ene[40]="1e-05;1.172e-05;1.374e-05;1.4e-05;1.42e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.008e-05;9.154e-05;9.235e-05;9.302e-05;9.37e-05;9.39e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.001675;0.001675;0.001701;0.001727;0.001727;0.001822;0.001921;0.001921;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.01433;0.01433;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[40]="1e-10;1e-10;1e-10;1e-10;2.265e+05;3.008e+05;2.856e+05;2.483e+05;1.846e+05;1.153e+05;5.962e+04;2.82e+04;1.282e+04;6314;4353;3857;5137;3.273e+04;4.605e+04;5.678e+04;7.291e+04;3.868e+04;1.107e+04;2.219e+04;3.154e+04;3.613e+04;3.72e+04;3.606e+04;3.136e+04;2.582e+04;2.127e+04;1.618e+04;1.208e+04;8639;6187;4338;2916;2854;1093;836.1;3909;3409;3166;4566;4014;3482;3948;3599;1305;618.6;342.5;210.1;96.51;52.57;19.71;131.3;116.8;55.48;18.54;8.389;4.523;2.739;1.267;0.7221;0.2998;0.1872;0.1186;0.0948;0.08226;0.0741;0.0634;0.05631;0.05005;0.04569;0.0402;0.03501;0.03286;0.03196;0.03168;0.03199;0.0328;0.03518;0.03741";
atom[41]="La"; A_[41]=138.9; dens[41]=6.15; ene[41]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001128;0.0001146;0.0001164;0.0001183;0.0001202;0.0001222;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008359;0.0008361;0.0008529;0.0009997;0.001;0.00106;0.001123;0.001123;0.001163;0.001204;0.001204;0.00128;0.001361;0.001361;0.0015;0.002;0.003;0.004;0.005;0.005483;0.005483;0.005683;0.005891;0.005891;0.006;0.006266;0.006266;0.008;0.01;0.015;0.02;0.03;0.03892;0.03892;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[41]="3.918e+04;2.821e+04;1.903e+04;1.158e+04;9775;1.595e+05;2.166e+05;1.454e+05;7.358e+04;3.496e+04;1.716e+04;8427;6162;6454;9730;3.042e+04;7.743e+04;1.555e+05;2.555e+05;2.71e+05;2.151e+05;1.82e+05;1.337e+05;2.565e+04;5023;3248;5051;6708;7177;6901;6329;5214;3940;2969;2244;1.276e+04;1.209e+04;8387;9087;7988;7000;8025;7447;6911;7321;6440;5652;5905;4772;2464;926.7;453.1;257.8;203.9;576.4;530.2;484.6;654.5;631.9;565.4;651.8;352.9;196.7;67.31;31.19;10.52;5.271;27.72;25.79;14.47;8.962;4.177;2.315;0.8239;0.4239;0.1961;0.1301;0.1015;0.0857;0.06843;0.05876;0.0511;0.0464;0.04122;0.03737;0.03646;0.03664;0.03726;0.03907;0.04113;0.04603;0.04996";
atom[42]="Li"; A_[42]=6.941; dens[42]=0.53; ene[42]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.46e-05;5.48e-05;5.567e-05;5.657e-05;5.735e-05;5.748e-05;5.841e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[42]="7.058e+04;6.493e+04;5.8e+04;5.171e+04;4.432e+04;3.724e+04;3.036e+04;2.269e+04;1.706e+04;1.213e+04;8681;6883;2.208e+05;2.367e+05;2.541e+05;2.702e+05;2.728e+05;2.894e+05;3.066e+05;2.182e+05;1.857e+05;1.137e+05;7.885e+04;5.306e+04;3.574e+04;2.364e+04;1.538e+04;9928;6308;4007;2513;1559;966.7;594.5;364.4;223;233.9;66.68;27.07;7.549;3.114;1.619;0.9875;0.5054;0.3395;0.2176;0.1856;0.1644;0.1551;0.1488;0.1438;0.1356;0.1289;0.1158;0.106;0.0921;0.08249;0.07532;0.06968;0.06121;0.05503;0.04921;0.04476;0.0383;0.03043;0.02572;0.02257;0.0203;0.01725;0.01529;0.01252;0.01109";
atom[43]="Lu"; A_[43]=175; dens[43]=9.84; ene[43]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;2.883e-05;2.93e-05;2.977e-05;3.026e-05;3.039e-05;3.074e-05;3.124e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.001589;0.001589;0.001614;0.001639;0.001639;0.002;0.002024;0.002024;0.00214;0.002263;0.002264;0.002375;0.002491;0.002491;0.003;0.004;0.005;0.006;0.008;0.009244;0.009244;0.01;0.01035;0.01035;0.01061;0.01087;0.01087;0.015;0.02;0.03;0.04;0.05;0.06;0.06331;0.06331;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[43]="4.028e+04;2.88e+04;2.079e+04;1.503e+04;1.016e+04;7200;5726;7889;1.83e+04;2.716e+04;4.871e+04;5.274e+04;6.321e+04;7.493e+04;9.018e+04;6.99e+04;5.205e+04;4.117e+04;3.314e+04;2.83e+04;2.555e+04;2.321e+04;2.306e+04;2.324e+04;2.22e+04;2.176e+04;1.974e+04;1.726e+04;1.556e+04;1.403e+04;1.175e+04;1.012e+04;7963;6134;4605;3413;3187;1424;1264;1597;2302;3442;3935;3452;3352;3890;3397;2969;3155;2826;2531;2640;1710;856;493.4;312.9;151.3;104.9;270.3;221.1;201.9;275.7;267.6;245;282.6;124.7;58.81;20.23;9.472;5.279;3.297;2.874;13.05;7.161;4.033;1.433;0.713;0.2981;0.1799;0.1305;0.1046;0.07829;0.06478;0.05496;0.04941;0.04385;0.04028;0.03985;0.04045;0.04147;0.04398;0.04664;0.05282;0.05773";
atom[44]="Mg"; A_[44]=24.3; dens[44]=1.74; ene[44]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;4.94e-05;4.96e-05;5.735e-05;5.841e-05;5.936e-05;6.723e-05;7.312e-05;7.431e-05;7.551e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001142;0.001305;0.001305;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[44]="1.602e+05;3.15e+04;1.717e+04;9411;8071;8161;8441;8071;7283;5708;4453;4442;5.846e+04;9.159e+04;9.688e+04;1.016e+05;1.269e+05;1.392e+05;1.426e+05;1.461e+05;1.505e+05;1.478e+05;1.294e+05;1.077e+05;8.612e+04;6.648e+04;4.967e+04;3.598e+04;2.534e+04;1.743e+04;1.176e+04;7824;5147;3357;2173;1398;909.7;922.5;647.4;453;5444;4004;1932;658.5;297.4;158.3;93.81;40.61;21.05;6.358;2.763;0.9306;0.4881;0.3292;0.257;0.1951;0.1686;0.1394;0.1245;0.1065;0.09492;0.08647;0.07988;0.07008;0.06296;0.05629;0.05129;0.04426;0.03613;0.03159;0.02873;0.02681;0.02445;0.02313;0.02168;0.02127";
atom[45]="Mn"; A_[45]=54.94; dens[45]=7.43; ene[45]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.741e-05;4.818e-05;4.893e-05;4.896e-05;4.975e-05;5.056e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0006386;0.0006388;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.006539;0.006539;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[45]="1.448e+05;1.493e+05;1.531e+05;1.57e+05;1.547e+05;1.386e+05;1.112e+05;8.244e+04;6.16e+04;4.437e+04;5.261e+04;6.142e+04;7.136e+04;7.171e+04;9.56e+04;1.268e+05;1.092e+05;7.046e+04;5.048e+04;4.021e+04;3.566e+04;3.283e+04;2.965e+04;2.489e+04;2.063e+04;1.702e+04;1.272e+04;9293;6747;4797;3405;2448;2307;1.99e+04;1.498e+04;1.152e+04;7986;8093;2984;1421;485.1;222.9;121.2;73.5;58.03;452;273.4;151.4;50.27;22.53;7.141;3.169;1.714;1.06;0.5306;0.3367;0.1838;0.1391;0.1062;0.09133;0.08192;0.07509;0.06537;0.05852;0.05224;0.04769;0.04162;0.03524;0.03213;0.03045;0.02952;0.02875;0.02871;0.02951;0.03068";
atom[46]="Mo"; A_[46]=95.94; dens[46]=10.22; ene[46]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002397;0.0002436;0.0002475;0.0002515;0.0002556;0.0002597;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.00252;0.00252;0.002572;0.002625;0.002625;0.002743;0.002865;0.002866;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.02;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[46]="9.012e+04;9.555e+04;1.189e+05;1.446e+05;1.606e+05;1.423e+05;1.001e+05;5.091e+04;6.618e+04;1.335e+05;1.294e+05;7.446e+04;3.692e+04;1.563e+04;6794;4365;4773;5478;5771;5392;8422;8465;1.044e+04;1.248e+04;1.437e+04;1.614e+04;1.781e+04;2.181e+04;2.408e+04;2.455e+04;2.194e+04;1.826e+04;1.333e+04;9880;7088;4973;4942;1925;959.3;541.5;1979;1854;1750;2433;2183;1961;2243;2011;970.3;545;337.3;156.5;85.76;28.54;13.08;80.55;80.54;28.1;12.94;7.037;4.274;1.962;1.096;0.4208;0.2423;0.1379;0.1047;0.08848;0.07851;0.06619;0.05837;0.05167;0.04713;0.04163;0.03675;0.03496;0.03439;0.0344;0.03523;0.0365;0.03978;0.04264";
atom[47]="N"; A_[47]=14.01; dens[47]=1.25; ene[47]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.644e-05;1.671e-05;1.811e-05;1.84e-05;1.87e-05;1.887e-05;1.994e-05;2.026e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004098;0.00041;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[47]="2.036e+05;2.117e+05;2.502e+05;4.054e+05;4.341e+05;4.575e+05;5.449e+05;5.642e+05;5.841e+05;5.932e+05;6.414e+05;6.559e+05;6.648e+05;5.672e+05;4.268e+05;3.147e+05;2.383e+05;1.757e+05;1.329e+05;9.855e+04;7.178e+04;5.155e+04;3.661e+04;2.585e+04;1.81e+04;1.239e+04;8290;5512;3642;2328;1398;1150;3.071e+04;2.452e+04;1.698e+04;1.149e+04;7663;5047;3309;3311;1083;476.9;145.6;61.66;31.44;18.09;7.562;3.879;1.236;0.6178;0.3066;0.2288;0.198;0.1817;0.1639;0.1529;0.1353;0.1233;0.1068;0.09557;0.08719;0.08063;0.07081;0.06364;0.05693;0.0518;0.0445;0.03579;0.03073;0.02742;0.02511;0.02209;0.02024;0.01782;0.01673";
atom[48]="Na"; A_[48]=22.99; dens[48]=0.97; ene[48]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.04e-05;3.06e-05;3.562e-05;4.175e-05;4.447e-05;4.519e-05;4.893e-05;5.735e-05;6.723e-05;6.749e-05;6.858e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001035;0.001072;0.001072;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[48]="2700;3032;3385;3418;3247;2910;2605;2172;2171;1.431e+05;1.619e+05;1.772e+05;1.826e+05;1.84e+05;1.873e+05;1.896e+05;1.884e+05;1.884e+05;1.882e+05;1.721e+05;1.488e+05;1.188e+05;9.112e+04;6.948e+04;5.032e+04;3.617e+04;2.521e+04;1.731e+04;1.169e+04;7798;5169;3442;2305;1511;979.4;629.8;654.2;596;542.9;6435;3194;1521;507;226.1;119.4;70.3;30.18;15.57;4.694;2.057;0.7197;0.3969;0.2804;0.2268;0.1796;0.1585;0.1335;0.1199;0.1029;0.09185;0.08372;0.07736;0.06788;0.061;0.05454;0.04968;0.04282;0.03487;0.03037;0.02753;0.02559;0.02319;0.02181;0.02023;0.0197";
atom[49]="Nb"; A_[49]=92.91; dens[49]=8.57; ene[49]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.552e-05;3.562e-05;3.61e-05;3.668e-05;3.727e-05;3.788e-05;3.849e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002371;0.002371;0.002417;0.002465;0.002465;0.002579;0.002698;0.002698;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.01899;0.01899;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[49]="1.163e+05;1.389e+05;1.511e+05;1.517e+05;1.267e+05;8.102e+04;5.501e+04;5.395e+04;1.15e+05;1.171e+05;1.269e+05;1.396e+05;1.508e+05;1.629e+05;1.733e+05;1.705e+05;1.328e+05;6.631e+04;2.961e+04;1.192e+04;5539;4843;5330;5566;5462;6740;1.857e+04;2.487e+04;2.483e+04;2.243e+04;1.954e+04;1.6e+04;1.226e+04;9281;6828;4670;4600;1786;889.3;584.4;2181;2045;1935;2694;2412;2161;2470;1906;916.4;513.4;317.2;146.9;80.38;26.72;14.09;87.84;77.12;26.66;12.23;6.644;4.032;1.852;1.037;0.4023;0.2344;0.1357;0.104;0.08831;0.07858;0.06642;0.05866;0.05196;0.04741;0.04185;0.03686;0.03498;0.03436;0.03432;0.03508;0.03628;0.03944;0.04224";
atom[50]="Nd"; A_[50]=144.2; dens[50]=7.01; ene[50]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001202;0.0001222;0.0001242;0.0001262;0.0001269;0.0001282;0.0001303;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009803;0.0009805;0.0009997;0.001;0.001002;0.001005;0.001005;0.001142;0.001297;0.001297;0.001349;0.001403;0.001403;0.0015;0.001575;0.001575;0.002;0.003;0.004;0.005;0.006;0.006208;0.006208;0.00646;0.006722;0.006722;0.006921;0.007126;0.007126;0.008;0.01;0.015;0.02;0.03;0.04;0.04357;0.04357;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[50]="7133;8136;8969;9672;1.14e+04;4.299e+04;1.345e+05;1.102e+05;7.384e+04;5.127e+04;4.066e+04;3.298e+04;2.68e+04;2.179e+04;1.708e+04;1.353e+04;2.427e+04;3.944e+04;6.079e+04;8.259e+04;8.586e+04;9.203e+04;1.026e+05;5.576e+04;2.183e+04;1.196e+04;9831;8668;8343;7611;6643;5653;4694;3592;2670;2089;9141;8854;6627;6806;6949;8554;7579;5933;6833;6264;5744;6093;5273;4738;4951;2878;1093;536.6;306.1;192.7;176.7;489.2;448.7;401.3;545.6;513.5;472.3;544.8;409.4;230;79.25;36.84;12.47;5.809;4.642;23.66;16.5;10.33;4.839;2.687;0.9522;0.4844;0.2178;0.1412;0.1083;0.0904;0.07127;0.06072;0.05262;0.04769;0.04236;0.03856;0.03776;0.03806;0.03879;0.04081;0.04304;0.04832;0.05257";
atom[51]="Ne"; A_[51]=20.18; dens[51]=0.9; ene[51]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.15e-05;2.17e-05;2.195e-05;2.212e-05;2.231e-05;2.267e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0008701;0.0008703;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[51]="1e-10;1e-10;1e-10;1e-10;1e-10;1e-10;1.721e+05;1.859e+05;1.961e+05;2.069e+05;2.301e+05;2.73e+05;2.613e+05;2.564e+05;2.461e+05;2.225e+05;2.121e+05;1.895e+05;1.633e+05;1.359e+05;1.067e+05;7.802e+04;5.596e+04;4.082e+04;2.794e+04;1.925e+04;1.312e+04;8779;5869;3851;2520;1652;1085;712.1;674.9;1.081e+04;7683;7409;2666;1243;405.1;178.5;93.39;54.67;23.28;11.97;3.613;1.606;0.5923;0.3473;0.2579;0.2161;0.1781;0.16;0.137;0.1236;0.1064;0.09502;0.08664;0.08006;0.07029;0.06316;0.05646;0.05145;0.0443;0.03594;0.03122;0.02818;0.0261;0.02348;0.02197;0.02013;0.01946";
atom[52]="Ni"; A_[52]=58.69; dens[52]=8.9; ene[52]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.431e-05;6.535e-05;6.641e-05;6.723e-05;6.749e-05;6.858e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008526;0.0008528;0.0008529;0.0009997;0.001;0.001004;0.001008;0.001008;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.008333;0.008333;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[52]="9.874e+04;9.588e+04;1.093e+05;1.183e+05;1.186e+05;1.07e+05;1.082e+05;8.568e+04;6.756e+04;5.58e+04;5.127e+04;5.107e+04;5.377e+04;5.879e+04;6.659e+04;7.331e+04;7.543e+04;8.544e+04;8.813e+04;7.559e+04;6.523e+04;5.533e+04;4.892e+04;4.199e+04;3.478e+04;2.696e+04;2.088e+04;1.532e+04;1.112e+04;7909;5514;3733;2604;1796;1.443e+04;1.442e+04;1.043e+04;9855;9753;9654;1.099e+04;4234;2049;709.4;328.2;179.3;109;49.52;44.28;329.4;209;70.81;32.2;10.34;4.6;2.474;1.512;0.7306;0.444;0.2208;0.1582;0.1154;0.09765;0.08698;0.07944;0.06891;0.0616;0.05494;0.05015;0.04387;0.03745;0.03444;0.03289;0.0321;0.03164;0.03185;0.0332;0.03476";
atom[53]="O"; A_[53]=16; dens[53]=1.43; ene[53]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.782e-05;1.811e-05;1.84e-05;1.87e-05;1.887e-05;1.9e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.000543;0.0005432;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[53]="1.85e+05;1.59e+05;1.423e+05;1.888e+05;3.234e+05;3.553e+05;3.903e+05;4.289e+05;4.466e+05;4.59e+05;4.916e+05;4.528e+05;4.05e+05;3.622e+05;2.959e+05;2.387e+05;1.805e+05;1.364e+05;1.034e+05;7.843e+04;5.715e+04;4.045e+04;2.885e+04;2.067e+04;1.356e+04;8641;5847;3929;2640;1759;1172;1100;2.135e+04;1.544e+04;1.044e+04;6936;4619;4590;1549;694.9;217.1;93.15;47.9;27.7;11.63;5.952;1.836;0.8651;0.3779;0.2585;0.2132;0.1907;0.1678;0.1551;0.1361;0.1237;0.107;0.09566;0.08729;0.0807;0.07087;0.06372;0.05697;0.05185;0.04459;0.03597;0.031;0.02777;0.02552;0.02263;0.02089;0.01866;0.0177";
atom[54]="Os"; A_[54]=190.2; dens[54]=22.6; ene[54]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.741e-05;4.818e-05;4.893e-05;4.896e-05;4.975e-05;5.056e-05;5.138e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.00196;0.00196;0.002;0.002031;0.002031;0.002234;0.002457;0.002457;0.002619;0.002792;0.002792;0.003;0.003048;0.003049;0.004;0.005;0.006;0.008;0.01;0.01087;0.01087;0.0116;0.01239;0.01239;0.01267;0.01297;0.01297;0.015;0.02;0.03;0.04;0.05;0.06;0.07387;0.07387;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[54]="4.162e+04;4.929e+04;5.67e+04;6.654e+04;7.61e+04;8.095e+04;7.473e+04;5.835e+04;4.008e+04;2.014e+04;3.791e+04;4.248e+04;4.719e+04;4.736e+04;5.256e+04;5.704e+04;6.169e+04;6.202e+04;4.08e+04;2.807e+04;1.765e+04;1.378e+04;1.386e+04;1.523e+04;1.661e+04;1.677e+04;1.705e+04;1.692e+04;1.554e+04;1.426e+04;1.222e+04;1.118e+04;9105;7512;5737;4284;4032;1801;1023;2003;2218;2622;2864;2852;2546;2948;2524;2161;2296;1938;1869;1949;1023;593.6;377.6;183.6;104.5;84.58;212.1;186;150.3;206;195.6;184.6;212.9;147.8;70.39;24.43;11.49;6.414;4.002;2.36;10.16;8.29;4.696;1.68;0.8327;0.3414;0.2011;0.1428;0.1125;0.08224;0.06705;0.05625;0.05034;0.04458;0.041;0.04065;0.04134;0.04244;0.04511;0.04791;0.05442;0.05956";
atom[55]="P"; A_[55]=30.97; dens[55]=1.82; ene[55]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001349;0.0001351;0.0001487;0.0001743;0.0001854;0.0001884;0.0001915;0.0001946;0.0001977;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002145;0.002146;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[55]="1.152e+06;7.699e+05;4.882e+05;2.726e+05;1.031e+05;3.14e+04;1.142e+04;1.121e+04;1.351e+04;1.484e+04;1.594e+04;1.571e+04;1.395e+04;1.194e+04;9937;7755;5669;5002;7.289e+04;7.628e+04;7.177e+04;6.764e+04;6.902e+04;7.042e+04;7.186e+04;7.308e+04;6.959e+04;5.281e+04;4.025e+04;2.929e+04;2.13e+04;1.498e+04;1.031e+04;6958;4612;3027;1979;1913;654.7;301.8;249.4;2473;1118;524.2;286;172.6;76.6;40.35;12.39;5.352;1.7;0.8096;0.4916;0.3494;0.2324;0.1865;0.1432;0.125;0.1055;0.09359;0.08511;0.07854;0.06884;0.06182;0.05526;0.05039;0.04358;0.0359;0.03172;0.02915;0.02747;0.02552;0.02452;0.02364;0.02363";
atom[56]="Pa"; A_[56]=231; dens[56]=15.4; ene[56]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001058;0.0001075;0.0001082;0.0001092;0.000111;0.0001128;0.0001146;0.0001164;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001003;0.001007;0.001007;0.00111;0.001224;0.001224;0.001303;0.001387;0.001387;0.0015;0.002;0.003;0.003442;0.003442;0.003525;0.003611;0.003611;0.004;0.004174;0.004174;0.005;0.005001;0.005001;0.005181;0.005367;0.005367;0.006;0.008;0.01;0.015;0.01673;0.01673;0.02;0.02031;0.02031;0.02071;0.0211;0.0211;0.03;0.04;0.05;0.06;0.08;0.1;0.1126;0.1126;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[56]="3.202e+04;2.379e+04;1.685e+04;1.241e+04;2.964e+04;5.065e+04;6.971e+04;7.929e+04;7.302e+04;5.218e+04;3.503e+04;2.125e+04;1.154e+04;6213;1.006e+04;4.235e+04;6.952e+04;9.273e+04;1.211e+05;1.348e+05;1.247e+05;9.518e+04;7.765e+04;3.777e+04;1.738e+04;8696;4854;2738;2117;2103;2977;6407;9244;9691;9875;8133;6399;6530;6490;6451;6868;5755;4794;4863;4311;3815;3891;3327;1834;755.8;554.8;1363;1266;1185;1695;1315;1182;1374;875.9;875.5;928.8;851.4;781;814.4;621.7;307.4;176.9;64.42;49.03;113;70.25;67.47;94.52;89.95;85.76;98.61;40.77;19.57;11.05;6.929;3.342;1.924;1.445;5.198;2.575;1.288;0.5152;0.2904;0.1969;0.1487;0.1018;0.07937;0.0642;0.05637;0.04927;0.04496;0.04445;0.04519;0.04641;0.04943;0.05261;0.06;0.06592";
atom[57]="Pb"; A_[57]=207.2; dens[57]=11.35; ene[57]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.811e-05;1.84e-05;1.87e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001092;0.000111;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.0002953;0.0003001;0.0003049;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002484;0.002484;0.002534;0.002586;0.002586;0.003;0.003066;0.003066;0.003301;0.003554;0.003554;0.003699;0.003851;0.003851;0.004;0.005;0.006;0.008;0.01;0.01304;0.01304;0.015;0.0152;0.0152;0.01553;0.01586;0.01586;0.02;0.03;0.04;0.05;0.06;0.08;0.088;0.088;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[57]="9.484e+04;8.202e+04;5.455e+04;2.189e+04;2.225e+04;3.476e+04;4.25e+04;4.331e+04;4.534e+04;3.669e+04;4.096e+04;5.249e+04;6.564e+04;7.361e+04;7.546e+04;6.874e+04;5.593e+04;3.963e+04;2.329e+04;2.241e+04;2.067e+04;1.179e+04;7579;4977;5015;7625;1.064e+04;1.16e+04;1.192e+04;1.225e+04;1.296e+04;1.392e+04;1.311e+04;1.169e+04;9972;8578;7109;5649;5210;2356;1285;800.6;1397;1726;1944;2458;1965;1857;2146;1796;1496;1585;1442;1311;1368;1251;730.4;467.2;228.7;130.6;67.01;162.1;111.6;107.8;148.5;141.6;134.4;154.8;86.36;30.32;14.36;8.041;5.021;2.419;1.91;7.683;5.549;2.014;0.9985;0.4031;0.2323;0.1614;0.1248;0.0887;0.07102;0.05876;0.05222;0.04606;0.04234;0.04197;0.04272;0.04391;0.04675;0.04972;0.05658;0.06206";
atom[58]="Pd"; A_[58]=106.4; dens[58]=12.02; ene[58]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003638;0.0003697;0.0003757;0.0003817;0.0003856;0.0003879;0.0003942;0.0004006;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.003173;0.003173;0.003251;0.00333;0.00333;0.003465;0.003604;0.003604;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.02435;0.02435;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[58]="4.55e+04;6.168e+04;8.113e+04;1.002e+05;1.16e+05;1.247e+05;1.283e+05;1.241e+05;1.175e+05;1.158e+05;1.108e+05;1.061e+05;9.793e+04;7.464e+04;3.494e+04;1.382e+04;4901;4773;6115;6701;6721;5929;5461;8783;1.057e+04;1.256e+04;1.408e+04;1.507e+04;1.567e+04;1.677e+04;1.795e+04;1.96e+04;1.909e+04;1.636e+04;1.297e+04;9365;6681;6538;2579;1292;473;410.6;1355;1287;1215;1664;1518;1379;1582;1227;691.2;430.8;201.7;111;37.15;17.04;10.03;58.98;34.65;16.14;8.85;5.399;2.481;1.377;0.5115;0.2827;0.1506;0.1103;0.09134;0.0801;0.06669;0.05849;0.05159;0.04702;0.04162;0.03704;0.03552;0.03518;0.03537;0.03651;0.03802;0.04181;0.04501";
atom[59]="Pm"; A_[59]=145; dens[59]=7.3; ene[59]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001222;0.0001242;0.0001262;0.0001269;0.0001282;0.0001324;0.0001345;0.0001367;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001013;0.001027;0.001027;0.001039;0.001051;0.001052;0.001194;0.001357;0.001357;0.001413;0.001471;0.001471;0.0015;0.001653;0.001653;0.002;0.003;0.004;0.005;0.006;0.006459;0.006459;0.00673;0.007013;0.007013;0.007217;0.007428;0.007428;0.008;0.01;0.015;0.02;0.03;0.04;0.04518;0.04518;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[59]="6280;7634;8691;9658;1.306e+04;6.498e+04;1.655e+05;1.27e+05;7.737e+04;5.183e+04;3.966e+04;3.084e+04;2.531e+04;2.109e+04;1.714e+04;1.307e+04;1.187e+04;2.391e+04;6.112e+04;8.474e+04;1.293e+05;1.195e+05;1.083e+05;9.82e+04;6.34e+04;2.946e+04;1.627e+04;1.144e+04;9894;9439;8769;7177;5963;4738;3700;2824;2121;2056;2007;1959;2729;3894;5830;7242;7232;5687;6555;5985;5466;5799;5553;4497;4699;3048;1162;570.9;326;205.3;170.2;467.8;422.6;380.5;517.4;488.4;449.4;518.4;431.4;244;84.11;39.16;13.27;6.181;4.491;22.65;17.35;10.87;5.107;2.84;1.005;0.5098;0.2273;0.1462;0.1115;0.09276;0.0728;0.06188;0.0535;0.04849;0.04308;0.03925;0.03849;0.03882;0.03959;0.04169;0.04401;0.04946;0.0538";
atom[60]="Po"; A_[60]=209; dens[60]=9.3; ene[60]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.074e-05;3.124e-05;3.175e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;9.761e-05;9.919e-05;0.0001008;0.0001024;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002683;0.002683;0.00274;0.002798;0.002798;0.003;0.003302;0.003302;0.003567;0.003854;0.003854;0.004;0.004149;0.004149;0.005;0.006;0.008;0.01;0.01381;0.01381;0.015;0.01624;0.01624;0.01659;0.01694;0.01694;0.02;0.03;0.04;0.05;0.06;0.08;0.0931;0.09311;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[60]="9.921e+04;9.302e+04;7.854e+04;6.316e+04;4.704e+04;2.81e+04;1.382e+04;1.322e+04;1.515e+04;2.171e+04;3.076e+04;3.649e+04;3.697e+04;5.549e+04;7.095e+04;7.597e+04;6.969e+04;5.474e+04;4.756e+04;4.505e+04;4.224e+04;3.96e+04;3.324e+04;1.848e+04;1.127e+04;5663;3818;4297;7304;1.092e+04;1.306e+04;1.453e+04;1.399e+04;1.121e+04;9199;7755;6169;5724;2604;1423;748.2;2206;1941;1775;2711;2155;1693;1956;1622;1339;1419;1299;1190;1242;793.1;508.5;249.4;142.7;63.37;151.3;121.9;98.49;136.1;129.7;123.2;142;93.52;33.03;15.69;8.802;5.499;2.649;1.82;7.14;5.991;2.17;1.078;0.4335;0.2483;0.1714;0.1318;0.09286;0.07391;0.06087;0.05394;0.04749;0.04362;0.04323;0.04399;0.04522;0.04816;0.05124;0.05835;0.06398";
atom[61]="Pr"; A_[61]=140.9; dens[61]=6.77; ene[61]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001202;0.0001222;0.0001242;0.0001262;0.0001269;0.0001282;0.0001303;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009287;0.0009289;0.0009997;0.001;0.001115;0.001242;0.001242;0.001289;0.001337;0.001337;0.0015;0.001511;0.001511;0.002;0.003;0.004;0.005;0.005964;0.005964;0.006;0.00644;0.00644;0.006635;0.006835;0.006835;0.008;0.01;0.015;0.02;0.03;0.04;0.04199;0.04199;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[61]="3.773e+04;3.006e+04;2.297e+04;1.53e+04;1.034e+04;2.411e+04;1.788e+05;1.402e+05;8.386e+04;5e+04;3.092e+04;2.108e+04;1.54e+04;1.25e+04;1.013e+04;1.432e+04;5.447e+04;1.078e+05;1.869e+05;1.84e+05;1.745e+05;1.565e+05;1.298e+05;5.175e+04;1.688e+04;7145;6852;7302;8016;7564;6567;5446;4234;3181;2242;1878;1.09e+04;9815;1.058e+04;8122;6278;7224;6661;6142;6513;5090;5006;5235;2768;1047;513.1;292.4;186.8;521.4;514.5;431;585.7;545.5;506;583.6;395;220.9;75.97;35.26;11.92;5.557;4.892;25.18;15.99;9.977;4.664;2.588;0.918;0.4687;0.2126;0.1389;0.1071;0.08976;0.07105;0.0607;0.05268;0.04779;0.04244;0.03858;0.03774;0.038;0.0387;0.04067;0.04288;0.04809;0.05226";
atom[62]="Pt"; A_[62]=195.1; dens[62]=21.45; ene[62]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;6.749e-05;6.858e-05;6.969e-05;7.081e-05;7.879e-05;8.865e-05;9.008e-05;9.154e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002122;0.002122;0.002161;0.002202;0.002202;0.002413;0.002645;0.002645;0.003;0.003027;0.003027;0.003158;0.003296;0.003296;0.004;0.005;0.006;0.008;0.01;0.01156;0.01156;0.01239;0.01327;0.01327;0.01357;0.01388;0.01388;0.015;0.02;0.03;0.04;0.05;0.06;0.07839;0.07839;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[62]="4.835e+04;5.023e+04;5.648e+04;6.531e+04;8.113e+04;9.837e+04;8.14e+04;7.269e+04;5.267e+04;3.912e+04;4.274e+04;5.398e+04;5.037e+04;5.063e+04;5.23e+04;5.433e+04;5.645e+04;4.689e+04;3.096e+04;2.861e+04;2.643e+04;2.543e+04;1.485e+04;9847;9588;1.18e+04;1.412e+04;1.63e+04;1.604e+04;1.563e+04;1.524e+04;1.332e+04;1.139e+04;1.009e+04;8125;6430;4805;4433;1986;1081;950.6;1034;1431;2341;2487;2512;2307;2663;1965;1923;2041;1844;1671;1742;1100;640.2;408.3;198.7;113.2;78.44;194.6;161.8;134.9;185.3;184.8;166.6;192.1;157.8;75.74;26.41;12.45;6.954;4.339;2.203;9.301;8.731;4.993;1.795;0.8896;0.3625;0.2118;0.1492;0.1168;0.08456;0.06857;0.05727;0.05112;0.04522;0.0416;0.04124;0.04196;0.0431;0.04584;0.04872;0.05537;0.06064";
atom[63]="Ra"; A_[63]=226; dens[63]=5.5; ene[63]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.312e-05;7.431e-05;7.551e-05;7.673e-05;7.797e-05;7.879e-05;7.923e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001028;0.001058;0.001058;0.00113;0.001208;0.001208;0.0015;0.002;0.003;0.003105;0.003105;0.003176;0.003248;0.003248;0.00351;0.003792;0.003792;0.004;0.004489;0.00449;0.004653;0.004822;0.004822;0.005;0.006;0.008;0.01;0.015;0.01544;0.01544;0.0169;0.01848;0.01848;0.01886;0.01924;0.01924;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.1039;0.1039;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[63]="774.8;1409;2901;1.095e+04;8.026e+04;9.206e+04;8.061e+04;5.311e+04;2.787e+04;1.485e+04;7549;3811;5686;1.846e+04;2.712e+04;3.986e+04;5.871e+04;6.905e+04;7.395e+04;7.651e+04;8.769e+04;5.974e+04;3.303e+04;1.653e+04;7659;3781;2165;2106;3292;6856;1.047e+04;1.105e+04;1.079e+04;9870;7753;6574;6201;5895;5602;5683;5019;4424;4516;2950;1620;666.4;616.9;1715;1506;1374;2039;1647;1342;1558;1367;1024;1086;999.5;912.9;952.2;874.1;561.3;276.9;158.9;57.6;53.55;125.3;98.39;77.66;108.1;112.6;97.99;112.8;102.3;36.64;17.5;9.85;6.166;2.971;1.712;1.56;5.826;2.355;1.172;0.4696;0.2662;0.1817;0.1383;0.09579;0.07535;0.06141;0.05415;0.04751;0.04348;0.04304;0.04379;0.045;0.04793;0.05102;0.05815;0.06383";
atom[64]="Rb"; A_[64]=85.47; dens[64]=1.63; ene[64]="1e-05;1.172e-05;1.374e-05;1.542e-05;1.567e-05;1.592e-05;1.61e-05;1.618e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.175e-05;3.226e-05;3.278e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.001804;0.001804;0.001834;0.001864;0.001864;0.002;0.002065;0.002065;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.0152;0.0152;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[64]="3431;3864;5314;2.841e+04;6.003e+04;1.269e+05;2.245e+05;2.681e+05;3.74e+05;4.153e+05;4.014e+05;2.601e+05;2.205e+05;2.012e+05;1.836e+05;1.143e+05;4.739e+04;2.04e+04;8578;5034;4303;4427;8338;1.438e+04;2.592e+04;3.432e+04;3.826e+04;3.738e+04;3.374e+04;2.854e+04;2.249e+04;1.703e+04;1.258e+04;9101;6517;4591;3191;3174;1219;778.2;3096;2969;2861;3957;3410;3153;3606;1418;674.8;374.4;230;105.8;57.66;19.09;18.42;120.8;59.8;20.09;9.112;4.918;2.979;1.375;0.7799;0.3187;0.196;0.1219;0.0967;0.0836;0.0751;0.06412;0.05689;0.05053;0.04613;0.04061;0.03545;0.03335;0.0325;0.03227;0.03267;0.03357;0.0361;0.03845";
atom[65]="Re"; A_[65]=186.2; dens[65]=21.04; ene[65]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;3.974e-05;4.039e-05;4.104e-05;4.17e-05;4.175e-05;4.306e-05;4.376e-05;4.893e-05;5.735e-05;6.641e-05;6.723e-05;6.749e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.001822;0.001822;0.001885;0.001949;0.001949;0.002;0.002367;0.002367;0.00252;0.002682;0.002682;0.002804;0.002932;0.002932;0.003;0.004;0.005;0.006;0.008;0.01;0.01054;0.01054;0.01122;0.01196;0.01196;0.01224;0.01253;0.01253;0.015;0.02;0.03;0.04;0.05;0.06;0.07168;0.07168;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[65]="4.115e+04;5.143e+04;6.051e+04;7.075e+04;8.069e+04;7.85e+04;6.065e+04;3.483e+04;2.727e+04;3.474e+04;3.859e+04;4.286e+04;4.76e+04;4.779e+04;5.339e+04;5.653e+04;5.697e+04;6.599e+04;4.889e+04;4.632e+04;4.551e+04;2.695e+04;1.746e+04;1.559e+04;1.668e+04;1.752e+04;1.751e+04;1.762e+04;1.775e+04;1.73e+04;1.595e+04;1.439e+04;1.27e+04;1.117e+04;9356;7320;5547;4141;3872;1729;1147;1152;1251;2689;3802;3773;2696;3124;2686;2309;2454;2210;1992;2078;1972;994.3;575.9;366;177.8;101.1;88.58;223.4;196.4;160;219.1;207.9;196.1;226.2;144;68.35;23.67;11.12;6.206;3.872;2.464;10.73;8.069;4.587;1.637;0.8119;0.3339;0.1976;0.1409;0.1114;0.08179;0.06688;0.05627;0.05038;0.04463;0.04105;0.04068;0.04137;0.04246;0.04511;0.0479;0.05437;0.05953";
atom[66]="Rh"; A_[66]=102.9; dens[66]=12.41; ene[66]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.0003252;0.000329;0.0003304;0.0003358;0.0003412;0.0003467;0.0003523;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.003004;0.003004;0.003074;0.003146;0.003146;0.003276;0.003412;0.003412;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.02322;0.02322;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[66]="4.806e+04;6.946e+04;9.298e+04;1.173e+05;1.352e+05;1.481e+05;1.48e+05;1.25e+05;9.005e+04;7.382e+04;1.007e+05;1.204e+05;1.022e+05;5.879e+04;2.262e+04;8730;4494;4879;6135;6509;6441;5607;7937;9413;9970;1.162e+04;1.339e+04;1.504e+04;1.673e+04;2.096e+04;2.138e+04;1.94e+04;1.617e+04;1.214e+04;8745;6200;6169;2426;1214;444.1;442.7;1513;1422;1337;1847;1671;1512;1731;1170;658.9;410.1;191.5;105.3;35.18;16.13;10.79;64.14;33.3;15.44;8.448;5.147;2.365;1.314;0.4916;0.2742;0.1485;0.1097;0.09134;0.08035;0.06711;0.05894;0.05204;0.04744;0.04197;0.03728;0.03568;0.03529;0.03542;0.0365;0.03797;0.04166;0.04481";
atom[67]="Rn"; A_[67]=222; dens[67]=9.73; ene[67]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;5.841e-05;5.936e-05;6.032e-05;6.431e-05;6.535e-05;6.723e-05;7.551e-05;7.673e-05;7.879e-05;9.235e-05;0.0001058;0.0001075;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001047;0.001097;0.001097;0.0015;0.002;0.002892;0.002892;0.003;0.003021;0.003022;0.00327;0.003538;0.003538;0.004;0.004159;0.004159;0.004317;0.004482;0.004482;0.005;0.006;0.008;0.01;0.01462;0.01462;0.015;0.01734;0.01734;0.01769;0.01805;0.01805;0.02;0.03;0.04;0.05;0.06;0.08;0.0984;0.0984;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[67]="5.383e+04;1.144e+05;1.547e+05;1.496e+05;1.131e+05;7.797e+04;5.031e+04;2.934e+04;1.491e+04;7148;7023;2.549e+04;2.981e+04;3.43e+04;3.863e+04;5.041e+04;5.388e+04;5.725e+04;7.276e+04;7.521e+04;7.519e+04;6.964e+04;4.874e+04;4.537e+04;4.396e+04;2.328e+04;1.19e+04;5817;3141;2635;3625;7484;1.073e+04;1.195e+04;1.207e+04;1.128e+04;9300;8225;6218;5826;5354;4909;5013;2719;1490;663.4;2319;1554;1524;2470;1867;1479;1710;1266;1148;1217;1112;1017;1061;816.3;524;257.7;147.7;56.97;134.4;125.9;85.57;118.5;122.5;107.7;124.1;95.63;34.08;16.24;9.125;5.706;2.749;1.649;6.371;6.086;2.215;1.101;0.442;0.2518;0.1728;0.1322;0.0923;0.07303;0.05984;0.0529;0.04649;0.04264;0.04224;0.04298;0.04418;0.04705;0.05007;0.05704;0.0626";
atom[68]="Ru"; A_[68]=101.1; dens[68]=12.37; ene[68]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.0003001;0.0003049;0.0003099;0.0003149;0.00032;0.0003252;0.000329;0.0003304;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002838;0.002838;0.002902;0.002967;0.002967;0.003;0.003224;0.003224;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.02212;0.02212;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[68]="5.081e+04;5.945e+04;8.718e+04;1.145e+05;1.358e+05;1.385e+05;1.275e+05;9.238e+04;6.116e+04;5.589e+04;8.607e+04;1.047e+05;7.563e+04;3.444e+04;1.265e+04;5990;4545;5544;6092;5994;5379;5456;9006;1.073e+04;1.252e+04;1.432e+04;1.609e+04;1.749e+04;1.859e+04;1.901e+04;2.144e+04;2.055e+04;1.931e+04;1.518e+04;1.129e+04;8099;5752;5718;2240;1120;470.4;1644;1542;1452;2317;1963;1638;1874;1095;616.5;383.2;178.5;98;32.7;14.99;11.43;68.76;31.39;14.52;7.926;4.822;2.215;1.232;0.4647;0.2618;0.144;0.1074;0.08992;0.07933;0.06647;0.05846;0.05166;0.0471;0.04164;0.03692;0.03527;0.03482;0.03491;0.03591;0.0373;0.04084;0.04387";
atom[69]="S"; A_[69]=32.07; dens[69]=2.07; ene[69]="1e-05;1.137e-05;1.155e-05;1.172e-05;1.174e-05;1.193e-05;1.212e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001624;0.0001626;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002472;0.002472;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[69]="5.318e+05;6.693e+05;6.992e+05;7.272e+05;7.304e+05;7.629e+05;7.824e+05;8.354e+05;7.76e+05;5.946e+05;3.896e+05;2.178e+05;7.71e+04;2.775e+04;1.195e+04;1.44e+04;1.953e+04;2.075e+04;1.887e+04;1.603e+04;1.285e+04;1.03e+04;8098;7173;8.475e+04;7.844e+04;6.439e+04;5.475e+04;4.67e+04;3.471e+04;2.575e+04;1.834e+04;1.274e+04;8732;5866;3869;2538;2429;834.2;385.3;216.8;2070;1339;633.8;348.7;211.6;94.65;50.12;15.5;6.708;2.113;0.9872;0.5849;0.4053;0.2585;0.202;0.1506;0.1302;0.1091;0.09665;0.08781;0.08102;0.07098;0.06373;0.05697;0.05193;0.04498;0.03715;0.03293;0.03036;0.02872;0.02682;0.02589;0.02517;0.02529";
atom[70]="Sb"; A_[70]=121.8; dens[70]=6.68; ene[70]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001041;0.0001058;0.0001075;0.0001082;0.0001092;0.000111;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005281;0.0005283;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.004132;0.004132;0.004254;0.00438;0.00438;0.004537;0.004698;0.004698;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.03049;0.03049;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[70]="3.439e+05;1.899e+05;1.105e+05;6.029e+04;3.015e+04;1.606e+04;8591;6316;2.337e+04;2.497e+04;5.416e+04;7.856e+04;1.034e+05;1.107e+05;9.237e+04;6.698e+04;6.081e+04;5.497e+04;5.234e+04;4.912e+04;4.388e+04;1.268e+04;4903;6655;7086;6869;6527;5762;5083;4190;3389;2.647e+04;2.631e+04;1.809e+04;1.261e+04;1.115e+04;8578;8582;3491;1767;653.6;316.9;291.8;869.1;830.8;777.6;1050;974.3;893.9;1029;884.6;556.9;263.1;145.9;49.23;22.68;7.631;7.307;40.73;20.27;11.2;6.879;3.176;1.758;0.6361;0.3381;0.1677;0.1172;0.09453;0.08153;0.0667;0.05797;0.05086;0.04628;0.04105;0.03686;0.03567;0.03559;0.03598;0.03745;0.03921;0.04351;0.04704";
atom[71]="Sc"; A_[71]=44.96; dens[71]=2.99; ene[71]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.44e-05;3.496e-05;3.552e-05;3.562e-05;3.61e-05;4.175e-05;4.376e-05;4.447e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0003986;0.0003988;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.004493;0.004493;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[71]="6.724e+04;5.949e+04;5.453e+04;4.866e+04;4.139e+04;3.347e+04;2.633e+04;1.955e+04;3.062e+04;6.089e+04;4.402e+05;4.466e+05;4.772e+05;4.34e+05;3.702e+05;3.186e+05;1.754e+05;5.82e+04;3.176e+04;2.949e+04;2.836e+04;2.501e+04;2.159e+04;1.856e+04;1.511e+04;1.213e+04;9441;7284;5476;4115;3871;3.685e+04;2.895e+04;2.314e+04;1.63e+04;1.132e+04;7721;5219;5238;1858;870.6;292.2;133.2;96.87;814.8;630.5;393.3;182.8;99.52;32.02;14.09;4.409;1.969;1.087;0.6932;0.3753;0.2577;0.1619;0.131;0.1052;0.09193;0.08305;0.07639;0.06675;0.05985;0.05347;0.04878;0.04243;0.03554;0.03202;0.02999;0.02878;0.02756;0.02715;0.02732;0.02804";
atom[72]="Se"; A_[72]=78.96; dens[72]=4.79; ene[72]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.657e-05;5.735e-05;5.748e-05;5.841e-05;6.723e-05;7.879e-05;9.235e-05;9.919e-05;0.0001008;0.0001024;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001198;0.001436;0.001436;0.001456;0.001476;0.001476;0.0015;0.001654;0.001654;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.01266;0.01266;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[72]="2.773e+05;2.617e+05;2.165e+05;1.82e+05;1.502e+05;1.156e+05;6.409e+04;3.34e+04;1.708e+04;8635;5452;6707;1.01e+04;1.064e+04;1.35e+04;1.491e+04;2.166e+04;3.096e+04;3.503e+04;3.602e+04;3.703e+04;3.918e+04;4.42e+04;4.631e+04;4.539e+04;4.173e+04;3.541e+04;2.953e+04;2.274e+04;1.749e+04;1.297e+04;9453;6780;4798;3359;2325;2317;1512;981.4;4347;4057;3907;5186;5336;4342;4915;3098;1116;525.2;289.6;177.3;81.16;44.14;23.18;158.9;103.3;48.18;15.96;7.184;3.864;2.341;1.09;0.6278;0.2703;0.1742;0.1144;0.09299;0.08129;0.0735;0.06314;0.05619;0.04999;0.04564;0.0401;0.03476;0.03247;0.03145;0.03105;0.03119;0.03186;0.03395;0.03599";
atom[73]="Si"; A_[73]=28.09; dens[73]=2.33; ene[73]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;9.97e-05;9.99e-05;0.0001082;0.0001164;0.0001183;0.0001202;0.0001222;0.0001242;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.001839;0.001839;0.002;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[73]="6.003e+05;5.144e+05;4.027e+05;2.669e+05;1.168e+05;3.679e+04;2.197e+04;1.845e+04;1.712e+04;1.581e+04;1.389e+04;1.244e+04;1.253e+04;8286;7322;7668;5.047e+04;6.447e+04;8.144e+04;8.587e+04;9.103e+04;9.65e+04;1.012e+05;1.05e+05;9.711e+04;9.279e+04;6.833e+04;4.888e+04;3.496e+04;2.427e+04;1.667e+04;1.153e+04;7946;5317;3521;2319;1531;1570;535.5;309.2;3192;2777;978.4;452.9;245;147;64.68;33.89;10.34;4.464;1.436;0.7012;0.4385;0.3207;0.2228;0.1835;0.1448;0.1275;0.1082;0.09614;0.08748;0.08077;0.07082;0.06361;0.05688;0.05183;0.0448;0.03678;0.0324;0.02967;0.02788;0.02574;0.02462;0.02352;0.02338";
atom[74]="Sm"; A_[74]=150.4; dens[74]=7.52; ene[74]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001282;0.0001303;0.0001324;0.0001345;0.0001367;0.0001389;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001039;0.00108;0.00108;0.001093;0.001106;0.001106;0.001253;0.00142;0.00142;0.0015;0.001541;0.001541;0.001629;0.001723;0.001723;0.002;0.003;0.004;0.005;0.006;0.006716;0.006716;0.007008;0.007312;0.007312;0.007521;0.007737;0.007737;0.008;0.01;0.015;0.02;0.03;0.04;0.04683;0.04683;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[74]="5251;6669;8090;9080;9884;2.262e+04;1.066e+05;1.08e+05;7.357e+04;5.446e+04;4.51e+04;3.924e+04;3.269e+04;2.602e+04;2.081e+04;1.439e+04;1.593e+04;2.194e+04;3.805e+04;8.591e+04;1.283e+05;9.888e+04;7.769e+04;6.104e+04;3.213e+04;1.974e+04;1.457e+04;1.204e+04;1.067e+04;9556;7715;6221;4919;3832;2924;2192;2107;1963;1827;2635;3837;5613;6852;6641;5262;6072;5358;5046;5355;4740;4189;4376;3120;1193;587.3;335.6;211.5;158.7;433.4;389.8;349.6;475.6;450.1;414.1;477.7;440.1;249.9;86.33;40.25;13.65;6.362;4.208;21;17.74;11.07;5.212;2.901;1.027;0.5192;0.2296;0.1466;0.1112;0.09218;0.07201;0.06106;0.05271;0.04773;0.0424;0.03868;0.03797;0.03833;0.03912;0.04124;0.04355;0.04899;0.05335";
atom[75]="Sn"; A_[75]=118.7; dens[75]=7.31; ene[75]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0004935;0.0005015;0.0005096;0.0005178;0.0005262;0.0005297;0.0005347;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.003929;0.003929;0.004;0.004156;0.004156;0.004308;0.004465;0.004465;0.005;0.006;0.008;0.01;0.015;0.02;0.0292;0.0292;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[75]="1.409e+05;1.083e+05;5.428e+04;2.155e+04;1.2e+04;1.051e+04;5.782e+04;5.391e+04;4.88e+04;6.475e+04;9.181e+04;1.169e+05;1.199e+05;1.136e+05;9.153e+04;5.779e+04;2.47e+04;8202;4641;6311;7398;7329;6497;5166;4192;5336;6801;8670;1.105e+04;1.382e+04;1.42e+04;1.473e+04;1.488e+04;1.305e+04;1.131e+04;8259;8157;3296;1665;614.3;311.4;928.5;939.3;846.9;1145;1060;971.2;1117;847.1;529.4;250;138.4;46.64;21.46;7.76;43.6;41.21;19.42;10.7;6.564;3.029;1.676;0.6091;0.326;0.1639;0.1156;0.09374;0.08113;0.06662;0.058;0.05095;0.04638;0.04112;0.03686;0.03561;0.03548;0.03583;0.03724;0.03895;0.04315;0.04662";
atom[76]="Sr"; A_[76]=87.62; dens[76]=2.54; ene[76]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.231e-05;2.267e-05;2.303e-05;2.341e-05;2.378e-05;2.417e-05;2.456e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.00194;0.00194;0.002;0.002007;0.002007;0.002109;0.002216;0.002216;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.0161;0.0161;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[76]="8225;8761;9918;1.228e+04;1.628e+04;2.654e+04;2.759e+04;5.471e+04;1.183e+05;2.531e+05;2.708e+05;2.893e+05;3.085e+05;3.497e+05;3.012e+05;1.76e+05;8.655e+04;3.756e+04;1.589e+04;6994;5043;4903;4848;5642;1.371e+04;2.61e+04;3.278e+04;3.494e+04;3.469e+04;2.876e+04;2.379e+04;1.815e+04;1.351e+04;9865;7091;5005;3497;3494;1347;720.7;2864;2589;2571;3577;3201;2842;3241;1525;729.7;405.8;249.6;115;62.74;20.79;17.14;110.8;63.86;21.57;9.818;5.306;3.214;1.481;0.8365;0.3369;0.2042;0.1247;0.09811;0.08443;0.0757;0.06447;0.05714;0.05072;0.0463;0.04079;0.03569;0.03365;0.03286;0.03268;0.03317;0.03414;0.03683;0.03927";
atom[77]="Ta"; A_[77]=180.9; dens[77]=16.65; ene[77]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;3.61e-05;3.668e-05;3.727e-05;3.788e-05;3.911e-05;3.974e-05;4.039e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.001735;0.001735;0.001764;0.001793;0.001793;0.002;0.002194;0.002194;0.002327;0.002469;0.002469;0.002586;0.002708;0.002708;0.003;0.004;0.005;0.006;0.008;0.009881;0.009881;0.01;0.01114;0.01114;0.01141;0.01168;0.01168;0.015;0.02;0.03;0.04;0.05;0.06;0.06742;0.06742;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[77]="7.296e+04;8.839e+04;1.004e+05;9.78e+04;7.979e+04;6.056e+04;4.397e+04;3.505e+04;5.311e+04;5.543e+04;5.839e+04;6.15e+04;6.424e+04;6.898e+04;7.148e+04;7.407e+04;7.799e+04;8.402e+04;6.199e+04;3.951e+04;2.724e+04;2.268e+04;2.097e+04;2.132e+04;2.111e+04;2.076e+04;2.06e+04;1.948e+04;1.816e+04;1.574e+04;1.363e+04;1.255e+04;1.042e+04;8747;6755;5101;3783;3510;1566;1154;1417;2053;3082;3421;3771;2985;3464;3003;2604;2768;2486;2233;2329;1838;922.2;532.8;338.2;163.9;95.99;244.3;237.9;179.1;244.9;239.3;218.2;251.8;134;63.34;21.87;10.25;5.717;3.569;2.652;11.8;7.587;4.302;1.531;0.7598;0.3149;0.1881;0.1352;0.1076;0.07981;0.06567;0.05545;0.04977;0.04413;0.04057;0.04018;0.04082;0.04188;0.04446;0.04717;0.0535;0.05852";
atom[78]="Tb"; A_[78]=158.9; dens[78]=8.23; ene[78]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001435;0.0001458;0.0001481;0.0001487;0.0001505;0.000153;0.0001554;0.000158;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001114;0.001241;0.001241;0.001258;0.001275;0.001275;0.0015;0.001611;0.001611;0.001688;0.001768;0.001768;0.001865;0.001968;0.001968;0.002;0.003;0.004;0.005;0.006;0.007514;0.007514;0.008;0.008252;0.008252;0.008477;0.008708;0.008708;0.01;0.015;0.02;0.03;0.04;0.05;0.052;0.052;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[78]="4230;5328;6465;7412;8449;1.119e+04;3.453e+04;8.18e+04;8.057e+04;6.34e+04;5.134e+04;4.163e+04;3.327e+04;2.82e+04;2.493e+04;2.2e+04;1.597e+04;9584;2.34e+04;6.003e+04;6.535e+04;8.193e+04;7.368e+04;6.188e+04;5.014e+04;3.261e+04;2.266e+04;1.778e+04;1.463e+04;1.25e+04;1.065e+04;8868;7326;5829;4462;3382;2529;2396;1956;1591;2337;3515;5023;5928;5314;4464;5164;4635;4166;4424;3929;3482;3638;3507;1354;669.7;383.8;242.3;136.8;365.8;313.3;288.1;392.5;368.4;344.1;397;281.5;98.02;45.88;15.63;7.288;4.064;3.672;17.77;12.23;5.826;3.253;1.151;0.5775;0.2498;0.1562;0.1167;0.09562;0.07365;0.06196;0.05321;0.04808;0.04272;0.03908;0.03848;0.03894;0.03981;0.04206;0.04449;0.05017;0.0547";
atom[79]="Tc"; A_[79]=98; dens[79]=11.5; ene[79]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002725;0.000277;0.0002807;0.0002814;0.000286;0.0002906;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002677;0.002677;0.002734;0.002793;0.002793;0.003;0.003043;0.003043;0.004;0.005;0.006;0.008;0.01;0.015;0.02;0.02104;0.02104;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[79]="5.019e+04;6.782e+04;8.339e+04;9.61e+04;1.021e+05;9.85e+04;8.753e+04;6.759e+04;4.504e+04;8.146e+04;1.244e+05;8.648e+04;4.678e+04;2.104e+04;9474;4974;4969;5617;5815;5342;5216;1.053e+04;1.229e+04;1.396e+04;1.431e+04;1.595e+04;1.767e+04;2.397e+04;2.447e+04;2.218e+04;1.821e+04;1.424e+04;1.041e+04;7488;5298;5356;2092;1044;507.2;1812;1699;1602;2223;1862;1800;2059;1036;583.6;361.9;168.3;92.31;30.76;14.1;12.29;74.81;29.93;13.81;7.521;4.571;2.099;1.169;0.4449;0.2534;0.1418;0.1066;0.08968;0.07935;0.06674;0.05876;0.05197;0.0474;0.04189;0.03705;0.03532;0.03482;0.03487;0.03578;0.03712;0.04055;0.04353";
atom[80]="Te"; A_[80]=127.6; dens[80]=6.24; ene[80]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001058;0.0001075;0.0001082;0.0001092;0.0001146;0.0001164;0.0001183;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0005729;0.0005731;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001003;0.001006;0.001006;0.0015;0.002;0.003;0.004;0.004341;0.004341;0.004475;0.004612;0.004612;0.004773;0.004939;0.004939;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.03181;0.03181;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[80]="3.2e+05;2.664e+05;2.014e+05;1.158e+05;7.218e+04;3.768e+04;1.722e+04;8557;5701;7015;2.269e+04;4.756e+04;7.911e+04;1.025e+05;1.118e+05;8.682e+04;7.855e+04;7.518e+04;7.107e+04;5.264e+04;4.57e+04;3.889e+04;1.966e+04;5137;4837;6333;7471;7712;7231;6165;4680;3924;4751;2.32e+04;1.863e+04;1.342e+04;1.138e+04;8789;8434;8380;8326;8684;3608;1832;679.2;329.7;267.8;788.2;750.4;699.5;944.5;878.2;806.2;929.2;901.4;572.1;270.2;150.1;50.78;23.41;7.878;6.738;37.19;20.64;11.45;7.041;3.255;1.801;0.6492;0.3429;0.1679;0.1163;0.09328;0.08022;0.06538;0.05669;0.04967;0.04518;0.04009;0.03606;0.03494;0.03492;0.03534;0.03683;0.0386;0.0429;0.04642";
atom[81]="Th"; A_[81]=232; dens[81]=11.72; ene[81]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;9.919e-05;0.0001008;0.0001024;0.0001041;0.0001075;0.0001082;0.0001092;0.000111;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001081;0.001168;0.001168;0.001246;0.001329;0.00133;0.0015;0.002;0.003;0.003332;0.003332;0.00341;0.003491;0.003491;0.004;0.004046;0.004046;0.004421;0.00483;0.00483;0.005;0.005182;0.005182;0.006;0.008;0.01;0.015;0.0163;0.0163;0.01792;0.01969;0.01969;0.02;0.02047;0.02047;0.03;0.04;0.05;0.06;0.08;0.1;0.1097;0.1097;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[81]="5.708e+04;4.131e+04;2.762e+04;1.917e+04;3.304e+04;8.089e+04;8.59e+04;7.558e+04;5.71e+04;3.636e+04;2.152e+04;1.331e+04;9159;6402;2.946e+04;2.696e+04;5.077e+04;9.563e+04;1.181e+05;1.195e+05;1.118e+05;1.024e+05;8.339e+04;3.289e+04;1.465e+04;5087;2617;2259;2246;2349;3734;6877;8686;8894;8596;7177;6304;6614;5747;4976;5048;4463;3937;4017;3161;1742;718;567.1;1394;1304;1226;1749;1253;1217;1415;1137;910.3;965.5;887.8;812.9;847.7;594.5;293.9;168.9;61.41;49.91;115.6;99.24;69.84;95.27;93.68;88.51;101.8;38.92;18.65;10.52;6.592;3.178;1.83;1.465;5.336;2.472;1.234;0.4939;0.2789;0.1895;0.1435;0.09861;0.07709;0.06251;0.05498;0.04812;0.04396;0.04347;0.04421;0.04542;0.04836;0.05149;0.05871;0.06447";
atom[82]="Ti"; A_[82]=47.88; dens[82]=4.54; ene[82]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.17e-05;4.175e-05;4.238e-05;4.306e-05;4.893e-05;5.138e-05;5.221e-05;5.305e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0004537;0.0004539;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.004966;0.004966;0.005;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[82]="2.096e+05;1.742e+05;1.485e+05;1.289e+05;1.249e+05;1.538e+05;1.684e+05;1.361e+05;1.47e+05;2.225e+05;2.232e+05;2.321e+05;2.417e+05;2.374e+05;2.096e+05;1.95e+05;1.814e+05;1.263e+05;5.701e+04;4.037e+04;3.583e+04;3.102e+04;2.519e+04;2.165e+04;1.795e+04;1.461e+04;1.105e+04;8425;6304;4513;3321;3296;3.029e+04;2.171e+04;1.774e+04;1.241e+04;8521;5794;5869;2096;986;332.3;151.7;83.8;687.8;683.8;432.3;202.3;110.7;35.87;15.85;4.972;2.214;1.213;0.7661;0.4052;0.2721;0.1649;0.1314;0.1043;0.09081;0.08191;0.07529;0.06572;0.05891;0.05263;0.04801;0.0418;0.03512;0.03173;0.02982;0.02868;0.02759;0.02727;0.02762;0.02844";
atom[83]="Tl"; A_[83]=204.4; dens[83]=11.85; ene[83]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002597;0.0002639;0.0002682;0.0002725;0.0002807;0.0002953;0.0003001;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002389;0.002389;0.002437;0.002485;0.002485;0.002711;0.002957;0.002957;0.003;0.003416;0.003416;0.003557;0.003704;0.003704;0.004;0.005;0.006;0.008;0.01;0.01266;0.01266;0.01364;0.0147;0.0147;0.015;0.01535;0.01535;0.02;0.03;0.04;0.05;0.06;0.08;0.08553;0.08553;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[83]="3.714e+04;1.831e+04;3.443e+04;4.15e+04;3.938e+04;4.35e+04;5.297e+04;6.533e+04;7.662e+04;8.236e+04;8.357e+04;7.828e+04;6.594e+04;4.803e+04;3.261e+04;2.054e+04;1.168e+04;7335;5664;7500;1.014e+04;1.157e+04;1.185e+04;1.214e+04;1.24e+04;1.275e+04;1.337e+04;1.358e+04;1.439e+04;1.455e+04;1.369e+04;1.207e+04;9944;8873;7259;5553;5008;2259;1231;835.2;1136;1582;2049;2364;2207;1958;2267;2188;1591;1687;1530;1392;1452;1212;706.8;451.8;220.8;126;69.57;169.3;147.3;113.9;157.2;149.7;141.6;163.2;83.61;29.29;13.85;7.751;4.838;2.332;1.976;8.046;5.398;1.957;0.9696;0.3923;0.2267;0.158;0.1226;0.08751;0.07031;0.05832;0.05187;0.04581;0.0421;0.04175;0.04248;0.04366;0.04647;0.04943;0.05622;0.06162";
atom[84]="Tm"; A_[84]=168.9; dens[84]=9.32; ene[84]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001684;0.0001711;0.0001739;0.0001743;0.0001767;0.0001796;0.0001825;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001211;0.001468;0.001468;0.0015;0.001515;0.001515;0.001689;0.001885;0.001885;0.002;0.00209;0.00209;0.002196;0.002307;0.002307;0.003;0.004;0.005;0.006;0.008;0.008648;0.008648;0.00912;0.009617;0.009617;0.01;0.01012;0.01012;0.015;0.02;0.03;0.04;0.05;0.05939;0.05939;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[84]="4463;4834;5570;6349;7090;7949;1.942e+04;6.94e+04;7.595e+04;6.28e+04;5.058e+04;4.027e+04;3.389e+04;3.046e+04;2.817e+04;2.607e+04;2.449e+04;2.177e+04;1.306e+04;1.82e+04;4.579e+04;4.512e+04;4.096e+04;3.547e+04;3.089e+04;2.203e+04;1.954e+04;1.686e+04;1.419e+04;1.266e+04;1.118e+04;9424;7385;5671;4251;3152;2899;1995;1362;1919;3937;4145;4830;4446;3668;4254;3686;3326;3534;3160;2821;2945;1594;794.6;456.9;289.2;139.7;114.6;299.1;260.9;227.4;310.1;283;274.5;316.7;115.7;54.53;18.68;8.735;4.867;3.122;12;14.09;6.741;3.78;1.34;0.6682;0.2822;0.1722;0.1261;0.1018;0.07693;0.06404;0.05455;0.04912;0.04362;0.04002;0.03954;0.0401;0.04108;0.04352;0.04612;0.05216;0.05698";
atom[85]="U"; A_[85]=238; dens[85]=18.95; ene[85]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;9.761e-05;9.919e-05;0.0001082;0.000111;0.0001128;0.0001146;0.0001164;0.0001183;0.0001202;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.001022;0.001045;0.001045;0.001153;0.001273;0.001273;0.001354;0.001441;0.001441;0.0015;0.002;0.003;0.003552;0.003552;0.003639;0.003728;0.003728;0.004;0.004303;0.004303;0.005;0.005182;0.005182;0.005362;0.005548;0.005548;0.006;0.008;0.01;0.015;0.01717;0.01717;0.02;0.02095;0.02095;0.02135;0.02176;0.02176;0.03;0.04;0.05;0.06;0.08;0.1;0.1156;0.1156;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[85]="2.876e+04;2.203e+04;1.697e+04;1.304e+04;2.045e+04;7.551e+04;8.438e+04;7.824e+04;6.853e+04;5.952e+04;4.612e+04;3.321e+04;2.128e+04;1.128e+04;3823;1.466e+04;3.319e+04;2.017e+04;2.001e+04;1.335e+05;1.458e+05;1.457e+05;1.301e+05;1.086e+05;6.849e+04;2.683e+04;1.269e+04;5740;3218;2196;1942;2093;3230;5383;6287;6617;8053;7147;6626;6375;6127;6519;5446;4526;4589;4065;3598;3668;3382;1865;769.2;525.7;1266;1188;1112;1582;1329;1110;1292;889.1;811.8;861.1;791.5;728.2;759.2;628.4;310.8;179.1;65.28;46.63;107;71.06;63;88.38;95.15;80.23;92.22;41.28;19.83;11.21;7.035;3.395;1.954;1.378;4.893;2.591;1.298;0.5192;0.2922;0.1976;0.149;0.1016;0.07896;0.0637;0.05587;0.04878;0.04447;0.04392;0.04463;0.04583;0.04879;0.05195;0.05927;0.06512";
atom[86]="V"; A_[86]=50.94; dens[86]=6.11; ene[86]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.039e-05;4.104e-05;4.17e-05;4.175e-05;4.238e-05;4.306e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.000512;0.0005122;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.003;0.004;0.005;0.005465;0.005465;0.006;0.008;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[86]="8.794e+04;1.197e+05;1.412e+05;1.514e+05;1.416e+05;1.051e+05;7.228e+04;4.904e+04;4.93e+04;7.223e+04;8.026e+04;8.919e+04;8.975e+04;9.734e+04;1.062e+05;1.307e+05;1.011e+05;6.538e+04;4.573e+04;3.809e+04;3.376e+04;2.996e+04;2.542e+04;2.123e+04;1.693e+04;1.311e+04;9896;7277;5254;3689;2870;2.56e+04;2.376e+04;1.857e+04;1.346e+04;9331;6387;6495;2342;1106;374.3;171.2;92.91;72.77;587;468.7;221.7;121.8;39.83;17.68;5.564;2.472;1.347;0.8438;0.4371;0.2877;0.1682;0.1318;0.1034;0.08965;0.08074;0.07414;0.06466;0.05794;0.05175;0.04722;0.04115;0.03466;0.03141;0.0296;0.02855;0.02759;0.02738;0.02786;0.02877";
atom[87]="W"; A_[87]=183.8; dens[87]=19.35; ene[87]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.17e-05;4.175e-05;4.238e-05;4.306e-05;4.376e-05;4.592e-05;4.666e-05;4.741e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.001809;0.001809;0.00184;0.001872;0.001872;0.002;0.002281;0.002281;0.002423;0.002575;0.002575;0.002694;0.00282;0.00282;0.003;0.004;0.005;0.006;0.008;0.01;0.01021;0.01021;0.01085;0.01154;0.01154;0.01182;0.0121;0.0121;0.015;0.02;0.03;0.04;0.05;0.06;0.06953;0.06953;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[87]="4.407e+04;5.509e+04;6.181e+04;6.817e+04;6.703e+04;5.742e+04;4.325e+04;3.125e+04;2.539e+04;4.395e+04;4.426e+04;4.846e+04;5.343e+04;5.794e+04;6.864e+04;7.222e+04;7.6e+04;7.864e+04;7.135e+04;4.041e+04;2.654e+04;2.014e+04;1.801e+04;1.884e+04;1.918e+04;1.952e+04;1.934e+04;1.905e+04;1.826e+04;1.62e+04;1.433e+04;1.298e+04;1.085e+04;9000;7063;5330;3956;3683;1643;1108;1327;1911;2901;3170;3922;2828;3279;2833;2445;2599;2339;2104;2194;1902;956.4;553.4;351.4;170.5;96.91;92.01;233.4;198.3;168.9;231.2;226.8;206.5;238.2;138.9;65.73;22.73;10.67;5.949;3.713;2.552;11.23;7.81;4.438;1.581;0.7844;0.3238;0.1925;0.1378;0.1093;0.08066;0.06618;0.05577;0.05;0.04433;0.04075;0.04038;0.04103;0.0421;0.04472;0.04747;0.05384;0.05893";
atom[88]="Xe"; A_[88]=131.3; dens[88]=5.9; ene[88]="1e-05;1.172e-05;1.252e-05;1.272e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.431e-05;6.535e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001222;0.0001242;0.0001262;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0006763;0.0006765;0.0007277;0.0008529;0.0009997;0.001;0.001072;0.001149;0.001149;0.0015;0.002;0.003;0.004;0.004782;0.004782;0.005;0.005104;0.005104;0.005275;0.005453;0.005453;0.006;0.008;0.01;0.015;0.02;0.03;0.03456;0.03456;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[88]="1e-10;1e-10;4.766e+04;1.99e+05;2.774e+05;2.694e+05;1.884e+05;1.225e+05;6.445e+04;3.341e+04;1.564e+04;8549;6358;6381;2.176e+04;3.595e+04;3.13e+04;6.502e+04;1.172e+05;1.131e+05;6.49e+04;5.671e+04;4.956e+04;4.74e+04;1.261e+04;4291;4785;6491;7599;7244;6453;5526;4338;3426;2987;1.897e+04;1.58e+04;1.072e+04;9479;9413;8151;7035;7338;4085;2088;778;378.7;240.8;694.1;639.2;604.4;818.1;757.9;699.1;806.4;637.6;303.2;169;57.43;26.52;8.93;6.129;33.16;22.7;12.72;7.825;3.633;2.011;0.7202;0.376;0.1797;0.1223;0.09699;0.08281;0.06696;0.05785;0.05054;0.04594;0.04078;0.03681;0.03577;0.03583;0.03634;0.03797;0.03987;0.04445;0.04815";
atom[89]="Y"; A_[89]=88.91; dens[89]=4.47; ene[89]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;2.704e-05;2.748e-05;2.792e-05;2.837e-05;2.883e-05;2.977e-05;3.026e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.00208;0.00208;0.002117;0.002155;0.002156;0.002261;0.002373;0.002373;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.01704;0.01704;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[89]="9.077e+04;8.464e+04;6.347e+04;3.789e+04;2.376e+04;2.153e+04;3.749e+04;5.777e+04;8.322e+04;1.199e+05;1.727e+05;2.349e+05;2.598e+05;2.732e+05;2.752e+05;2.294e+05;1.27e+05;5.251e+04;2.052e+04;8888;5256;4765;4912;4978;6647;1.427e+04;2.682e+04;2.99e+04;3.051e+04;2.937e+04;2.614e+04;1.969e+04;1.45e+04;1.065e+04;7587;5313;3663;3864;1493;742.2;673.8;2627;2466;2342;3264;2916;2597;2962;1654;793.6;442.4;272.5;125.8;68.71;22.79;16.12;102.9;68.55;23.3;10.65;5.764;3.493;1.607;0.9047;0.3595;0.2149;0.1289;0.1006;0.08613;0.07703;0.06546;0.05795;0.05141;0.04692;0.04137;0.03628;0.03428;0.03355;0.03341;0.03399;0.03504;0.0379;0.04048";
atom[90]="Yb"; A_[90]=173; dens[90]=6.9; ene[90]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;2.704e-05;2.748e-05;2.792e-05;2.837e-05;2.883e-05;2.93e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.001528;0.001528;0.001552;0.001576;0.001576;0.001753;0.00195;0.00195;0.002;0.002173;0.002173;0.002283;0.002398;0.002398;0.003;0.004;0.005;0.006;0.008;0.008944;0.008944;0.009447;0.009978;0.009978;0.01;0.01049;0.01049;0.015;0.02;0.03;0.04;0.05;0.06;0.06133;0.06133;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[90]="5285;4944;5627;6407;7190;7701;1.457e+04;2.988e+04;4.321e+04;5.752e+04;7.039e+04;8.263e+04;9.072e+04;9.769e+04;9.532e+04;7.001e+04;5.355e+04;4.452e+04;3.819e+04;3.394e+04;2.977e+04;2.867e+04;2.761e+04;2.661e+04;2.541e+04;2.371e+04;2.154e+04;1.867e+04;1.63e+04;1.4e+04;1.179e+04;9680;7738;5940;4463;3289;3017;1350;1300;1965;2949;3908;4540;4200;3495;4054;3797;3128;3323;2970;2652;2769;1640;819.3;471.7;298.8;144.4;108.8;282.4;251.1;212.8;290.6;289.3;257.7;297.3;119.3;56.28;19.32;9.04;5.038;3.147;2.975;13.65;6.909;3.881;1.378;0.686;0.2882;0.1749;0.1274;0.1025;0.0771;0.06397;0.05439;0.04895;0.04347;0.03989;0.03944;0.04002;0.04101;0.04347;0.04609;0.05218;0.057";
atom[91]="Zn"; A_[91]=65.39; dens[91]=7.13; ene[91]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001367;0.0001389;0.0001412;0.0001435;0.0001458;0.0001487;0.0001743;0.0002043;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.00101;0.00102;0.00102;0.001031;0.001043;0.001043;0.001116;0.001194;0.001194;0.0015;0.002;0.003;0.004;0.005;0.006;0.008;0.009659;0.009659;0.01;0.015;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[91]="1.427e+05;8.118e+04;6.32e+04;5.942e+04;6.301e+04;6.825e+04;7.478e+04;8.222e+04;8.914e+04;9.435e+04;9.386e+04;9.008e+04;8.406e+04;7.765e+04;7.227e+04;6.791e+04;6.162e+04;5.66e+04;5.689e+04;5.755e+04;5.823e+04;5.859e+04;5.751e+04;4.958e+04;4.111e+04;3.152e+04;2.412e+04;1.826e+04;1.361e+04;9604;6504;4529;3200;2228;1558;1553;1518;1484;3804;5097;6518;8274;8452;7371;8396;4825;2375;831.1;386.5;211.8;129;58.75;35.05;253.6;233.1;81.17;37.19;12.07;5.384;2.892;1.76;0.8364;0.4973;0.2341;0.1617;0.1141;0.09539;0.0845;0.07695;0.06656;0.05941;0.05296;0.04834;0.04235;0.03634;0.0336;0.03225;0.0316;0.03138;0.03175;0.03335;0.03509";
atom[92]="Zr"; A_[92]=91.22; dens[92]=6.51; ene[92]="1e-05;1.172e-05;1.374e-05;1.61e-05;1.887e-05;2.212e-05;2.593e-05;3.039e-05;3.562e-05;4.175e-05;4.306e-05;4.376e-05;4.447e-05;4.519e-05;4.893e-05;5.735e-05;6.723e-05;7.879e-05;9.235e-05;0.0001082;0.0001269;0.0001487;0.0001743;0.0002009;0.0002042;0.0002043;0.0002075;0.0002395;0.0002807;0.000329;0.0003856;0.0004519;0.0005297;0.0006208;0.0007277;0.0008529;0.0009997;0.001;0.0015;0.002;0.002222;0.002222;0.002264;0.002307;0.002307;0.002417;0.002532;0.002532;0.003;0.004;0.005;0.006;0.008;0.01;0.015;0.018;0.018;0.02;0.03;0.04;0.05;0.06;0.08;0.1;0.15;0.2;0.3;0.4;0.5;0.6;0.8;1;1.25;1.5;2;3;4;5;6;8;10;15;20"; att[92]="1.898e+05;1.994e+05;1.688e+05;1.29e+05;9.336e+04;7.118e+04;6.595e+04;9.742e+04;1.589e+05;1.804e+05;1.649e+05;1.529e+05;1.405e+05;1.292e+05;8.513e+04;3.696e+04;1.586e+04;8001;5277;5019;5252;5324;6170;1.441e+04;1.632e+04;1.638e+04;1.802e+04;2.554e+04;2.712e+04;2.672e+04;2.393e+04;1.988e+04;1.636e+04;1.248e+04;8954;6322;4122;4210;1631;811.5;625.8;2392;2239;2120;2953;2641;2359;2691;1772;850.7;475.5;293.5;135.6;74.17;24.63;15.01;94.7;72.37;24.85;11.39;6.173;3.744;1.721;0.9658;0.379;0.2237;0.1318;0.1018;0.08693;0.07756;0.06571;0.0581;0.0515;0.047;0.04146;0.03644;0.03451;0.03384;0.03374;0.03441;0.03554;0.03855;0.04122";
var compounds=";AgBr;6.473|;AlAs;3.81|Sapphire;Al2O3;3.97|;AlP;2.42|;B4C;2.52|;BeO;3.01|;BN;2.25|Polyimide;C22H10N2O5;1.43|Polypropylene;C3H6;0.90|PMMA;C5H8O2;1.19|Polycarbonate;C16H14O3;1.2|Kimfol;C16H14O3;1.2|Mylar;C10H8O4;1.4|Teflon;C2F4;2.2|Parylene-C;C8H7Cl;1.29|Parylene-N;C8H8;1.11|Fluorite;CaF2;3.18|;CdWO4;7.9|;CdS;4.826|;CoSi2;5.3|;Cr2O3;5.21|;CsI;4.51|;CuI;5.63|;InN;6.88|;In2O3;7.179|;InSb;5.775|;IrO2;11.66|;GaAs;5.316|;GaN;6.10|;GaP;4.13|;HfO2;9.68|;LiF;2.635|;LiH;0.783|;LiOH;1.43|;MgF2;3.18|;MgO;3.58|;Mg2Si;1.94|Mica;KAl3Si3O12H2;2.83|;MnO;5.44|;MnO2;5.03|;MoO2;6.47|;MoO3;4.69|;MoSi2;6.31|Salt;NaCl;2.165|;NbSi2;5.37|;NbN;8.47|;NiO;6.67|;Ni2Si;7.2|;Ru2Si3;6.96|;RuO2;6.97|;SiC;3.217|;Si3N4;3.44|Silica;SiO2;2.2|Quartz;SiO2;2.65|;TaN;16.3|;TiN;5.22|;Ta2Si;14.|Rutile;TiO2;4.26|ULE;Si.925Ti.075O2;2.205|;UO2;10.96|;VN;6.13|Water;H2O;1.0|;WC;15.63|Zerodur;Si.56Al.5P.16Li.04Ti.02Zr.02Zn.03O2.46;2.53|;ZnO;5.675|;ZnS;4.079|;ZrN;7.09|Zirconia;ZrO2;5.68|;ZrSi2;4.88";
-->
</script>
</head>
<body>
<table id="content"><tbody><tr>
<td>
<div id="xdrawer" class="drawer"><div>
<div class="poped" id="xlog" onclick="swap(this)"><input type="button" Value=""></input> Log scale</div>
<div class="pushed" id="xgrid" onclick="swap(this)"><input type="button"></input> Display grid</div>
<div class="pushed" id="xauto" onclick="swap(this)"><input type="button"></input> Automatic limits</div>
<input type="text" id="xmn" size="6" disabled="1" onchange="go(this)"></input>
to <input type="text" id="xmx" size="6" disabled="1" onchange="go(this)"></input> keV
</div></div>
<div id="ydrawer" class="drawer"><div>
<div class="poped" id="ylog" onclick="swap(this)"><input type="button" Value=""></input> Log scale</div>
<div class="pushed" id="ygrid" onclick="swap(this)"><input type="button"></input> Display grid</div>
<div class="pushed" id="yauto" onclick="swap(this)"><input type="button"></input> Automatic limits</div>
<input type="text" id="ymn" size="6" disabled="1" onchange="go(this)"></input>
to <input type="text" id="ymx" size="6" disabled="1" onchange="go(this)"></input>
</div></div>
<div id="ldrawer" class="drawer"><div>
<b style="font-size:15px">Paste here previously saved plot info</b><br/>
<textarea id="loadarea" cols="55" rows="18" style="resize:none"></textarea><br/>
<input id="okb" type="button" value="Ok" style="background-color:#E9E0DB;border:1px solid #C9A798"></input>
</div></div>
<div id="sdrawer" class="drawer"></div>
<div id="hdrawer" class="drawer"><div>
<b style="font-size:15px">X-ray filter transmission - F. Pérez</b><br/>
Data from both NIST and Henke tables, joined at 10 keV.<br/><br/>
<b>How to enter input</b><br/><br/>
Each line is a filter stack that can contain several filters, separated by either of the characters<br/>
<div class="code"> & , / + </div>
For example:<br/>
<div class="code">filter1 + filter2 + filter3</div>
Each filter must be formatted in 3 parts:<br/>
<div class="code">thickness units material</div>
Optionally, density can be indicated in parentheses, with units:<br/>
<div class="code">thickness units material (density units)</div>
For example:<br/>
<div class="code">10 um Cu (4 g/cc)</div><br/>
<b>Available materials</b><br/><br/>
Elements of the periodical table up to uranium are available by their chemical denomination (Al, Fe, Si, etc.) using their density in normal condition as default.<br/><br/>
Compounds can be formed using usual chemical denomination such as SiO2, CH4, etc. In this case a density (in parentheses) has to be provided.<br/><br/>
<b>Plotting options</b><br/><br/>
Limits, log scale and grid options are available from the menu.<br/><br/>
Click on the top-left colored lines to change the line style.<br/><br/>
Some plot elements are draggable.<br/><br/>
Click on the graph for a more precise cursor.<br/><br/>
</div></div>
<div id="cdrawer" class="drawer"><div>
<table id="compt"></table>
</div></div>
<div id="bar">
<br/>
<input type="button" class="barnormal" id="go" value=" Replot ⇧+↵" onclick="go(this)"></input><br/>
<br/>
<input type="button" class="barnormal" id="xaxis" value=" X axis " onclick="drawer(this,'xdrawer')"></input><br/>
<input type="button" class="barnormal" id="yaxis" value=" Y axis " onclick="drawer(this,'ydrawer')"></input><br/>
<br/>
<input type="button" class="barnormal" id="print" value=" Print " onclick="print()"></input><br/>
<input type="button" class="barnormal" id="data" value=" Get data " onclick="data()"></input><br/>
<input type="button" class="barnormal" id="load" value=" Load " onclick="load(); drawer(this,'ldrawer')"></input><br/>
<input type="button" class="barnormal" id="store" value=" Store " onclick="store(); drawer(this,'sdrawer')"></input><br/>
<br/>
<input type="button" class="barnormal" id="help" value=" Help " onclick="drawer(this,'hdrawer')"></input><br/>
<input type="button" class="barnormal" id="compounds" value=" Compounds " onclick="drawer(this,'cdrawer')"></input><br/>
<br/>
<div class="barsmall"><input type="button" value="A" onclick="changeFontSize(event,-1);" style="font-size:10px;"></input></div>
<div class="barsmall"><input type="button" value="A" onclick="changeFontSize(event,+1);" style="font-size:14px;"></input></div>
<br/>
<input type="button" class="barnormal" id="reset" value=" Reset " onclick="makeCookie('',-1);reset()"></input><br/>
<br/>
</div>
</td>
<td>
<div id="dummyBG" style="position:relative; width:610px; height:450px;">
<div style="position:fixed;top:0;left:0">
<svg id="plot" style="width:100%;height:100%;position:fixed;top:0;left:0;bottom:0;right:0;" preserveAspectRatio="none" onclick="drawer()"></svg>
</div>
<div style="position:relative; padding:10px; z-index:0; width:610px;">
<svg id="linestyle" style="float:left" width="30px" height="1px"></svg>
<textarea id="box" rows="2" onkeyup="limitLines(this,event)" onkeydown="preventCR(this,event)" style="line-height:1.1; font-Size:12px; resize:none; width:510px;">10um Al + 1mil Be
0.2cm Be / 20um SiO2 (4.2 g/cc)</textarea>
</div>
<div id="errors"></div>
</div>
</td>
</tr></tbody></table>
<script language="javascript">
<!--
// Build the energies array
var nrjs = 500, Emin, Emax, Tmin, Tmax;
var nrj = new Array(nrjs), weight = new Array(nrjs);
var trans = new Array(), text, xyBox;
// HTML elements
var errs = document.getElementById("errors");
var dBG = document.getElementById("dummyBG");
var im = document.getElementById("plot");
var sty = document.getElementById("linestyle");
var bar = document.getElementById('bar');
var but = collection2array(bar.getElementsByClassName('barnormal'));
var dra = collection2array(document.getElementsByClassName('drawer'));
im.addEventListener("mousemove", mouseMove, false);
im.addEventListener("mouseup", mouseUp, false);
document.onscroll = function() {
var b=bar.getBoundingClientRect();
im.setAttribute("transform","translate("+(b.left)+","+(b.top)+")");
}
// plot parameters
var x1, x2, y1, y2; // plot position
var TitleFontSize, TickFontSize, LegendFontSize,SupFontSize,SupShift;
var BoxWidth, TickWidth, GridWidth, LegendBoxWidth;
var TickLength, MinorTickLength, LegendLength;
var LegendMargin, LegendPadding;
var lx1, ly1, lx2, ly2; // Legend position
var t1x, t1y, t2x, t2y; // Titles positions
var x_auto, y_auto, x_log, y_log, x_grid, y_grid, legend_auto;
var text = [];
// Color for curves
var ccode=new Array(6), nc1, nc2, nc3;
var color=new Array(6), dash=new Array(6);
var CurveWidth, CurveDash, CurveName=new Array(6);
// Default parameters settings
reset();
// Load compounds
var out='', compound;
compounds=compounds.split('|');
for(var i=0;i<compounds.length;i+=1) {
m=compounds[i].split(';');
compound = m[1]+' ('+m[2]+' g/cc)';
out+='<tr><td>'+m[0]+'</td><td>'+compound+'<a onclick="addCompound(\''+compound+'\')">⇒</a></td></tr>';
}
document.getElementById("compt").innerHTML='<tbody>'+out+'</tbody>';
// Load cookie if exists
loadCookie();
// First initialization and go
changeFontSize();
// Setup the thing
function go(e) {
// Get plot parameters
var exmn=document.getElementById("xmn"),eymn=document.getElementById("ymn");
var exmx=document.getElementById("xmx"),eymx=document.getElementById("ymx");
var exauto=document.getElementById("xauto"),eyauto=document.getElementById("yauto");
// Manage Auto limits
if(x_auto) { // if x in auto mode
exmn.disabled=true; exmx.disabled=true;
} else {
exmn.disabled=false; exmx.disabled=false;
Emin=parseFloat(exmn.value)*1000; if(isNaN(Emin)) {Emin=1.e2;}
Emax=parseFloat(exmx.value)*1000; if(isNaN(Emax)) {Emax=1.e6;}
if(Emin>Emax) {Em=Emin; Emin=Emax; Emax=Em;}
}
if(y_auto) { // if y in auto mode
eymn.disabled=true; eymx.disabled=true;
} else {
eymn.disabled=false; eymx.disabled=false;
Tmin=parseT(eymn.value); if(isNaN(Tmin)) {Tmin=0;}
Tmax=parseT(eymx.value); if(isNaN(Tmax)) {Tmax=1;}
if(Tmin>Tmax) {Tm=Tmin; Tmin=Tmax; Tmax=Tm;}
}
// Go for the calculation and plot
calculate();
// Get new plot limits if modified
exmn.value=''+parseFloat((Emin/1000).toExponential(2));
exmx.value=''+parseFloat((Emax/1000).toExponential(2));
eymn.value=''+Tmin;
eymx.value=''+Tmax;
}
// Calculates the thing
function calculate() {
errs.innerHTML='';
var transmin=1.,transmax=0., par, qua, quatot, mat, coeff, cname;
// Parse filter stack info
text = document.getElementById("box").value;
text = text.split("\n");
// One or two passes
var passes=1;
if (x_auto) { passes=2; Emin = 1.e2; Emax=1.e6; }
if (x_log && Emin<=0.) { Emin=1.e2; }
for(p=0;p<passes;p=p+1) {
trans.length=0;
// Initialize energies
if(x_log) { nrj=logspace(Emin,Emax,nrjs); }
else { nrj=linspace(Emin,Emax,nrjs); }
if(p==0 && x_auto) {Emin = 1.e300; Emax = 0.;}
error = 'Nothing to display';
for(i=0;i<text.length;i=i+1) { // For each line
trans[i] = new Array(nrjs);
for(k=0;k<nrjs;k=k+1) { trans[i][k]=0.; } // zeros array
// Find delimiters and split
line = text[i].replace(/([^eE])[+]/g,'$1,').replace(/([A-Za-z][eE])[+]/g,'$1,'); // careful with "+" delimiter
line = line.replace(/[&]/g,',').replace(/([^g])\//g,'$1,'); // replace remaining delimiters by ','
if(line.replace(/\s/g,"")==="") { text.splice(i,1); i=i-1; continue; } // remove if empty
line = line.split(',');
error = ''; cname='';
for(j=0;j<line.length;j=j+1) { // For each filter
par = /\([^)]+\)/.exec(line[j]); // find stuff in parenthesis
if (par!=null) { // if something in parenthesis, it is density
line[j] = line[j].replace(par[0],''); // Remove
par = par[0].replace(/[()]/g,''); // Keep it aside for later
}
foil = line[j].replace(/\s+$/,''); // trim right
// Parse material
n=foil.lastIndexOf(" ");
el=foil.substring(n).replace(/\s/g,'');
t=atom.indexOf(el); // index of the material
if(t<0) { // If not found, try to split compound (e.g. SiO2)
mat = el.replace(/([A-Z])/g,' $1').replace(/^\s+/,'').split(' ');
qua = new Array(mat.length); quatot=0;
t = new Array(mat.length);
for (var m=0;m<mat.length;m++) {
mat[m] = mat[m].replace(' ','').replace(/([0-9.]+)/,' $1').split(' ');
qua[m] = parseFloat(mat[m][1]) || 1; // relative quantity
mat[m] = mat[m][0]; // element name
t[m] = atom.indexOf(mat[m]); // element index
qua[m] = qua[m]*A_[t[m]]; // now relative mass
quatot = quatot+qua[m]; // total mass
if(t<0) { error='line '+(i+1)+': cannot understand material "'+el+'".'; break; }
}
if(error.length>0) {break;}
} else { // If not a compound, use only 1 element
t = [t]; mat = [el]; qua = [1]; quatot = 1;
}
// Rest of the info
foil=foil.substring(0,n);
n=foil.replace(/[^0-9eE\s\+\-\.]/g,"!").indexOf("!");
thk=foil.substring(0,n).replace(/\s/g,''); //thickness
unit=foil.substring(n).replace(/\s/g,''); // units
thk=toCm(parseFloat(thk),unit); // change to centimeters
if(isNaN(thk)) { // Error?
error='line '+(i+1)+': cannot understand "'+foil+'".';
break;
}
if(j>0) cname+=' / ';
cname+=cm2whatever(thk)+' '+el; // 'name' of this filter
// Use entered density or default density
if (par!=null) { // density has been defined in parentheses.
par=par.replace(/cm[-]?\^?3/,'').replace('cc',''); // manage units
par=par.replace(/m[-]?\^?3/,'*1e-6');
par=par.replace('kg','*1e3').replace('mg','*1e-3').replace('g','');
par=par.replace(/[\/]/g,'');
try { dens_ = eval(par); } // dens_ should be the density in g/cc now
catch(err) { error = 'line '+(i+1)+': cannot understand value in parentheses.'; break;}
} else { // density was not defined.
if (t.length>1) { // if compound, then issue error.
error='line '+(i+1)+': please specify density for compound "'+el+'".';
break;
}
dens_=dens[t[0]];
}
// Now get the data and convert to numbers
for(var m=0;m<mat.length;m++) { // for each elements in the compound
ene_=ene[t[m]].split(';');
att_=att[t[m]].split(';');
dade=new Array(att_.length);
att_[0]=parseFloat(att_[0]);
ene_[0]=parseFloat(ene_[0])*1.e6;
for(l=1;l<att_.length;l=l+1) {
att_[l]=parseFloat(att_[l]);
ene_[l]=parseFloat(ene_[l])*1.e6;
dade[l-1]=Math.log(att_[l]/att_[l-1])/Math.log(ene_[l]/ene_[l-1]); //log derivative
}
// For each energy, calculate total attenuation
l = 0; // l is current position in ene_ array
coeff = dens_*thk*qua[m]/quatot;
for(k=0;k<nrjs;k=k+1) {
while(nrj[k]<ene_[l ]) { trans[i][k]=1.e20; k=k+1; }
while(nrj[k]>ene_[l+1]) { l=l+1; }
a=Math.log(att_[l])+dade[l]*Math.log(nrj[k]/ene_[l]); //interpolation
trans[i][k]=trans[i][k]+coeff*Math.exp(a);
}
}// for each element in compound
} // for each filter
if(error.length>0) {break;}
// Automated legends
if(legend_auto) { CurveName[i]=cname; }
// Calculate total transmission
for(k=0;k<nrjs;k=k+1) {
trans[i][k]=Math.exp(-trans[i][k]);
if(trans[i][k]<transmin) {transmin=trans[i][k];}
if(trans[i][k]>transmax) {transmax=trans[i][k];}
}
// find 'interesting' region of the spectrum
if(p<passes-1 && x_auto) {
sumw=0.; lEmean=0.; lEsigma=0.; coeff=64;
for(k=0;k<nrjs;k=k+1) {
weight[k]=Math.exp(-coeff*Math.pow(trans[i][k]-0.5,2));
if(isNaN(weight[k])) {weight[k]=0.;}
if(trans[i][nrjs-1]-trans[i][k]<0.1) {weight[k]=weight[k]*weight[k];}
sumw=sumw+weight[k];
}
if (x_log) {
for(k=0;k<nrjs;k=k+1) { lEmean+=weight[k]*Math.log(nrj[k]); }
lEmean = lEmean/sumw;
for(k=0;k<nrjs;k=k+1) { lEsigma+=weight[k]*Math.pow(Math.log(nrj[k])-lEmean,2); }
lEsigma=Math.sqrt(lEsigma/sumw);
prec=Math.LN10/2.; // precision factor
Emin = Math.min(Emin,Math.exp(Math.floor((lEmean-5*lEsigma)/prec)*prec));
Emax = Math.max(Emax,Math.exp(Math.ceil ((lEmean+3*lEsigma)/prec)*prec));
} else {
for(k=0;k<nrjs;k=k+1) { lEmean+=weight[k]*nrj[k]; }
lEmean = lEmean/sumw;
for(k=0;k<nrjs;k=k+1) { lEsigma+=weight[k]*Math.pow(nrj[k]-lEmean,2); }
lEsigma=Math.sqrt(lEsigma/sumw);
prec=10.; // precision factor
Emin = 0.;
Emax = Math.max(Emax,Math.ceil ((lEmean+3*lEsigma)/prec)*prec);
}
Emin = Math.max(Emin,0.);
Emax = Math.min(Emax,1.e7);
}
} // For each line
if(error.length>0) {errs.innerHTML=error; return;}
} // Several passes
if (y_auto) { // Automatic Y limits
l=ndec(transmin); Tmin=Math.floor(transmin/l)*l;
l=ndec(transmax); Tmax=Math.ceil(transmax/l)*l;
if(transmin/transmax<1e-4) { Tmin=y_log?1e-5:0.; }
}
plot();
}
// Plots the thing
function plot(attempt) {
if(attempt==undefined) {attempt=0;}
var ncurves=text.length,lx,ly,rect,e,ee,xt1,xt2,xt,yt1,yt2,yt;
plotStyles();
// Empty the graphic
while (im.hasChildNodes()) { im.removeChild(im.lastChild); }
// Calculate ticks positions
if (x_log) { xt1=log10(Emin); xt2=log10(Emax); xt=logticks(xt1,xt2); }
else { xt1=Emin; xt2=Emax; xt=ticks(xt1,xt2); }
lx=(x2-x1)/(xt2-xt1);
if (y_log) { yt1=log10(Tmin); yt2=log10(Tmax); yt=logticks(yt1,yt2); }
else { yt1=Tmin; yt2=Tmax; yt=ticks(yt1,yt2); }
ly=(y2-y1)/(yt2-yt1);
// Plot grid
if (x_grid) {
for(i=0;i<xt.length;i=i+1) {
xx = x1+lx*(xt[i]-xt1);
im.svgLine(xx,y1,xx,y2,"grey",GridWidth);
}
}
if (y_grid) {
for(i=0;i<yt.length;i=i+1) {
yy = y2-ly*(yt[i]-yt1);
im.svgLine(x1,yy,x2,yy,"grey",GridWidth);
}
}
// Plot curves
for(i=0;i<ncurves;i=i+1){
curve(nrj,trans[i],Emin,Emax,Tmin,Tmax,i); }
// X Axes and Ticks
var ax1 = document.createElementNS(svgns,"g"); im.appendChild(ax1); ax1.id="ax1";
var ax2 = document.createElementNS(svgns,"g"); im.appendChild(ax2); ax2.id="ax2";
ax1.svgLine(x1-BoxWidth/2,y1,x2+BoxWidth/2,y1,"black",BoxWidth);
ax2.svgLine(x1-BoxWidth/2,y2,x2+BoxWidth/2,y2,"black",BoxWidth);
for(i=0;i<xt.length;i+=1) { // Main ticks
tlength=TickLength;
for(j=1;j<10;j+=1) { // sublog ticks
xx = x1+lx*(log10(j)+xt[i]-xt1);
if(xx>x1 && xx<x2) {
ax1.svgLine(xx,y1+tlength,xx,y1,"black",TickWidth);
ax2.svgLine(xx,y2-tlength,xx,y2,"black",TickWidth);
}
if(!x_log) {break;}
tlength = MinorTickLength;
}
}
ax1.svgRect(x1,y1-TickLength/2,x2-x1,TickLength,"transparent","none",0);
ax2.svgRect(x1,y2-TickLength/2,x2-x1,TickLength,"transparent","none",0);
// Y Axes and Ticks
var ay1 = document.createElementNS(svgns,"g"); im.appendChild(ay1); ay1.id="ay1";
var ay2 = document.createElementNS(svgns,"g"); im.appendChild(ay2); ay2.id="ay2";
ay1.svgLine(x1,y1,x1,y2,"black",BoxWidth);
ay2.svgLine(x2,y1,x2,y2,"black",BoxWidth);
for(i=0;i<yt.length;i+=1) {
tlength=TickLength;
for(j=1;j<10;j+=1) { // sublog ticks
yy = y2-ly*(log10(j)+yt[i]-yt1);
if(yy>y1 && yy<y2) {
ay1.svgLine(x1+tlength,yy,x1,yy,"black",TickWidth);
ay2.svgLine(x2-tlength,yy,x2,yy,"black",TickWidth);
}
if(!y_log) {break;}
tlength = MinorTickLength;
}
}
ay1.svgRect(x1-TickLength/2,y1,TickLength,y2-y1,"transparent","none",0);
ay2.svgRect(x2-TickLength/2,y1,TickLength,y2-y1,"transparent","none",0);
// Make axes movable
ax1.makeMovable(-1,"ns-resize"); ax2.makeMovable(-1,"ns-resize");
ay1.makeMovable( 1,"ew-resize"); ay2.makeMovable( 1,"ew-resize");
// Manage display of xyBox
xyBox=document.createElementNS(svgns,"g");
xyBoxclicked = false;
xyBox.svgRect(0,0,63,30,"white","black",1);
xyBox.style.display="none";
ee=im.svgText("0",5,5 ,12,"black","NW"); xyBox.appendChild(ee);
ee=im.svgText("0",5,17,12,"black","NW"); xyBox.appendChild(ee);
xyLine=im.svgLine(x1,y1,x1,y2,"#ccc",1,"none"); xyLine.style.display="none";
xyDot=document.createElementNS(svgns,"g"); xyDot.type = 0;
xyBox.appendChild(xyDot);
e=im.svgRect(x1,y1,x2-x1,y2-y1,"transparent","none",0);
e.style.cursor = "crosshair";
e.onmousemove1 = function(evt){
im.insertBefore(xyBox, this); xyBox.style.display="block";
var x=evt.pageX-parseFloat(im.parentNode.offsetLeft);
var y=evt.pageY-parseFloat(im.parentNode.offsetTop );
var e=(x-x1)/(x2-x1);
e=x_log?Emin*Math.pow(Emax/Emin,e):e*(Emax-Emin)+Emin; // Energy in eV
if (e>1e6) { e=(e*1e-6).toFixed(3)+" MeV"; }
else if (e>1e5) { e=(e*1e-3).toFixed(1)+" keV"; }
else if (e>2e3) { e=(e*1e-3).toFixed(2)+" keV"; }
else { e=e.toFixed(0)+" eV" }
var t=(y2-y)/(y2-y1);
t=100.*(y_log?Tmin*Math.pow(Tmax/Tmin,t):t*(Tmax-Tmin)+Tmin); // transmission in %
t = t<1. ? t.toExponential(1) : t.toFixed(1);
xyBox.setAttribute("transform","translate("+(x+5)+","+(y+5)+")");
xyBox.childNodes[1].textContent=e;
xyBox.childNodes[2].textContent=t+" %";
};
e.onmousemove = e.onmousemove1;
// Manage xyBox when clicked
e.onmousemove2 = function(evt){
im.insertBefore(xyBox, this);
xyBox.style.display="block";
xyLine.style.display="block";
xyDot.style.display="block";
var x=evt.pageX-parseFloat(im.parentNode.offsetLeft);
var y=evt.pageY-parseFloat(im.parentNode.offsetTop );
var e=(x-x1)/(x2-x1), k = Math.round(e*nrjs);
e = x_log?Emin*Math.pow(Emax/Emin,e):e*(Emax-Emin)+Emin; // Energy in eV
if (e>1e6) { e=(e*1e-6).toFixed(3)+" MeV"; }
else if (e>1e5) { e=(e*1e-3).toFixed(1)+" keV"; }
else if (e>2e3) { e=(e*1e-3).toFixed(2)+" keV"; }
else { e=e.toFixed(0)+" eV" }
var t=(y2-y)/(y2-y1), tt, tdiff = Infinity, tdiff1, i, ii=0;
for(i=0;i<ncurves;i=i+1){ // Find closest curve
tt = trans[i][k];
tt = y_log ? log10(tt/Tmin)/log10(Tmax/Tmin) : (tt-Tmin)/(Tmax-Tmin);
tdiff1 = Math.abs(tt-t);
if(tdiff1<tdiff) { tdiff=tdiff1; ii=i; }
}
t = trans[ii][k]; // closest transmission
y = y_log ? log10(t/Tmin)/log10(Tmax/Tmin) : (t-Tmin)/(Tmax-Tmin);
var desiredType = 1;
if(y<0) { desiredType = 2; y=0; }
if(y>1) { desiredType = 3; y=1; }
y = y*(y1-y2)+y2;
t = 100.*t; // in %
t = t<1. ? t.toExponential(1) : t.toFixed(1);
xyBox.setAttribute("transform","translate("+(x+5)+","+(y+5)+")");
xyBox.childNodes[1].textContent=e;
xyBox.childNodes[2].textContent=t+" %";
xyLine.setAttribute("x1",""+x); xyLine.setAttribute("x2",""+x);
if(xyDot.type!=desiredType) {
if(xyDot.dot) xyDot.removeChild(xyDot.dot);
xyDot.type=desiredType;
switch(desiredType) {
case 1: xyDot.dot = xyDot.svgCircle (-5,-5,4,"black","none",0); break;
case 2: xyDot.dot = xyDot.svgTriangle(-5,-5,6, 90,"black","none",0); break;
case 3: xyDot.dot = xyDot.svgTriangle(-5,-5,6,-90,"black","none",0); break;
}
}
xyDot.dot.setAttribute("fill",""+color[ii]);
};
e.onmousedown = function(evt){ evt.preventDefault(); };
e.onclick = function(evt){
evt.preventDefault();
if(!xyBoxclicked) {
xyBoxclicked = true;
this.onmousemove = this.onmousemove2;
xyLine.style.display="block";
xyDot.style.display="block";
} else {
xyBoxclicked = false;
this.onmousemove = this.onmousemove1;
xyLine.style.display="none";
xyDot.style.display="none";
}
this.onmousemove(evt);
};
e.onmouseout = function(evt){
xyBox.style.display="none";
xyLine.style.display="none";
xyDot.style.display="none";
};
// X Labels
for(i=0;i<xt.length;i=i+1) {
xx = x1+lx*(xt[i]-xt1);
if(xx<x1) {continue;}
if (x_log) { im.svgText('10<tspan dy="'+SupShift+'" style="font-size:'+SupFontSize+'px">'+(xt[i]-3)+'</tspan>',xx,y2+1.4*BoxWidth,TickFontSize,"black","NC"); }
else { im.svgText(''+(xt[i]/1000),xx,y2+BoxWidth,TickFontSize,"black",'NC'); }
}
// Y Labels
for(i=0;i<yt.length;i=i+1) {
yy = y2-ly*(yt[i]-yt1);
if(y2-yy<TickFontSize) {yy-=TickFontSize*0.3;}
if (y_log) { im.svgText('10<tspan dy="'+SupShift+'" style="font-size:'+SupFontSize+'px">'+(yt[i])+'</tspan>',x1-BoxWidth,yy,TickFontSize,"black","ME"); }
else { im.svgText(''+yt[i],x1-BoxWidth,yy,TickFontSize,"black",'ME'); }
}
// Axe titles
if (t1x==undefined) { // if titles not placed before, place it
t1x=(x2+x1)/2; t1y=y2+TickFontSize+5;
t2x=x1-60; t2y=(y2+y1)/2;
}
var t1=im.svgText('X-ray energy (keV)',t1x,t1y,TitleFontSize,"black",'NC');
var t2=im.svgText('Transmission',t2x,t2y,TitleFontSize,"black",'NC','-90');
t1.id = "t1"; t2.id = "t2";
// Make them movable
t1.makeMovable(0,"move");
t2.makeMovable(0,"move");
// Legend
var g=document.createElementNS(svgns,"g");
g.id="legend"; im.appendChild(g);
rect=g.svgRect(0,0,10,10,"white","black",LegendBoxWidth);
var lw = 0, lh, leg=new Array();
for(i=0;i<ncurves;i=i+1) {
leg[i]=g.svgText(CurveName[i],(x2+x1)/2,(y2+y1)/2,LegendFontSize,"black",'SW');
lw=Math.max(lw,leg[i].getBBox().width);
}
lw = lw+2*LegendMargin+LegendLength;
lh=Math.ceil(LegendFontSize*1.2); // legend height
if (lx1==undefined) { // if legend not placed before, place it
lx2=x2-LegendPadding; lx1=lx2-lw;
ly2=y2-LegendPadding; ly1=ly2-lh*ncurves;
}
rect.setAttribute("x",lx1); rect.setAttribute("y",ly1);
rect.setAttribute("width",lw); rect.setAttribute("height",lh*ncurves);
for(i=0;i<ncurves;i=i+1) {
leg[i].setAttribute("x",lx1+LegendMargin+LegendLength);
leg[i].setAttribute("y",ly1+lh*(i+1)-0.28*LegendFontSize);
g.svgLine(lx1+LegendMargin,ly1+lh*(i+0.5),lx1+LegendLength,ly1+lh*(i+0.5),color[i],CurveWidth[i],dash[i]);
}
// Make legend movable
g.makeMovable(0,"move");
// If plot overlaps with other stuff,
// then change the size and replot
if(attempt>3) { return; }
if(attempt>2) {
x1=170; x2=700; y1=80; y2=400;
lx1 = undefined; t1x = undefined; plot(attempt+1); return;
}
var b=im.getBBox(), r=false;
y1 = Math.max(y1,25+document.getElementById("box").getBoundingClientRect().height);
if(x2<x1+10) { r=x1; x1=x2; x2=r; r=true; }
if(y2<y1+10) { r=y1; y1=y2; y2=r; r=true; }
if(x2<=x1) { x1=(x1+x2)/2-5; x2=x1+10; r=true; }
if(y2<=y1) { y1=(y1+y2)/2-5; y2=y1+10; r=true; }
if(r) { lx1 = undefined; t1x = undefined; plot(attempt+1); return; }
// save plot to cookie for next time
storeCookie();
}
// Display the line styles next to the text area
function plotStyles() {
var b = document.getElementById("box");
var ncurves = b.value.split(/\r|\n/).length;
var lh=b.style.lineHeight;
var fs=b.style.fontSize.replace("px","");
while (sty.hasChildNodes()) { sty.removeChild(sty.lastChild); }
lh=Math.round(lh*parseInt(fs));
sty.setAttribute("height", lh*ncurves);
sty.setAttribute("width" , LegendLength+5);
for(i=0;i<ncurves;i=i+1) {
color[i] = CCODEtoRGB(ccode[i]);
dash[i] = DashStyles(CurveDash[i],CurveWidth[i]);
sty.svgLine(0,lh*(i+0.6),LegendLength,lh*(i+0.6),color[i],CurveWidth[i],dash[i]).id = "linestyle"+i;
rect = sty.svgRect(0,lh*i,LegendLength,lh,"rgba(1,1,1,0)","none",0);
rect.onclick = (function(k){ return function(){editLineStyle(k);}; }) (i);
rect.style.cursor="pointer";
}
}
// Manages the push/pop red checkboxes
function swap(e) {
var state=NaN;
switch(e.id) {
case "xauto": x_auto = !x_auto; state=x_auto; break;
case "yauto": y_auto = !y_auto; state=y_auto; break;
case "xlog" : x_log = !x_log ; state=x_log ; break;
case "xgrid": x_grid = !x_grid; state=x_grid; break;
case "ygrid": y_grid = !y_grid; state=y_grid; break;
case "ylog" : y_log = !y_log ; state=y_log ; break;
}
if(isNaN(state)) return;
if(state) { e.className="pushed"; }
else { e.className="poped"; }
go(e);
}
// Manages the push/pop menu buttons
function drawer(e1,e2) {
if( e2 ) {
e2 = document.getElementById(e2);
d = e2.style.display=="block";
}
for(var i=0; i<dra.length; i+=1) {dra[i].style.display="none";}
for(var i=0; i<but.length; i+=1) {but[i].className="barnormal";}
if( e2 ) {
e2.style.display = d?"none":"block";
e2.style.zIndex = 10;
}
if( e1 ) e1.className = d?"barnormal":"barhover";
}
// Converts the value 'val' that has units 'units' to centimeters
function toCm(val,units) {
valCm=NaN;
units = units.toLowerCase();
switch(units) {
case 'angstrom':
valCm = 1e-8*val; break;