!       TITLE:  t_rplot_nodal.mac (VERIFICATION)
!
!---------------------------------------------------------------------------
!               Rev -   01/14/2001      D. Edwards
!---------------------------------------------------------------------------
!       Create large 3-D stress components to verify
!       formatting of prnsol output.
!
!       ct1cs:        Cartesian 1 Coordinate System
!       cyl1cs:       Cylindrical 1 Coordinate System
!       sph1cs:       Spherical 1 Coordinate System
!
!--------------------- a.) Part Name Selection Variable --------------------
!
name='box'
arry_nam='box'
!
!--------------------------- b.) Model C.S. Names --------------------------
!
ct_name='ct1cs'           ! cartesian
cyl_name='cyl1cs'         ! cylindrical
sph_name='sph1cs'         ! spherical
!
!---------------------------------------------------------------------------

elen=1.0        ! Edge length of cube

esizel=elen/10  ! Element size