楼主是个大坑货!没法运行,上来就rest model.sav,尼玛又不把model.sav给出来,真不厚道!
new
rest model.sav
title
Calculation for External water pressure on lining of subsea tunnels
def setup
c_perm=2.0e-11 ermeability of rock (m/s)/(Pa/m)
g_perm=4.0e-13 ;Permeability of grouting loop (m/s)/(Pa/m)
l_perm=2.0e-12 ;Permeability of liner (m/s)/(Pa/m)
c_por=0.2 ;porosity of rock
g_por=0.03 ;porosity of grouting loop
l_por=0.02 ;porosity of liner
den_water=1000
c_dens=2000 ;denstity of rock
g_dens=2400 ;denstity of grouting loop
l_dens=2500 ;denstity of liner
c_fric=24 ;friction of rock
g_fric=30 ;friction of grouting loop
l_fric=35 ;friction of liner
; -------------- mechanical model ----------------
model elas
ini dens c_dens
prop bulk c_bulk shear c_shear
;;;; --- assign boundary conditions ---
fix x range x 99.9 100.1
fix x range x -100.1 -99.9
fix x y z range z -150.1 -149.9
fix y range y -0.1 0.1
fix y range y 0.9 1.1
;; --- initial stress state ---
set grav 0 0 -10
ini szz -45e4 grad 0 0 str_ver
ini sxx -45e4 grad 0 0 str_hor_c
ini syy -45e4 grad 0 0 str_hor_c
apply sxx -45e4 grad 0 0 str_hor_c range x -100.1 -99.9
apply sxx -45e4 grad 0 0 str_hor_c range x 99.9 100.1
apply syy -45e4 grad 0 0 str_hor_c range y -0.1 0.1
apply syy -45e4 grad 0 0 str_hor_c range y 0.9 1.1
apply szz -45e4 grad 0 0 0 range z -0.1 0.1
apply szz -45e4 grad 0 0 str_ver range z -150.1 -149.9
ini pp 45e4 grad 0 0 -10000
fix pp range z -0.1 0.1
fix pp range z -150.1 -149.9
fix pp range x -100.1 -99.9
fix pp range x 99.9 100.1
;; --- initial -----
set mech on
set fluid off ; 在config 状态下,是on by defaunlt
set large
hist unbal
plot add his 1
;solve ; check initial equilibrium
plot
plot creat view_pp
plot add cont pp
plot show
sav ini_1.sav
ini xdis 0 ydis 0 zdis 0
ini xvel 0.0 yvel 0.0 zvel 0.0
ini state 0
ini dens g_dens range group 9
ini dens l_dens range group 1 any group 4 any group 6 any group 8 any
model mo
prop bulk c_bulk shear c_shear coh c_coh fri c_fric tens c_tens range group 10 any group 11 any
prop bulk c_bulk shear c_shear coh c_coh fri c_fric tens c_tens range group 2 any group 3 any group 5 any group 7 any
prop bulk g_bulk shear g_shear coh g_coh fri g_fric tens g_tens range group 9
prop bulk l_bulk shear l_shear coh l_coh fri l_fric tens l_tens range group 1 any group 4 any group 6 any group 8 any
model fl_iso range group 9
prop perm g_perm poro g_por range group 9 ; biot_c 1
model fl_iso range group 1 any group 4 any group 6 any group 8 any
prop perm l_perm poro l_por range group 1 any group 4 any group 6 any group 8 any ; biot_c 1
ini fmod 2e7
ini fdensity den_water
;; --- excavation -----
model null range group 2 any group 3 any group 5 any group 7 any
model fl_null range group 2 any group 3 any group 5 any group 7 any
ini pp 0 range group 2 any group 3 any group 5 any group 7 any
set mech on
set fluid on
hist id 10 gp pp id 1845 ;注浆圈顶pp
hist id 11 gp pp id 2095 ;注浆圈腰pp
hist id 12 gp pp id 2313 ;注浆圈底pp
hist id 13 gp zdisp id 751 ;衬砌顶zdisp
hist id 14 gp xdisp id 523 ;衬砌腰xdisp
hist id 15 gp zdisp id 1401 ;衬砌底zdisp
hist id 16 gp xdisp id 99 ;衬砌腰xdisp
hist id 17 gp pp id 1335 ;衬砌背顶pp
hist id 18 gp pp id 713 ;衬砌背腰pp
hist id 19 gp pp id 1563 ;衬砌背底pp
hist id 100 fltime
def day
day=fltime/24/3600
end
day
hist id 101 day
hist id 102 qflac
set mech force 1.5e3
set mech substep 1000 auto
set fluid substep 20