!   TITLE:  raceo_top_nhbb.parm (AAAV)
!
!---------------------------------------------------------------------------
!       Rev -   03/26/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='raceo'
arry_nam='raco'
!
!--------------------------- 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,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 nhbb_u.igs
!
! Refer to tools/README.getiges for help on changing radius
! parameter values.
!

r1=0.13150                   ! Used for lm + 9
r2=r1                        ! Used for lm + 10
r3=r1                        ! Used for lm + 18
r4=r1                        ! Used for lm + 19

!
! Keypoint Parameter Definitions from nhbb_u.igs
!

x1=1.938250
y1=0.000000
z1=0.000000

x2=2.127400
y2=y1
z2=z1

x3=x1
y3=0.8200000
z3=z1

x4=2.125000
y4=y3
z4=z1

x5=2.187400
y5=0.6000000E-01
z5=z1

x6=x5
y6=0.5400000
z6=z1

x7=2.462500
y7=0.5550000
z7=z1

x8=x7
y8=0.7750000
z8=z1

x9=1.929250
y9=0.6744763
z9=z1

x10=x9
y10=0.8110000
z10=z1

x11=2.447500
y11=y6
z11=z1

x12=x4
y12=0.7900000
z12=z1

x13=x11
y13=y12
z13=z1

x14=1.976923
y14=0.2290393
z14=z1

x15=x9
y15=0.2856763
z15=z1

x16=1.856550
y16=0.1761000
z16=z1

x17=x14
y17=0.5119607
z17=z1

x18=x16
y18=0.5649000
z18=z1

x19=x9
y19=0.4553237
z19=z1

x20=x9
y20=0.9000000E-02
z20=z1

x21=x9
y21=0.6652373E-01
z21=z1

!
! Parm's for uniform aluminum ring

extra=.2                    ! Extra material below the corner chamfer
r_outer=2.7