z_fsi(p_z, arr)是什么意思？ [复制链接]

在某处看到下列一求算应变的FISH程序，本人愚笨，希望牛人回答。在此感谢。
!.iu_xJ  
xr!FDfM.K  
N J:]jd  
;求应变 $f>Mz|j  
def ax_str =Y|TShKk  
str1 = 0 jEklf0Z  
n=1.0 tr7FV1p  
array arr(6) lW'6rat  
pnt1 = zone_head KXcG;b[7n  
loop while pnt1 # null ]tH/87qJ  
if z_zcen(pnt1) <0.1 then TJ7on
.;  
oo = z_fsi(pnt1,arr) 0sVCTJ@  
str1 = str1 -arr(3) J/w?F
a<  
endif .{HU1/!  
pnt1 = z_next(pnt1) ^R1 nOo/  
n=n+1.0 2i', e  
endloop O<S*bN>BF  
ax_strain = str1 / n ; pi 面积 Yg/e8Q2  
O(,Ezyx  
*gHOH!K,S  
问题为：1. z_fsi(pnt1,arr) 什么什么意思啊？ K>Fo+f
  
               2. 能解释下这个程序的具体意思吗？ |U1X~\""  

老实说,不想回答这个问题, 向对不知道 1+1=2 的人,讲 1+2=3 , 很烦的 ZNFn^iuQ  
.zlUN0oe  
XIJ>\ RF  
oo = z_fsi(p_z,arr)  该命令返回值是0，所以左边可以任意写字母 ]5x N^7_!j  
X)fj&  
fsi  应变量（张量），它的效果是得到 区域(zone) 的六个应变量, 存在数组 arr 中 -DX|[70  
 p(Y'fd}  
而且，要求 arr(6) 必须预先定义 ， 上述的 fish 正是如此做的 mY(~94{d  
p4<&NMG  
fcr\XCG7U  
fbNVmjb$)  
至于 if  ...  endif   判断 区域中 其中心坐标在 0 处的区域 azPFKg+  
!s\-i6S>  
cli
P+#  
loop while  ... endloop    pnt1=zone_head , pnt1=z_next(pnt1) 这些基础命令，没什么好说的