!   TITLE:  raceo_top_mpb.parm (AAAV)
!
!---------------------------------------------------------------------------
!       Rev -   04/04/2001      D. Edwards
!---------------------------------------------------------------------------
!
!   This macro computes the equivalent thickness ring for a temperature test
!   in an aluminum assembly.
!
!   First the actual race deflection is computed with an arbitrary thickness
!   aluminum sleeve assembled outside of the race.  The race deflection at the
!   ball contact points (use the minimum algebraic value) is used to find an
!   equivalent uniform ring which compresses the same amount when assembled
!   with the aluminum sleeve.
!
!--------------------- a.) Part Name Selection Variable --------------------
!
name='BLANK'
arry_nam='BLANK'
!
!--------------------------- b.) Model C.S. Names --------------------------
!
ct_name='CS10'          ! cartesian
cyl_name='CS11'         ! cylindrical
sph_name='CS12'         ! spherical
!
!----------------------- c.) Material and Element Type ---------------------
!
EXalum=10.4E6
DENSalum=.097/386.4
NUXYalum=0.33
ALPXalum=11.1E-6

EX440C=28.0E6
DENS440C=.283/386.4
NUXY440C=0.27
ALPX440C=5.56E-6

alum=1                  ! Material:  Aluminum A356-T6 azimuth gimbal
c440C=2                 ! 440C CRES outer race

mp,EX,alum,EXalum
mp,dens,alum,DENSalum
mp,nuxy,alum,NUXYalum
mp,alpx,alum,ALPXalum

mp,EX,c440C,EX440C
mp,dens,c440C,DENS440C
mp,nuxy,c440C,NUXY440C
mp,alpx,c440C,ALPX440C

!et,1,plane42,,,1       ! Axisymmetric elements
et,1,plane82,,,1        ! Axisymmetric elements
et,2,plane82,,,0        ! Plane stress

esize=.04
!
!--------------------- d.) Thermal conditions --------------------------------
!

Troom=70                ! [deg F] Room temp (zero thermal stress)
Ttest=-40               ! [deg F] Test temp

!
! Radius Dimension Parameters from or_mpb.igs
!
! Refer to tools/README.getiges for help on changing radius
! parameter values.
!

r1=0.13100                   ! Used for lm + 8
r2=r1                        ! Used for lm + 9
r3=r1                        ! Used for lm + 11
r4=r1                        ! Used for lm + 12

!
! Keypoint Parameter Definitions from or_mpb.igs
!

x1=2.104650
y1=0.000000
z1=0.000000

x2=2.187400
y2=y1
z2=z1

x3=x2
y3=0.5370000
z3=z1

x4=2.462500
y4=y3
z4=z1

x5=x4
y5=0.8185000
z5=z1

x6=x1
y6=y5
z6=z1

x7=2.038000
y7=0.3038202
z7=z1

x8=x7
y8=0.4496798
z8=z1

x9=x1
y9=0.1550000
z9=z1

x10=2.100845
y10=0.2323046
z10=z1

x11=1.977746
y11=0.1875000
z11=z1

x12=x10
y12=0.5211954
z12=z1

x13=x1
y13=0.5985000
z13=z1

x14=x11
y14=0.5660000
z14=z1

!
! Parm's for uniform aluminum ring
!
extra=.2                    ! Extra material below the corner chamfer
r_outer=2.7                 ! Outside radius