声振论坛

 找回密码
 我要加入

QQ登录

只需一步,快速开始

查看: 1617|回复: 2

[结构分析] *if嵌套到*do循环中运行不了,请各位帮忙看一下

[复制链接]
发表于 2007-7-17 20:01 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?我要加入

x
我看了很久也没找出原因,烦请各位前辈费心指点:
加荷载的时候有两段程序,第一段可以运行:
csys,0
asel,s,area,,2
esla,s
nsla,s,1
*get,enmax,elem,,num,max
*get,enmin,elem,,num,min
fcum,add
*do,i,enmin,enmax,1
*if,esel(i),eq,1,then
*get,ae,elem,i,area
ze=centrz(i)
p_e=-(ka*gama2*(depth-0.05)+ka*gama1*0.050)
f_tot=p_e*ae
esel,s,elem,,i
nsle,s,corner
*get,nn,node,,count
f_n=f_tot/nn
*do,j,1,nn
f,nelem(i,j),fz,f_n
*enddo
*endif
esla,s
*enddo
但是把第一段中加一个*if循环,成为第二段就运行不了了:
csys,11                                      
asel,s,area,,1                              
esla,s                                       
nsla,s,1                                    
*get,enmax,elem,,num,max                     
*get,enmin,elem,,num,min                     
fcum,add                                    
*do,i,enmin,enmax,1                          
*if,esel(i),eq,1,then                        
*get,ae,elem,i,area                          
ze=centrz(i)                                 
*if,ze,ge,0,and,ze,lt,depth-0.05,then        
p_e=-(ka*gama2*(depth-ze-0.050)+ka*gama1*0.05
*elseif,ze,ge,depth-0.05,and,ze,le,depth,then
p_e=-(ka*gama1*(depth-ze))                  
*else                                       
p_e=0                                       
*endif               
                       
f_tot=p_e*ae                                 
esel,s,elem,,i                              
nsle,s,corner                                
*get,nn,node,,count                          
f_n=f_tot/nn                                 
*do,j,1,nn                                   
f,nelem(i,j),fx,f_n                          
*enddo                                       
*endif                                       
esla,s                                       
*enddo
加上这段,就会在file.err 中出现 Specified forces from the previous F command were applied only to the   
selected NODAL LOAD set.

[ 本帖最后由 p1gx 于 2007-7-17 20:49 编辑 ]
回复
分享到:

使用道具 举报

发表于 2007-7-18 08:01 | 显示全部楼层
这不是你题目中所说的问题,一步一步调试一下,看看每一步的结果是否和你要求的一致
发表于 2007-7-18 14:29 | 显示全部楼层
*elseif,ze,ge,depth-0.05,and,ze,le,depth,then
把这句的then去掉试试。
您需要登录后才可以回帖 登录 | 我要加入

本版积分规则

QQ|小黑屋|Archiver|手机版|联系我们|声振论坛

GMT+8, 2024-12-1 04:16 , Processed in 0.061140 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表