揭秘MSC NASTRAN DMAP语言的奥秘

欢迎关注老黄个人微信公众号《声振研究》

未经允许，严禁转载！

MSC Nastran 提供了一种高级语言 DMAP，这种语言定义表示这些矩阵操作序列的算法 。本文将初步介绍MSC Nastran软件中DMAP语言(直接矩阵 输入)，为大家编程提供一种新的矩阵运算 的思路。

本文框架

1. 注意事项

2. 程序模式

3. 数据类型

4. 循环语句

5. 常用模块

6. 后记

1. 注意事项

所有DMAP指令位于Nastran输入文件执行控制段

可以修改任何已有的SOL’s或建立自己的Solution

修改已有的SOL,使用ALTER

建立自己的Solution ,用“MAIN”subDMAP

Nastran中矩阵命名：K—刚度，M—质量，P—载荷，U—位移，Q—反力 ，B—阻尼，G—变换

2. 程序模式

以下为一个完整的DMAP小程序，蓝色为自定义部分。

SOL NAME

COMPILE NAME,LIST $ LIST t表示打印到.f06文件中

SUBDAMP NAME

$编写的DMAP语句

END

CEND

3. 数据类型

由“TYPE”语句定义

TYPE PARM,(nddl),(type),(y/n),param1(=default),param2(=default),....

其中:

nddl =表明参数可以用作定界符或可以存储在数据库中

type =参数类型说明，I,RS,RD,CS,CD,CHARi,LOGICAL

y/n =表明是否参数值可以通过输入获得（情况控制或数据集）

parami(=default) –参数名称与缺损值

整型Integer ，(I) - 1

单精度实型Real-single precision ，(RS) - 1.23

双精度实型Real-double precision (RD) - 1.23D-01

单精度复型Complex-single precision， (CS) - (1.0,.12)= 1. +.12i

双精度复型Complex-double precision(CD) -(1.3d3,1.23D04)

字符型Character ，(Chari) –其中，i为字符数

逻辑型Logical ，(LOGICAL) - TRUE

4. 循环语句

Do循环语句：

DO WHILE (expression)

DMAP语句.

ENDDO

例子：(注意message中的引号不能错)

SOL name $

COMPILE name, LIST $

SUBDMAP name $

TYPE PARM,,I,N,ICOUNT

ICOUNT=1 $

DO WHILE(ICOUNT <20)$

MESSAGE //'INSIDE LOOP- ICOUNT = '/ICOUNT $

ICOUNT=ICOUNT + 1 $

ENDDO$

MESSAGE//'LOOP DONE - ICOUNT= '/ICOUNT $

END

CEND

BEGIN BULK

ENDDATA

If语句：

IF(逻辑表达式 )THEN $

DMAP语句1

ELSE

DMAP语句2

ENDIF$

例子：

SOL name $

COMPILE name, LIST $

SUBDMAP name $

A=3

IF(A=3)THEN $

$仅当A=3时，下行被执行

MESSAGE //’A =’ /A $

ENDIF$

END

CEND

BEGIN BULK

ENDDATA

5. 常用模块

模块的具体用法可以使用Nastran帮助文档(DMAP文档和快速查询文档)进行查询，本文不再详述。



6. 后记

求解大型工程问题 时([A]{x}=[B])，可以采用Fortran编程计算相应的系数矩阵 [A]与[B]，采用DMAP语言中的SOLVE模块将计算得到的矩阵导入MSC Nastran求解器中，利用成熟的Nastran求解器进行大型矩阵的计算。该思路适用于大部分数值算法 (FE算法、FE-BE算法、FE-IE算法、FE-FE-BE算法等)。

武汉格发信息技术有限公司，格发许可优化管理系统可以帮你评估贵公司软件许可的真实需求，再低成本合规性管理软件许可,帮助贵司提高软件投资回报率，为软件采购、使用提供科学决策依据。支持的软件有: CAD,CAE,PDM,PLM,Catia,Ugnx, AutoCAD, Pro/E, Solidworks ,Hyperworks, Protel,CAXA,OpenWorks LandMark,MATLAB,Enovia,Winchill,TeamCenter,MathCAD,Ansys, Abaqus,ls-dyna, Fluent, MSC,Bentley,License,UG,ug,catia,Dassault Systèmes,AutoDesk,Altair,autocad,PTC,SolidWorks,Ansys,Siemens PLM Software,Paradigm,Mathworks,Borland,AVEVA,ESRI,hP,Solibri,Progman,Leica,Cadence,IBM,SIMULIA,Citrix,Sybase,Schlumberger,MSC Products...