应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 仿真模拟 » ANSYS & ABAQUS » 悬索桥主缆线形非线性分析找形
21/1返回列表
查看: 2493  |  回复: 1
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

厚德载物le

新虫 (初入文坛)

[求助] 悬索桥主缆线形非线性分析找形

!!!主缆线形确定                                 
!!!给变量和函数赋值                             
!!!设计变量                                    
!!!                                             
finish                                          
/clear                                          
                                                
!!!定义桥梁设计基本信息                        
E_x=100e9                                       
Are=0.12035                                    
Rdens=7850                                      
L_LEN=160                                       
L_LEN2=70                                       
f_LEN=26.666                                    
TOWER=31.927                                    
                                                
!!!定义单元类型、实常数个数                     
*dim,r_c,,L_LEN+L_LEN2                          
/PREP7                                          
ET,1,LINK10,,1,0                                
                                                
!!!定义主缆材料                                 
MP,EX,1,E_x                                    
MP,PRXY,1,0.3                                   
MP,ALPX,1,0.000012                              
MP,DENS,1,Rdens                                 
                                                
!!!定义实常数，先按照数量级指定                 
*do,i,1,L_LEN+L_LEN2                           
  r,i,Are,0.03                                 
*enddo                                          
                                                
!!!定义节点坐标，按抛物线方程: Y=AA*X**2+BB*X+CC
AA=f_LEN/((L_LEN/2)**2)                        
BB=0                                            
CC=TOWER-f_LEN                                 
                                                
*do,i,0,L_LEN                                   
   Xd=i-L_LEN/2                                 
   n,i+1,Xd ,AA*Xd**2+CC                        
*enddo                                          
                                                
!!!定义缆索单元                                 
MAT,1                                          
TYPE,1                                          
*DO,I,1,L_LEN                                   
  REAL,I                                       
  EN,I,I,I+1                                    
*ENDDO                                          
D,001,ALL                                       
D,L_LEN+1,ALL                                   
                                                
!!!定义吊杆力                                   
NSEL,S,,,6,156,5                                
F,ALL,FY,-1958500                              
/SOLU                                          
ACEL,,10                                       
ANTYPE,4                                       
NLGEOM,1                                       
SSTIF,ON                                       
TIME,1e6                                       
ALLSEL                                          
SOLVE                                          
finish                                          
                                                
!!!提取单元内力                                 
/post1                                          
ETABLE,,LS,1                                    
*VGET,r_c,ELEM,1,ETAB,LS1                       
finish                                          
                                                
u_y=1E-9                                       
*dowhile,u_y                                    
  /prep7                                       
  !!!按抛物线重新定义节点坐标                  
  deltf=-uy(L_LEN/2+1)                          
  AA=-deltf/((L_LEN/2)**2)                     
  BB=0                                          
  CC=deltf                                      
  *do,n,0,L_LEN                                 
      Xd=n-L_LEN/2                              
      delty=AA*xd**2+CC                        
      NMODIF,n+1,nx(n+1),ny(n+1)+uy(n+1)+delty  
  *enddo                                       
  !!!!重新定义实常数                           
  *DO,n,1,L_LEN                                 
      *GET,prrr,RCON,n,const,2                  
      rrr=(prrr+r_c(n)/E_x)/2                  
      r,n,Are,rrr                              
  *enddo                                       
  finish                                       
                                                
  /SOLU                                         
  ACEL,,10                                      
  ANTYPE,4                                      
  TIME,1                                       
  ALLSEL                                       
  SOLVE                                         
  finish                                       
                                                
  !!!!提取单元内力                              
  /POST1                                       
  ETABLE,LS1,LS,1                              
  *VGET,r_c,ELEM,1,ETAB,LS1                     
                                                
  !!!!定义迭代终止条件                          
  *do,i,1,L_LEN/2+1                             
   u_yy=abs(uy(i))                              
   *if,u_yy,ge,u_y,then                        
      u_y=u_yy                                 
   *endif                                       
  *enddo                                       
  *if,u_y,le,0.00001,exit                       
  finish                                       
