[发明专利]基于宏命令建模的螺纹管换热器设计方法在审
申请号: | 202110445096.2 | 申请日: | 2021-04-24 |
公开(公告)号: | CN113139312A | 公开(公告)日: | 2021-07-20 |
发明(设计)人: | 谢晶;黄诗洋;王金锋;王侃 | 申请(专利权)人: | 上海海洋大学 |
主分类号: | G06F30/23 | 分类号: | G06F30/23;G06F30/28;G06F30/17;G06F111/10 |
代理公司: | 暂无信息 | 代理人: | 暂无信息 |
地址: | 201306 上海市*** | 国省代码: | 上海;31 |
权利要求书: | 查看更多 | 说明书: | 查看更多 |
摘要: | |||
搜索关键词: | 基于 命令 建模 螺纹 换热器 设计 方法 | ||
基于宏命令建模的螺纹管换热器设计方法,具体的步骤包括:(1)打开Solidworks后,在上方菜单栏空白处调出宏(Macro)菜单;(2)选择新建宏,保存为Macro1.swp;(3)菜单栏‑工具‑引用,检查Solidworks相关库Library是否已经被正确引用,如果没有,需要手动添加;(4)内流体的Solidworks宏命令建模;(5)外管壁的Solidworks宏命令建模;(6)管壁与流体Solidworks组合划分;(7)导入ANSYS Fluent仿真的预处理。本发明能够有效的解决螺旋波纹管建模不够准确和耗时长的问题,为波纹管换热器数值计算的建模提供一种快速准确的解决方案。
技术领域
本发明涉及换热器传热研究领域,具体涉及一种为了数值计算进行螺纹管换热器建模的方法,特别是涉及一种基于Solidworks宏命令建模的螺纹管换热器设计方法。
背景技术
螺纹管在强化管中是非常具有代表性且具有显著的强化传热效果的一种强化管,但是由于管道加工复杂且成本较高,传统实验很难观察到结构对管内制冷剂流动沸腾的影响,因此需要通过一种CFD数值模拟方法对螺纹管换热器的换热过程进行模拟,解决传统经验公式和实验局限性大、展现问题不够直观的问题,能够解决传统实验耗时长、成本高的问题。数值模拟方法推进中首先需要对螺纹管换热器进行建模,而由于建模对象复杂,因此建模的过程耗时长,建模后的文件与数值计算软件不兼容等问题使得数值计算的问题难以进行。
发明内容
本发明的目的在于,提供一种基于Solidworks宏命令建模的螺纹管换热器设计方法,为螺纹管换热器的数值模拟提供模型。
为实现上述目的,本发明的实施方案提供了一种基于Solidworks宏命令建模的螺纹管换热器设计方法,包括:(1)打开Solidworks后,在上方菜单栏空白处调出宏(Macro)菜单;(2)选择新建宏,保存为Macro1.swp;(3)菜单栏-工具-引用,检查Solidworks相关库Library是否已经被正确引用,如果没有,需要手动添加;(4)内流体的Solidworks宏命令建模;(5)外管壁的Solidworks宏命令建模;(6)管壁与流体Solidworks组合划分;(7)导入ANSYS Fluent仿真的预处理。
所述内流体的Solidworks宏命令建模的步骤为:
1)删除原代码;
2)撰写新的宏命令代码:
Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long
Sub main()
Set swApp = Application.SldWorks
End Sub ;
3)新的宏命令代码全部写在Main()函数中;
4)新建零件:在Main()函数中写入以下代码:
Dim swSheetWidth As Double
swSheetWidth = 0
Dim swSheetHeight As Double
swSheetHeight = 0
Set Part = swApp.NewDocument(C:\ProgramData\SolidWorks\
SOLIDWORKS 2020\templates\gb_part.prtdot, 0, swSheetWidth,swSheetHeight)
Dim swPart As PartDoc
Set swPart = Part
该专利技术资料仅供研究查看技术是否侵权等信息,商用须获得专利权人授权。该专利全部权利属于上海海洋大学,未经上海海洋大学许可,擅自商用是侵权行为。如果您想购买此专利、获得商业授权和技术合作,请联系【客服】
本文链接:http://www.vipzhuanli.com/pat/books/202110445096.2/2.html,转载请声明来源钻瓜专利网。