命令流共享-FLAC3D模型导入ANSYS中
4页1、;* get nodetotal & zone total *; Initializationdef initializationIO_READ = 0 IO_WRITE = 1IO_FISH = 0IO_ASCII = 1SuferFile=FLAC-ANSYS_MODEL.datarray message(1)endinitializationdef writehead pnt1=zone_head pnt2=gp_head Z_total=0 P_total=0 loop while pnt1 # null Z_total=Z_total+1 pnt1=z_next(pnt1) endloop loop while pnt2 # null P_total=P_total+1 pnt2=gp_next(pnt2) endloop message(1)=!- n message(1)=!This is a free soft for converting the model from Flac3d to Ansys! n message(1)=!Code by haitang 200
2、6-05-30 n message(1)=!- n message(1)=!The Number of Nodes and Elements n message(1)=message(1)+!+string(P_total)+ , +string(Z_total)+n message(1)=message(1)+/prep7 n message(1)=message(1)+ET,1,SOLID45 status = write(message,1)enddefine GetElements Z1_p=zone_head loop n (1,Z_total) Z1_code=z_code(Z1_p) Z1_No=z_id(Z1_p) Z1_Group=z_group(Z1_p) if Z1_code=0 then message(1)=MAT, +string(Z1_Group)+n message(1)=message(1)+E, +string(gp_id(z_gp(Z1_p,1) message(1)=message(1)+,+ string(gp_id(z_gp(Z1_p,2)
3、message(1)=message(1)+,+ string(gp_id(z_gp(Z1_p,5) message(1)=message(1)+,+ string(gp_id(z_gp(Z1_p,3) message(1)=message(1)+,+ string(gp_id(z_gp(Z1_p,4) message(1)=message(1)+,+ string(gp_id(z_gp(Z1_p,7) message(1)=message(1)+,+ string(gp_id(z_gp(Z1_p,8) message(1)=message(1)+,+ string(gp_id(z_gp(Z1_p,6) status = write(message,1) Z1_p=z_next(Z1_p) endif if Z1_code=1 then message(1)=MAT, +string(Z1_Group)+n message(1)=message(1)+E, +string(gp_id(z_gp(Z1_p,1) message(1)=message(1)+,+string(gp_id(z
《命令流共享-FLAC3D模型导入ANSYS中》由会员枫**分享,可在线阅读,更多相关《命令流共享-FLAC3D模型导入ANSYS中》请在金锄头文库上搜索。
2021年中考前学生国旗下讲话范文四篇
交通警告标志大全.doc
带式输送机安全操作规程及注意事项
《客房》课程开发计划、实施方案
靛颏饲料配方集锦.doc
第7课 张贴的画.doc
散装化学品及其特性.doc
工程签证与设计变更管理制度
水泥粉煤灰稳定碎石基层应用技术.docx
职业农民阳光心态教案六.doc
中国建筑文化再反思 回应叶廷芳先生.doc
2023年江苏盐城滨海县农村订单定向医学生定向招考聘用31人笔试题库含答案详解析
在新形势下如何加强医德医风建设.doc
六年级应用题总复习试卷
集团公司半年工作报告
2015年安全资格考试试题3.doc
四川苏式月饼项目可行性研究报告(DOC 103页)
父亲节活动方案2023年活动策划.doc
家装公司业务员岗位职责.docx
20XX年妇幼保健院工作计划-1.docx
2022-11-10 15页
2023-06-14 5页
2023-01-08 4页
2023-04-10 5页
2022-09-30 6页
2023-07-15 3页
2023-10-15 8页
2023-05-14 9页
2023-06-03 6页
2023-05-31 4页