ms_mtrl='al6061'
/title,AAAV Mirror Support Construction / SK400A007 / %ms_mtrl%
/units,bin
name='mir_supt'
arry_nam='mirsp'
ct_name='CSmirsp0'
cyl_name='CSmirsp1'
sph_name='CSmirsp2'
mat_select,ms_mtrl
et,1,shell93
et,2,solid95
et,3,solid92
el_up=31
el_down=11
thick=.15
thickc=.10
rfil=.060
rfil2=.250
CSz1=-.25
l1=7.125-2.336
l2=2.336+2.450
l3=1.45
l4=1.45
h1=1.975
h2=h1
phi1=10
*afun,deg
h13=h1-(l2-l4)*tan(phi1)
h14=1.18590825
h15=1.73005331
*afun,rad
Dro=1.5
Dri=Dro-thick
h16=1.10
h3=1.280
h4=0.755
phi2=9
dlj=2.150
drj=1.070
d1=0.9839
d2=0.755
d3=0.8536
d4=0.4990
extd1=dlj
ribw=0.200
lrext=4.336
llext=4.364
l5=2.336+2.45-thick
l6=3.636
l7=l6-ribw
l8=2.736
l9=l8-ribw
l10=1.8
l10t=2.125
h5=thick
h5a=thick
h6=.050
h6a=.050
h7=.250
h7a=.655
phi3=0
l11=1.000
l12=1.000
h8=0.625
h9=3.220
phi4=60
dcut=0.220
l13=0.825
l14=2.975
h10=0.120
chmf1=0.225
chmf2=0.100
phi5=30
l15=2.614
l16=1.300
rrad=0.250
dos=2.000
dhole=1.95
dbore1=2.5
dbore2=dos-.2
h11=0.909
h12=0.585
l17=0.324
boredpth=h11-l17
extd2=5.366-l1
extd3=0.322
extd4=0.532
l18=0.340
l19=.054
l20=0.789-l18-l19
l21=1.465-0.789
l22=5.044
l23=0.3220125
l24=0.3170125
l25=10.008
extd5=l25-l22-l2
xcenter=2.336
xbandj=7.125
tside=-xbandj+xcenter+l22+extd3-extd4
hdia=.688
hdepth=.190
*dim,xh,array,3
xh(1)=2.5
xh(2)=3.5
xh(3)=4.375
yh=.50
width1=L3+L4
depth1=.295
ycut=h2
rcut=.125
cham1=.250
xoffax=.160
hcDx1=1.75
hcDx2=.90
hcDa1=45
hcDy1=.614
hcDy2=h11-hcDy1
hcDz1=h1+h2-thick
hcDx1=hcDx1+.1
ccDr1=1.1250
ccDr2=0.060
ccPx1=1.300000
ccPy3=1.750000
ccDext=0.435
c1Dr1=1.1250
c1Dr2=0.12500
c1Dr3=c1Dr2
c1Dr4=c1Dr2
c1Dr5=c1Dr2
c1Px1=-0.9740993
c1Py1=1.750000
c1Pz1=0.000000
c1Px2=0.9740982
c1Py2=c1Py1
c1Pz2=c1Pz1
c1Px3=0.5245652
c1Py3=0.9952167
c1Pz3=c1Pz1
c1Px4=-0.5245640
c1Py4=0.9952174
c1Pz4=c1Pz1
c1Px5=0.000000
c1Py5=0.6661338E-15
c1Pz5=c1Pz1
c1Px6=0.6826796
c1Py6=1.030570
c1Pz6=c1Pz1
c1Px7=1.073928
c1Py7=1.549773
c1Pz7=c1Pz1
c1Px8=c1Px2
c1Py8=1.625000
c1Pz8=c1Pz1
c1Px9=0.5828502
c1Py9=1.105796
c1Pz9=c1Pz1
c1Px10=-0.6826796
c1Py10=c1Py6
c1Pz10=c1Pz1
c1Px11=-1.073928
c1Py11=c1Py7
c1Pz11=c1Pz1
c1Px12=-0.9740982
c1Py12=c1Py8
c1Pz12=c1Pz1
c1Px13=-0.5828502
c1Py13=c1Py9
c1Pz13=c1Pz1
c2Dr1=1.1250
c2Dr2=0.12500
c2Dr3=c2Dr2
c2Dr4=c2Dr2
c2Px1=1.300000
c2Py1=0.4264681
c2Pz1=0.000000
c2Px2=c2Px1
c2Py2=1.226950
c2Pz2=c2Pz1
c2Px3=1.057500
c2Py3=0.3838212
c2Pz3=c2Pz1
c2Px4=0.8120740
c2Py4=0.7785633
c2Pz4=c2Pz1
c2Px5=0.1998401E-14
c2Py5=0.1221245E-14
c2Pz5=c2Pz1
c2Px6=1.175000
c2Py6=c2Py1
c2Pz6=c2Pz1
c2Px7=0.8024750
c2Py7=0.9402972
c2Pz7=c2Pz1
c2Px8=1.075171
c2Py8=1.302177
c2Pz8=c2Pz1
c2Px9=0.9023044
c2Py9=0.8650704
c2Pz9=c2Pz1
c2Px10=c2Px6
c2Py10=c2Py2
c2Pz10=c2Pz1
po2Dr1=0.25000
po2Dr2=po2Dr1
po2Dr3=po2Dr1
po2Dr4=po2Dr1
po2Dr5=po2Dr1
po2Dr6=po2Dr1
po2Dr7=1.3500
po2Dr8=po2Dr1
po2Dr9=po2Dr1
po2Dr10=po2Dr1
po2Dr11=po2Dr7
po2Dr12=po2Dr1
po2Dr13=po2Dr1
po2Dr14=po2Dr1
po2Dr15=po2Dr1
po2Dr16=po2Dr1
po2Dr1=1.2000
po2Dr2=0.25000
po2Dr3=po2Dr1
po2Dr4=po2Dr2
po2Dr5=po2Dr2
po2Dr6=po2Dr2
po2Dr7=po2Dr2
po2Dr8=po2Dr2
po2Dr9=po2Dr2
po2Dr10=po2Dr2
po2Dr11=po2Dr2
po2Dr12=po2Dr2
po2Dr13=0.50000
po2Dr14=po2Dr13
po2Dr15=po2Dr13
po2Dr16=po2Dr13
po2Px1=-4.639000
po2Py1=0.4000000
po2Pz1=2*extd1
po2Px2=po2Px1
po2Py2=0.8982904
po2Pz2=po2Pz1
po2Px3=po2Px1
po2Py3=-0.4000000
po2Pz3=po2Pz1
po2Px4=po2Px1
po2Py4=-0.8982904
po2Pz4=po2Pz1
po2Px5=2.439033
po2Py5=-1.495979
po2Pz5=po2Pz1
po2Px6=3.494372
po2Py6=-1.309894
po2Pz6=po2Pz1
po2Px7=4.435809
po2Py7=-0.4715464
po2Pz7=po2Pz1
po2Px8=3.286000
po2Py8=-0.1281237
po2Pz8=po2Pz1
po2Px9=1.940641
po2Py9=-0.4606339
po2Pz9=po2Pz1
po2Px10=2.153086
po2Py10=-1.310411
po2Pz10=po2Pz1
po2Px11=2.395621
po2Py11=-1.249777
po2Pz11=po2Pz1
po2Px12=2.578157
po2Py12=0.5767767
po2Pz12=po2Pz1
po2Px13=3.246334
po2Py13=1.244954
po2Pz13=po2Pz1
po2Px14=po2Px7
po2Py14=0.4715464
po2Pz14=po2Pz1
po2Px15=3.459193
po2Py15=1.315560
po2Pz15=po2Pz1
po2Px16=po2Px8
po2Py16=0.1281237
po2Pz16=po2Pz1
po2Px17=2.754934
po2Py17=0.1500000
po2Pz17=po2Pz1
po2Px18=4.196266
po2Py18=po2Py17
po2Pz18=po2Pz1
po2Px19=2.183177
po2Py19=-0.1500000
po2Pz19=po2Pz1
po2Px20=po2Px18
po2Py20=po2Py19
po2Pz20=po2Pz1
po2Px21=po2Px18
po2Py21=po2Py1
po2Pz21=po2Pz1
po2Px22=3.423111
po2Py22=1.068177
po2Pz22=po2Pz1
po2Px23=po2Px17
po2Py23=po2Py1
po2Pz23=po2Pz1
po2Px24=po2Px19
po2Py24=po2Py3
po2Pz24=po2Pz1
po2Px25=po2Px18
po2Py25=po2Py3
po2Pz25=po2Pz1
po2Px26=-4.389000
po2Py26=po2Py19
po2Pz26=po2Pz1
po2Px27=-2.183371
po2Py27=po2Py19
po2Pz27=po2Pz1
po2Px28=po2Px26
po2Py28=po2Py17
po2Pz28=po2Pz1
po2Px29=-1.858371
po2Py29=po2Py17
po2Pz29=po2Pz1
po2Px30=-4.432412
po2Py30=1.144492
po2Pz30=po2Pz1
po2Px31=-1.829952
po2Py31=1.603376
po2Pz31=po2Pz1
po2Px32=po2Px30
po2Py32=-1.144492
po2Pz32=po2Pz1
po2Px33=-2.361985
po2Py33=-1.509564
po2Pz33=po2Pz1
po2Px34=-1.698300
po2Py34=-0.7712678
po2Pz34=po2Pz1
po2Px35=-1.790090
po2Py35=-1.138428
po2Pz35=po2Pz1
po2Px36=po2Px26
po2Py36=po2Py4
po2Pz36=po2Pz1
po2Px37=po2Px26
po2Py37=po2Py3
po2Pz37=po2Pz1
po2Px38=po2Px26
po2Py38=po2Py1
po2Pz38=po2Pz1
po2Px39=po2Px26
po2Py39=po2Py2
po2Pz39=po2Pz1
po2Px40=-1.258057
po2Py40=0.9897045
po2Pz40=po2Pz1
po2Px41=-1.373300
po2Py41=0.5287322
po2Pz41=po2Pz1
po2Px42=-1.743128
po2Py42=1.110972
po2Pz42=po2Pz1
po2Px43=po2Px29
po2Py43=0.6500000
po2Pz43=po2Pz1
po2Px44=-2.275161
po2Py44=-1.017161
po2Pz44=po2Pz1
po2Px45=po2Px27
po2Py45=-0.6500000
po2Pz45=po2Pz1
po3Dr1=1.1250
po3Dr2=po3Dr1
po3Dr3=po3Dr1
po3Dr4=0.25000
po3Dr5=po3Dr4
po3Dr6=po3Dr4
po3Dr7=po3Dr4
po3Dr8=po3Dr4
po3Dr9=po3Dr4
po3Dr10=po3Dr1
po3Dr11=po3Dr4
po3Dr12=po3Dr4
po3Dr13=po3Dr4
po3Dr14=po3Dr4
po3Dr15=po3Dr4
po3Px1=0.8089830
po3Py1=0.7817745
po3Pz1=0.000000
po3Px2=-0.4893607
po3Py2=1.012991
po3Pz2=po3Pz1
po3Px3=-0.2220446E-15
po3Py3=-0.1110223E-15
po3Pz3=po3Pz1
po3Px4=1.007510
po3Py4=-0.5005485
po3Pz4=po3Pz1
po3Px5=1.081702
po3Py5=-0.3091032
po3Pz5=po3Pz1
po3Px6=-0.3787890
po3Py6=-1.059313
po3Pz6=po3Pz1
po3Px7=0.000000
po3Py7=-1.125000
po3Pz7=po3Pz1
po3Px8=-0.5213826
po3Py8=1.795000
po3Pz8=po3Pz1
po3Px9=0.8413826
po3Py9=po3Py8
po3Pz9=po3Pz1
po3Px10=-0.7639182
po3Py10=1.605634
po3Pz10=po3Pz1
po3Px11=-0.8406432
po3Py11=1.298734
po3Pz11=po3Pz1
po3Px12=-0.5981075
po3Py12=1.238100
po3Pz12=po3Pz1
po3Px13=1.083918
po3Py13=po3Py10
po3Pz13=po3Pz1
po3Px14=1.231293
po3Py14=1.016136
po3Pz14=po3Pz1
po3Px15=po3Px9
po3Py15=1.545000
po3Pz15=po3Pz1
po3Px16=po3Px8
po3Py16=po3Py15
po3Pz16=po3Pz1
po3Px17=0.9887571
po3Py17=0.9555022
po3Pz17=po3Pz1
po3Px18=-0.7432486
po3Py18=-1.825000
po3Pz18=po3Pz1
po3Px19=1.275381
po3Py19=po3Py18
po3Pz19=po3Pz1
po3Px20=1.564616
po3Py20=-0.3171589
po3Pz20=po3Pz1
po3Px21=1.672839
po3Py21=-0.7500504
po3Pz21=po3Pz1
po3Px22=1.322081
po3Py22=-0.3777928
po3Pz22=po3Pz1
po3Px23=1.253527
po3Py23=-0.9874610
po3Pz23=po3Pz1
po3Px24=1.054624
po3Py24=-0.7885582
po3Pz24=po3Pz1
po3Px25=1.452157
po3Py25=-1.398223
po3Pz25=po3Pz1
po3Px26=0.9876280
po3Py26=-0.9336940
po3Pz26=po3Pz1
po3Px27=po3Px19
po3Py27=-1.575000
po3Pz27=po3Pz1
po3Px28=0.6634238
po3Py28=-0.9085669
po3Pz28=po3Pz1
po3Px29=1.231401
po3Py29=-0.6117816
po3Pz29=po3Pz1
po3Px30=0.8108513
po3Py30=-1.110471
po3Pz30=po3Pz1
po3Px31=1.430304
po3Py31=-0.8106843
po3Pz31=po3Pz1
po3Px32=-0.9200253
po3Py32=po3Py25
po3Pz32=po3Pz1
po3Px33=-0.6397411
po3Py33=-1.117939
po3Pz33=po3Pz1
po3Px34=-0.4629644
po3Py34=-1.294716
po3Pz34=po3Pz1
po3Px35=po3Px18
po3Py35=po3Py27
po3Pz35=po3Pz1
hpDr1=2.250/2
hpDd1=.218
hpDd2=.125
hpDz1=.120
nlh=12
*dim,CSlhx,array,nlh
*dim,CSlhy,array,nlh
*dim,lhDr1,array,nlh
CSlhx(1)= 2.025, 2.690, 3.520, 3.815
CSlhy(1)= 1.100,-0.765, 0.715,-0.630
lhDr1(1)= 0.500, 0.500, 0.375, 0.375
CSlhx(5)= 1.240,-1.020
CSlhy(5)=-1.375,-1.450
lhDr1(5)= 0.250, 0.250
CSlhx(7)=-2.020,-2.390,-3.195,-3.430,-4.120,-4.220
CSlhy(7)= 0.855,-0.820, 0.750,-0.730, 0.670,-0.660
lhDr1(7)= 0.500, 0.500, 0.375, 0.375, 0.250, 0.250
h17=0.400
h18=0.350
h19=-CSz1
l27=2.900
nlhr=2
*dim,CSlhrx,array,nlhr
*dim,CSlhry,array,nlhr
*dim,lhrDr1,array,nlhr
CSlhrx(1)=-0.530,-0.530
CSlhry(1)= 0.415,-0.415
lhrDr1(1)= 0.250, 0.250
extd6=1.000
Troom=70
Ttest=-40
acs=CSra0
xc=0
yc=h11
zc=-L22
rotxyc=90
rotyzc=180
rotzxc=-90