fish语言集锦
- 格式：docx
- 大小：32.40 KB
- 文档页数：15
range name Layer2 plane dip 0 dd 0 ori 0 0 0 below
range cylinder end1 x1 y1 z1 end2 x2 y2 z2 radius r
cylindrical range with one end of the cylinder axis (end1) at location (x1, y1, z1), the other end (end2) at location (x2, y2, z2), and with a cylinder radius of r '由(x1, y1, z1)、(x2, y2, z2)两点确定旋转轴
save_file=string(n)+'_step.sav'
D3DECFile = 'D3dec_Model.dat'
FlacFile = 'Flac3D_Model.dat'
file_name='7-6_add'+string(n)+'.sav'
save file_name
cal flacfileFra bibliotekmacro命令
macro Sand 'bulk 1e8 shear 0.5e8 coh 0 tens 0 fric 35'
macro Clay 'bulk 1e7 shear 0.3e7 coh 1e7 tens 0 fric 0'
prop sand range Layer1
prop clay range layer2
hist gp zdisp 4,4,8
hist id=3 gp zdis 1 1 3 'id为监测变量的编号，默认的是从1开始编号。建议对监测变量进行编号，以便后处理调用
plot his 2 3 vs 4 'plots histories 2 and 3 versus history 4; history 4 plots along the abscissa.
;****************************************
hist命令
hist reset '清除已有历史信息
set hist_rep 1 '每一个时步记录一次
hist n=5 '每5个时步记录一次
hist write 1 3 vs 2 begin 150 end 375 file xx.txt
TABLE n <keyword> x1 y1 <x2 y2> <x3 y3> . . .
erase erases all entries in table n.
insert
name 'string' 'changes the name of table number n to 'string'. The table ID number is not changed.
edit---copy to clipboard----粘贴到word
;****************************************
ini xdis 0 ydis 0 zdis 0
set grav 0 0 -9.81
set mech force=50 '最大不平衡力小于50n，停止计算
Big_Brick
macro 'Pt0' 'p0 15 15 15'
gen Big_Brick ; this will cause an error
group range macro命令
Using different object types to do the same job
using a RANGE object ...
model mohr range z 0 5
prop ClayeyGravel range z 0 5
;****************************************
视图操作：x y z m
ctr+r还原
ctr+p保存图片
ctr+z鼠标选择
ctr+g彩图变为灰色图
shift +（x y z m）旋转缩放
运算
= # > < >= <=
负数在运算时，要加（），以免和减号-混淆
degrad 'π/180
pi 'π
ngp '节点总数
nzone '单元体总数
;****************************************
单元/节点遍历
p_z = zone_head
loop while p_z # null
pl con zd plane '显示变量
pl add ske
pl add dis plane
pl add axe
pl con sxx outline on ;查看水平应力云图，outline on表示显示模型的边界，默认为off
;****************************************
;****************************************
table操作详见ftd128（59/114)）
table 1 name load_settlement '创建新表格
xtable(n,s)=……对编号为n的表的第s行、x列进行赋值
ytable(n,s)=……对编号为n的表的第s行、y列进行赋值
;****************************************
group命令
group soil range z 1 2 ;定义group
prop bulk 7.8e6 shear 3.0e6 coh 10e3 fric 15 ran group soil ;给group赋值
model null range group soil
pl his xla 'string' ylab 'string' '设置x y轴的名称
pl his xmaximum ?? xminimum ?? '设置x轴的最大最小刻度
pl his ymaximum ?? yminimum ?? '设置y轴的最大最小刻度
pl his both 'line+mark
range name Big_Brick x -3 3 y -2 2 z -1 1
model elastic range Big_Brick
prop bulk 1e8 shear 1e8 range Big_Brick
range name Layer1 plane dip 0 dd 0 ori 0 0 0 above
macro SiltySand 'bulk 1.5e8 shear 0.3e8'
macro ClayeyGravel 'bulk 1.5e8 shear 0.6e8 fric 30 coh 5e6 ten 8.66e6'
model elas range z 5 10
prop SiltySand range z 5 10
plot table 1 line
plot table 1 both '点、线同时显示
常用编辑文本文件的方法进行表的读入与调用
第1行：表的名称
第2行：x1 y1
第3行：x2 y2
……
空行'注：在表的文本文件最后，需要有一个回车换行符，否则会出现"error reading file xxx.dat"的错误，
model null range group Big_Brick
using a macro object ...
macro Big_Brick 'x = (-3,3) y = (-2,2) z = (-1,1)'
model null range Big_Brick
gen zone brick size 10,10,10
set log on
print gp pos
set log off
;****************************************
open close用法
;close当前文件关闭，返回值为0表示成功关闭
open(filename,wr,mode) '先打开文件，然后可以读，可以往里写内容
…………
endif
command
…………
endcommand
loop n（1,21）
…………
endloop
loop while …………
…………
endloop
caseof …………
…………
case n1
…………
case n2
…………
endcase
;****************************************
macro Pt0 'p0 0 0 0'
macro Pt1 'p1 add 10 0 0'
macro Pt2 'p2 add 0 10 0'
macro Pt3 'p3 add 0 0 10'
macro Model_Size 'size 4 5 6'
macro Big_Brick 'gen zone brick Pt0 Pt1 Pt2 Pt3 Model_Size'
range cylinder end1 x1 y1 z1 end2 x2 y2 z2 radius r
cylindrical range with one end of the cylinder axis (end1) at location (x1, y1, z1), the other end (end2) at location (x2, y2, z2), and with a cylinder radius of r '由(x1, y1, z1)、(x2, y2, z2)两点确定旋转轴
save_file=string(n)+'_step.sav'
D3DECFile = 'D3dec_Model.dat'
FlacFile = 'Flac3D_Model.dat'
file_name='7-6_add'+string(n)+'.sav'
save file_name
cal flacfileFra bibliotekmacro命令
macro Sand 'bulk 1e8 shear 0.5e8 coh 0 tens 0 fric 35'
macro Clay 'bulk 1e7 shear 0.3e7 coh 1e7 tens 0 fric 0'
prop sand range Layer1
prop clay range layer2
hist gp zdisp 4,4,8
hist id=3 gp zdis 1 1 3 'id为监测变量的编号，默认的是从1开始编号。建议对监测变量进行编号，以便后处理调用
plot his 2 3 vs 4 'plots histories 2 and 3 versus history 4; history 4 plots along the abscissa.
;****************************************
hist命令
hist reset '清除已有历史信息
set hist_rep 1 '每一个时步记录一次
hist n=5 '每5个时步记录一次
hist write 1 3 vs 2 begin 150 end 375 file xx.txt
TABLE n <keyword> x1 y1 <x2 y2> <x3 y3> . . .
erase erases all entries in table n.
insert
name 'string' 'changes the name of table number n to 'string'. The table ID number is not changed.
edit---copy to clipboard----粘贴到word
;****************************************
ini xdis 0 ydis 0 zdis 0
set grav 0 0 -9.81
set mech force=50 '最大不平衡力小于50n，停止计算
Big_Brick
macro 'Pt0' 'p0 15 15 15'
gen Big_Brick ; this will cause an error
group range macro命令
Using different object types to do the same job
using a RANGE object ...
model mohr range z 0 5
prop ClayeyGravel range z 0 5
;****************************************
视图操作：x y z m
ctr+r还原
ctr+p保存图片
ctr+z鼠标选择
ctr+g彩图变为灰色图
shift +（x y z m）旋转缩放
运算
= # > < >= <=
负数在运算时，要加（），以免和减号-混淆
degrad 'π/180
pi 'π
ngp '节点总数
nzone '单元体总数
;****************************************
单元/节点遍历
p_z = zone_head
loop while p_z # null
pl con zd plane '显示变量
pl add ske
pl add dis plane
pl add axe
pl con sxx outline on ;查看水平应力云图，outline on表示显示模型的边界，默认为off
;****************************************
;****************************************
table操作详见ftd128（59/114)）
table 1 name load_settlement '创建新表格
xtable(n,s)=……对编号为n的表的第s行、x列进行赋值
ytable(n,s)=……对编号为n的表的第s行、y列进行赋值
;****************************************
group命令
group soil range z 1 2 ;定义group
prop bulk 7.8e6 shear 3.0e6 coh 10e3 fric 15 ran group soil ;给group赋值
model null range group soil
pl his xla 'string' ylab 'string' '设置x y轴的名称
pl his xmaximum ?? xminimum ?? '设置x轴的最大最小刻度
pl his ymaximum ?? yminimum ?? '设置y轴的最大最小刻度
pl his both 'line+mark
range name Big_Brick x -3 3 y -2 2 z -1 1
model elastic range Big_Brick
prop bulk 1e8 shear 1e8 range Big_Brick
range name Layer1 plane dip 0 dd 0 ori 0 0 0 above
macro SiltySand 'bulk 1.5e8 shear 0.3e8'
macro ClayeyGravel 'bulk 1.5e8 shear 0.6e8 fric 30 coh 5e6 ten 8.66e6'
model elas range z 5 10
prop SiltySand range z 5 10
plot table 1 line
plot table 1 both '点、线同时显示
常用编辑文本文件的方法进行表的读入与调用
第1行：表的名称
第2行：x1 y1
第3行：x2 y2
……
空行'注：在表的文本文件最后，需要有一个回车换行符，否则会出现"error reading file xxx.dat"的错误，
model null range group Big_Brick
using a macro object ...
macro Big_Brick 'x = (-3,3) y = (-2,2) z = (-1,1)'
model null range Big_Brick
gen zone brick size 10,10,10
set log on
print gp pos
set log off
;****************************************
open close用法
;close当前文件关闭，返回值为0表示成功关闭
open(filename,wr,mode) '先打开文件，然后可以读，可以往里写内容
…………
endif
command
…………
endcommand
loop n（1,21）
…………
endloop
loop while …………
…………
endloop
caseof …………
…………
case n1
…………
case n2
…………
endcase
;****************************************
macro Pt0 'p0 0 0 0'
macro Pt1 'p1 add 10 0 0'
macro Pt2 'p2 add 0 10 0'
macro Pt3 'p3 add 0 0 10'
macro Model_Size 'size 4 5 6'
macro Big_Brick 'gen zone brick Pt0 Pt1 Pt2 Pt3 Model_Size'