*enddo     






ANSYS dowhile循环语句只进行了第一步循环然后就一直停留在那一个位置不动了，控制变量u_y的数值也保持不变了，因此进入了死循环怎么破。   一样大神们能够帮忙解决

发自小木虫Android客户端
回复此楼

» 猜你喜欢

» 本主题相关商家推荐: (我也要在这里推广)
1楼 2016-05-19 10:19:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

厚德载物le

新虫 (初入文坛)
其实大家看的话。就看一下循环语句里面的内容就好了，实在找不出问题了。u_y的数值一直没有变化。因此不收敛，可是我真的找不出原因了。。

发自小木虫Android客户端
赞一下 回复此楼
2楼2016-05-19 10:21:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 厚德载物le 的主题更新
21/1返回列表
普通表情 龙 兔 虎 猫
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[基金申请] 欢迎发来filecode的Mz6后的代码验证其规律 +31 医学老男孩 2026-08-13 69/3450 2026-08-16 00:16 by mo_mo_mo_mo
[基金申请] 时间戳又变了8-15 +12 archvillain 2026-08-15 23/1150 2026-08-15 20:47 by foyo404
[基金申请] filecode=后面第一个是大写字母 +6 wangze12014 2026-08-14 7/350 2026-08-15 20:12 by gltch
[基金申请] filecode +8 cratir 2026-08-14 12/600 2026-08-15 18:08 by zyfgau
[基金申请] 关于Filecode分析方法 +10 majunge000 2026-08-10 13/650 2026-08-15 12:26 by hanpeng972
[基金申请] 奇怪，两个人的filecode固定段从头到尾一模一样 +8 布布和一二 2026-08-10 11/550 2026-08-14 14:58 by Equinoxhua
[硕博家园] 读博的好处 +4 lnee 2026-08-11 4/200 2026-08-14 10:20 by ahsoarli
[基金申请] filecode +15 documentary 2026-08-10 17/850 2026-08-14 10:08 by kissu88
[基金申请] FileCode能看出啥？ +10 要乐观耀哥 2026-08-10 32/1600 2026-08-14 09:37 by 要乐观耀哥
[基金申请] 我的国基提前知道中了，可是同事的操作让我实在接受不了，怎么会有这样的人 +10 家与远方 2026-08-10 15/750 2026-08-14 02:08 by 绵羊哥哥
[基金申请] 不应该看fileCode +7 且听虎啸 2026-08-12 9/450 2026-08-13 14:27 by flydreamws
[基金申请] Filecode 又变了，巨变 +3 WH3796 2026-08-12 4/200 2026-08-13 14:13 by 小木虫6752397
[基金申请] 结合人工智能，周易传统文化，filecode打分制来了，3分以上希望很大。 +3 Tide man 2026-08-12 4/200 2026-08-13 08:35 by ZJTJZ
[基金申请] 2019年青年基金涵评意见，大家看看几个A，几个B? +11 Tide man 2026-08-11 11/550 2026-08-13 07:35 by 撸猫猫
[基金申请] 综述论文作为代表作会不会影响评审专家的印象分？ +11 yufeiwaner 2026-08-09 13/650 2026-08-12 08:17 by yufeiwaner
[基金申请] 为什么网上很多人说本周 12号出结果 +6 瞬息宇宙 2026-08-10 7/350 2026-08-11 19:25 by Tide man
[基金申请] 确定了，国自然21号放榜 +6 布布和一二 2026-08-10 7/350 2026-08-10 19:15 by 2000zf36392
[基金申请] 国自然结果 +4 Vierhys 2026-08-10 8/400 2026-08-10 15:06 by Vierhys
[基金申请] 据悉今年马上要出结果了 +7 瞬息宇宙 2026-08-10 8/400 2026-08-10 12:42 by Vivilian
[基金申请] 面上项目filecode邪修 +5 西山十月 2026-08-09 7/350 2026-08-10 07:32 by 仁砚薪传
信息提示
关闭
请填处理意见
关闭