feap * * 3D microsphere shear test
0,0,0,3,3,8

param
a=10
b=20
c=10
uy=15

bloc
cart,8,16,20,0,0,0,10
1,0,0,0
2,c,0,0
3,c,b,0
4,0,b,0
5,0,0,a
6,c,0,a
7,c,b,a
8,0,b,a

ebou
3 0 1 1 1
3 a 1 1 1
1 0 1 0 0

edis
3 a 0 uy 0

eprop
3 a 0 1 0

MATE,1
SOLI
finite
mixed
ucon micro 9.31 3.273 0.1475 0.567 9.94 100.0

end

batch
 prop,,1
end
2,2
0,0 1,1

batch
 opti
end

batch
dt,,0.05
loop time 20
 time
 loop iter 30
  tang,,1
 next iter
next time
end


inte
stop