!   Commands inserted into this file will be executed just prior to the Ansys SOLVE command.
!   These commands may supercede command settings set by Workbench.

!   Active UNIT system in Workbench when this object was created:  Metric (mm, kg, N, C, s, mV, mA)

/prep7

!front bearing
csys,12
n,500001,0,0,0
n,600001,0,0,0
et,500,matrix27,0,0,4
type,500
REAL,500
e,500001,600001

r	,	500					
rmodif,500,1,11400000000
rmodif,500,2,-551000000
rmodif,500,3,-2110
rmodif,500,4,-336000
rmodif,500,5,-7000000
rmodif,500,6,0
rmodif,500,7,-11400000000
rmodif,500,8,551000000
rmodif,500,9,2110
rmodif,500,10,336000
rmodif,500,11,7000000
rmodif,500,12,0
rmodif,500,13,1320000000
rmodif,500,14,-45500
rmodif,500,15,873000
rmodif,500,16,336000
rmodif,500,17,0
rmodif,500,19,-1320000000
rmodif,500,20,45500
rmodif,500,21,-873000
rmodif,500,22,-336000
rmodif,500,23,0
rmodif,500,24,1870000
rmodif,500,25,-2580000
rmodif,500,26,142000
rmodif,500,27,0
rmodif,500,30,-1870000
rmodif,500,31,2580000
rmodif,500,32,-142000
rmodif,500,33,0
rmodif,500,34,-1660000
rmodif,500,35,64200
rmodif,500,36,0
rmodif,500,40,1660000
rmodif,500,41,-64200
rmodif,500,42,0
rmodif,500,43,-496000
rmodif,500,44,0
rmodif,500,49,496000
rmodif,500,50,0
rmodif,500,51,0
rmodif,500,57,0
rmodif,500,58,11400000000
rmodif,500,59,-551000000
rmodif,500,60,-2110
rmodif,500,61,-336000
rmodif,500,62,-7000000
rmodif,500,63,0
rmodif,500,64,1320000000
rmodif,500,65,-45500
rmodif,500,66,873000
rmodif,500,67,336000
rmodif,500,68,0
rmodif,500,69,1870000
rmodif,500,70,-2580000
rmodif,500,71,142000
rmodif,500,72,0
rmodif,500,73,-1660000
rmodif,500,74,64200
rmodif,500,75,0
rmodif,500,76,-496000
rmodif,500,77,0
rmodif,500,78,0
	


! Define surface-based constraint type of pair  
MAT,1   
R,590 
REAL,590  
ET,501,170  
ET,502,174  
KEYOPT,502,12,5 
KEYOPT,502,4,1  
KEYOPT,502,2,2  
KEYOPT,501,2,1  
KEYOPT,501,4,111111 
TYPE,501
! Create a pilot node   
TSHAP,PILO  
E,500001
! Generate the contact surface  
NSEL,S,,,Frnt_ID	 
CM,_CONTACT,NODE
TYPE,502
ESLN,S,0
ESURF 
nall
eall

! Define surface-based constraint type of pair  
MAT,1   
R,591 
REAL,591  
ET,511,170  
ET,512,174  
KEYOPT,512,12,5 
KEYOPT,512,4,1  
KEYOPT,512,2,2  
KEYOPT,511,2,1  
KEYOPT,511,4,111111 
TYPE,511
! Create a pilot node   
TSHAP,PILO  
E,600001
! Generate the contact surface  
NSEL,S,,,Frnt_OD 
CM,_CONTACT,NODE
TYPE,512
ESLN,S,0
ESURF   
nall
eall

!rear bearing
csys,13
n,500002,0,0,0
n,600002,0,0,0
et,600,matrix27,0,0,4
type,600
REAL,600
e,500002,600002

r	,	600					
rmodif,600,1,16700000000
rmodif,600,2,-611000000
rmodif,600,3,-44200
rmodif,600,4,-508000
rmodif,600,5,-13400000
rmodif,600,6,0
rmodif,600,7,-16700000000
rmodif,600,8,611000000
rmodif,600,9,44200
rmodif,600,10,508000
rmodif,600,11,13400000
rmodif,600,12,0
rmodif,600,13,3660000000
rmodif,600,14,-860000
rmodif,600,15,2600000
rmodif,600,16,507000
rmodif,600,17,0
rmodif,600,19,-3660000000
rmodif,600,20,860000
rmodif,600,21,-2600000
rmodif,600,22,-507000
rmodif,600,23,0
rmodif,600,24,2090000
rmodif,600,25,1940000
rmodif,600,26,-98500
rmodif,600,27,0
rmodif,600,30,-2090000
rmodif,600,31,-1940000
rmodif,600,32,98500
rmodif,600,33,0
rmodif,600,34,1360
rmodif,600,35,451
rmodif,600,36,0
rmodif,600,40,-1360
rmodif,600,41,-451
rmodif,600,42,0
rmodif,600,43,10900
rmodif,600,44,0
rmodif,600,49,-10900
rmodif,600,50,0
rmodif,600,51,0
rmodif,600,57,0
rmodif,600,58,16700000000
rmodif,600,59,-611000000
rmodif,600,60,-44200
rmodif,600,61,-508000
rmodif,600,62,-13400000
rmodif,600,63,0
rmodif,600,64,3660000000
rmodif,600,65,-860000
rmodif,600,66,2600000
rmodif,600,67,507000
rmodif,600,68,0
rmodif,600,69,2090000
rmodif,600,70,1940000
rmodif,600,71,-98500
rmodif,600,72,0
rmodif,600,73,1360
rmodif,600,74,451
rmodif,600,75,0
rmodif,600,76,10900
rmodif,600,77,0
rmodif,600,78,0
	


! Define surface-based constraint type of pair  
MAT,1   
R,690 
REAL,690  
ET,601,170  
ET,602,174  
KEYOPT,602,12,5 
KEYOPT,602,4,1  
KEYOPT,602,2,2  
KEYOPT,601,2,1  
KEYOPT,601,4,111111 
TYPE,601
! Create a pilot node   
TSHAP,PILO  
E,500002
! Generate the contact surface  
NSEL,S,,,Rear_ID	 
CM,_CONTACT,NODE
TYPE,602
ESLN,S,0
ESURF 
nall
eall

! Define surface-based constraint type of pair  
MAT,1   
R,691 
REAL,691  
ET,611,170  
ET,612,174  
KEYOPT,612,12,5 
KEYOPT,612,4,1  
KEYOPT,612,2,2  
KEYOPT,611,2,1  
KEYOPT,611,4,111111 
TYPE,611
! Create a pilot node   
TSHAP,PILO  
E,600002
! Generate the contact surface  
NSEL,S,,,Rear_OD 
CM,_CONTACT,NODE
TYPE,612
ESLN,S,0
ESURF   
nall
eall


nall
eall 
/solve