- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
火炮发射动力学概论第6讲-2010
移动副 第六步:定义炮膛合力模型 (1)定义作用点 (2)作用力工具 (3)作用力定义及属性修改 选Subroutine 第七步:调入动态链接库 鼠标右击此处 第八步:设置仿真策略 仿真图标 仿真结束时间 积分步数或步长 鼠标左击开始仿真 第九步:结果分析 考察后坐动作过程 图表曲线输出 (2) 弹簧-阻尼建模命令 刚度系数 阻尼系数 4.2.4 构件间碰撞与接触的建模 两个构件相互接触/碰撞时,构件发生变形而产生接触力,接触力的大小与变形的大小和速度有关。 ADAMS采用Dubosky弹簧-阻尼接触铰理论计算法向接触力 g为某时刻两接触面间的渗透量 阻尼系数 切向摩擦力 h=step(x,x0,h0,x1,h1)的定义 4.3 后坐部分动力学建模与仿真 (1)总体尺寸 耳轴 复进杆中心线 驻退筒中心线 炮尾上作用点(513,180,0) 炮尾上作用点(513,-205,0) 炮膛合力作用点(353,0,0) 后套箍 前套箍 后套箍 前套箍 炮口制退器 炮尾 构件名称 安装位置 (370,0,0) (663, 0,0) (1773, 0,0) (3018,0,0) (2)导入几何模型 身管 炮尾(含炮闩、参加后坐的反后坐装置) 前套箍 后套箍 炮口制退器 Parasolid格式:仅有几何模型,需赋材料属性 cmd格式:ADAMS命令文件,完整的模型 (3)约束定义 后套箍 前套箍 炮口制退器 炮尾 构件1 安装位置 (370,0,0) (663,0,0) (1773,0,0) (3018,0,0) 构件2 约束类型 身管 身管 身管 身管 身管 摇架 固结 固结 固结 固结 移动 (690.4,-4.3,-0.03) (4)力的定义 驻退机力 炮膛合力 力的名称 Reaction Body及作用位置 - Action Body及作用位置 炮尾 炮尾 (353,0,0) (513,-205,0) 炮尾 (513,180,0) 复进机力 摇架 (1813,-205,0) 摇架 (1813,180,0) 力的作用位置 后坐位移和速度的计算 SYSFNC(DX, IPAR, 3, DX, ERRFLG) ADAMS系统函数 IPAR(1)、 IPAR(2) 、IPAR(3)依次存储Marker i、j、k的ID 返回值 在l坐标系中求导数 SYSFNC(VX, JPAR, 4, VX, ERRFLG) JPAR(1)、 JPAR(2) 、JPAR(3) 、JPAR(4)依次存储Marker i、j、k、l的ID 身管上的Marker: Marker_19 (1000,0,0) 摇架上的Marker: Marker_20 (1000,0,0) IPAR(1)=19、 IPAR(2)=20 、IPAR(3)=20 JPAR(1)=19、 JPAR(2)=20 、JPAR(3)=20 、JPAR(4)=20 SYSFNC(DX, IPAR, 3, DX, ERRFLG) SYSFNC(VX, JPAR, 4, VX, ERRFLG) 驻退机力 炮膛合力 力的名称 传递参数 (10,19,20,20) name SFORCE_recoil_force SFORCE_recuputer_force 复进机力 (30,19,20,20) (20,19,20,20) SFORCE_gas_force 驻退机力和复进机力的方向定义方式 INTEGER IPAR( 3 ), JPAR(4) I_JU=PAR(1) IPAR( 1 ) = PAR( 2 ) IPAR( 2 ) = PAR( 3 ) IPAR( 3 ) = PAR( 3 ) JPAR(1)=PAR(2) JPAR(2)=PAR(3) JPAR(3)=PAR(3) JPAR(4)=PAR(3) CALL SYSFNC(DX, IPAR, 3, DX, ERRFLG) CALL SYSFNC(VX, JPAR, 4, VX, ERRFLG) S_RECOIL=DX/1000 V_RECOIL=VX/1000 (5)程序实现 IF(I_JU.EQ.10) THEN CALL PPT_FORCE(PT_FORCE,TIME) VALUE=-PT_FORCE END IF IF(I_JU.EQ.20) THEN CALL FJ_FORCE(PF_FORCE,S_RECOIL) VALUE=-PF_FORCE END IF
文档评论(0)