24小时热门版块排行榜    

查看: 1613  |  回复: 5
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

leo545

金虫 (小有名气)

[求助] 焊接热源的施加问题?已有1人参与

如何修改以下程序,使焊接热源的起始点不位于坐标原点而在某一坐标值?
*DIM,FLUX2,TABLE,MAX_X,MAX_Y,MAX_TIME,X,Y,TIME

*DO,K,1,MAX_TIME,1

*DO,I,1,MAX_X,1
FLUX2(I,0,K)=(I-1)*LSIZE
*ENDDO

*DO,J,1,MAX_Y,1
FLUX2(0,J,K)=(J-1)*LSIZE
*ENDDO

*DO,I,1,MAX_X,1
*DO,J,1,MAX_Y,1
XCENTER=0
YCENTER=v*(K-1)*TINC

LL=sqrt(((I-1)*LSIZE-XCENTER)**2+((J-1)*LSIZE-YCENTER)**2)
Q=200000!热流密度

*IF,LL,LE,R,THEN
FLUX2(I,J,K)=Q
*ELSE
FLUX2(I,J,K)=0
*ENDIF
*ENDDO

*ENDDO

FLUX2(0,0,K)=(K-1)*TINC

*ENDDO
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

翔云之鹏

银虫 (初入文坛)

这个真专业
5楼2012-03-26 10:52:09
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 leo545 的主题更新
信息提示
请填处理意见