ABAQUS子程序
abaqus复合材料失效子程序
abaqus复合材料失效子程序摘要：一、引言1.复合材料的概念和应用背景2.abaqus 软件在复合材料失效分析中的重要性二、abaqus 复合材料失效子程序介绍1.子程序的定义和功能2.子程序的输入和输出参数3.子程序在abaqus 中的调用方法三、abaqus 复合材料失效子程序的使用方法1.材料属性的设置2.边界条件和加载条件的设定3.求解器和求解设置4.后处理工具在失效分析中的应用四、abaqus 复合材料失效子程序在实际工程中的应用1.应用案例一：复合材料梁的失效分析2.应用案例二：复合材料壳体的失效分析3.应用案例三：复合材料连接件的失效分析五、结论1.abaqus 复合材料失效子程序的优势和局限性2.未来发展趋势和前景正文：一、引言随着科技的发展，复合材料在航空航天、汽车制造、建筑结构等领域的应用越来越广泛。
复合材料具有轻质、高强、耐腐蚀等优点，但同时也存在着材料失效问题。
为了确保复合材料结构的安全性能，失效分析显得尤为重要。
abaqus 是一款强大的有限元分析软件，可以对复合材料进行失效分析。
本文将详细介绍abaqus 复合材料失效子程序的使用方法和应用案例。
二、abaqus 复合材料失效子程序介绍abaqus 复合材料失效子程序是基于abaqus 软件开发的，用于分析复合材料在各种工况下的失效行为。
该子程序集成了多种失效准则，可以分析包括纤维断裂、基体开裂、分层等在内的复合材料失效模式。
用户可以通过该子程序得到复合材料失效时的应力、应变、能量等数据，为结构设计提供依据。
三、abaqus 复合材料失效子程序的使用方法1.材料属性的设置：首先需要定义复合材料的各向异性属性，包括纤维和基体的弹性模量、泊松比、密度等。
2.边界条件和加载条件的设定：根据实际工况设置边界位移、固定约束、加载条件等。
3.求解器和求解设置：选择合适的求解器和求解设置，确保求解过程稳定且收敛。
4.后处理工具在失效分析中的应用：通过abaqus 的后处理工具，可以直观地观察到复合材料失效过程的应力、应变分布，以及失效模式。
abaqus 子程序 简单案例
abaqus 子程序简单案例1. 案例一：ABAQUS子程序在计算机辅助工程中的应用在计算机辅助工程中，ABAQUS子程序是一种被广泛应用的工具，用于求解各种复杂的物理问题。
它可以在ABAQUS有限元软件中调用，通过编写用户自定义的子程序来实现特定的功能。
下面将介绍一些常见的ABAQUS子程序案例。
2. 案例二：ABAQUS子程序在材料力学中的应用ABAQUS子程序在材料力学中的应用非常广泛。
例如，可以通过自定义的子程序来模拟材料的非线性行为、塑性变形、断裂行为等。
通过在子程序中编写相应的材料本构模型和损伤模型，可以准确地预测材料的力学性能。
3. 案例三：ABAQUS子程序在流体力学中的应用ABAQUS子程序在流体力学中也有重要的应用。
例如，可以通过自定义的子程序来模拟流体的非牛顿性、多相流动、湍流等现象。
通过在子程序中编写相应的流体本构模型和湍流模型，可以准确地模拟流体的流动行为。
4. 案例四：ABAQUS子程序在结构力学中的应用ABAQUS子程序在结构力学中也非常有用。
例如，可以通过自定义的子程序来模拟结构的非线性行为、接触和摩擦、动力响应等。
通过在子程序中编写相应的结构本构模型和接触模型，可以准确地预测结构的力学性能。
5. 案例五：ABAQUS子程序在热传导中的应用ABAQUS子程序在热传导中的应用也非常广泛。
例如，可以通过自定义的子程序来模拟材料的热传导行为、热辐射、相变等。
通过在子程序中编写相应的热传导模型和相变模型，可以准确地预测材料的热学性能。
6. 案例六：ABAQUS子程序在电磁场中的应用ABAQUS子程序在电磁场中的应用也有一定的研究价值。
例如，可以通过自定义的子程序来模拟电磁场的非线性行为、磁饱和、电磁感应等。
通过在子程序中编写相应的电磁场模型和电磁感应模型，可以准确地模拟电磁场的行为。
7. 案例七：ABAQUS子程序在声学中的应用ABAQUS子程序在声学领域中也有一定的应用。
abaqus子程序实例
abaqus子程序实例
ABAQUS子程序实例有DLOAD子程序。
当物体所受载荷是比较复杂的函数时（如与时间、位置等相关），通过界面输入的方式已经难以实现，通常便需要借助于DLOAD子程序来实现。
DLOAD 子程序用于定义分布负载。
例如，对于P=10*sin(t)，可以直接编写如下的子程序：
Fortran
SUBROUTINE DLOAD
IMPLICIT NONE
INCLUDE 'ABA_PARAM.INC'
INTEGER KSTEP,NOEL,NPT
DOUBLE PRECISION TIME(2),COORDS(3),F,DLOAD_F
COMMON /DLOAD_COM/ F,DLOAD_F
KSTEP = 1
TIME = 0.0D0
NOEL = 1
NPT = 1
COORDS = 0.0D0
F = 10.0D0
DLOAD_F = F*DSIN(TIME(1)*2.0D0*PI/360.0D0)
RETURN
END SUBROUTINE DLOAD
上述程序中，已经明确指出user coding to define F，即表示需要用户自己去定义变量F的值，F的值便表示所加载的载荷大小。
该数值的正负符号有明确的物理意义，对于压力，正数表示压力，负数表示拉力。
也就是说只有F这个变量需要我们去定义，其它的一些变量都是输入变量，是软件传递给我们去使用的，不需要我们去定义。
abaqus子程序umat编写hashin准则
Hashin准则是一种常用的材料失效准则，用于模拟复合材料的损伤和失效。
在ABAQUS中，你可以使用UMAT（用户自定义材料行为）子程序来实现Hashin准则。
以下是一个简单的UMAT子程序示例，用于实现Hashin准则：```c#include "umat.h"#define N 10void UMAT(const int *nIntPoints, const int *nExtPoints, const double *dS, const double *dSP, const double *dStrain, const double*dStress, double *dStrainInc, double *dStressInc, double *dStress历史, int *nFail){double S[N], S0[N];int i;double E1 = dStrain[0];double E2 = dStrain[1];double E3 = dStrain[2];double sigma1 = dStress[0];double sigma2 = dStress[1];double sigma3 = dStress[2];double sigma历史1 = dStress历史[0];double sigma历史2 = dStress历史[1];double sigma历史3 = dStress历史[2]; double m1 = 0.0;double m2 = 0.0;double m3 = 0.0;double n1 = 0.0;double n2 = 0.0;double n3 = 0.0;for (i=0; i<N; i++) {S[i] = sqrt(dS[i]);S0[i] = sqrt(dSP[i]);m1 += S[i] / sigma1;m2 += S[i] / sigma2;m3 += S[i] / sigma3;n1 += S0[i] / sigma历史1;n2 += S0[i] / sigma历史2;n3 += S0[i] / sigma历史3;}if (m1 < 1.0e-6) m1 = 1.0e-6;if (m2 < 1.0e-6) m2 = 1.0e-6;if (m3 < 1.0e-6) m3 = 1.0e-6;if (n1 < 1.0e-6) n1 = 1.0e-6;if (n2 < 1.0e-6) n2 = 1.0e-6;if (n3 < 1.0e-6) n3 = 1.0e-6;double sigmaT = sqrt(m1*m2*m3);double sigmaLT = sqrt(n1*n2*n3);if (sigmaT < sigmaLT) {*nFail = 1; // 损伤发生，将nFail设为1表示材料失效return; // 退出UMAT函数，不再进行应力和应变增量计算} else {*nFail = 0; // 没有损伤发生，将nFail设为0表示材料仍然有效return; // 退出UMAT函数，继续进行应力和应变增量计算}}```以上代码实现了Hashin准则的简单形式，即当总剪切应力小于长纤维方向的纤维应力时，复合材料发生损伤。
《2024年ABAQUS用户材料子程序开发及应用》范文
《ABAQUS用户材料子程序开发及应用》篇一一、引言随着计算机技术的迅猛发展，有限元分析软件在工程领域的应用越来越广泛。
ABAQUS作为一款功能强大的有限元分析软件，其在材料模拟、结构分析、热传导等方面具有广泛的应用。
其中，用户材料子程序的开发是ABAQUS功能的重要组成部分，它允许用户根据实际需求自定义材料模型，提高模拟的准确性和可靠性。
本文将介绍ABAQUS用户材料子程序的开发流程、应用领域及实际案例。
二、ABAQUS用户材料子程序开发流程1. 需求分析：明确材料模型的需求和特点，确定子程序的类型（如弹塑性、蠕变等）。
2. 理论建模：根据需求，建立相应的数学模型和物理模型。
3. 编程实现：使用ABAQUS提供的编程接口（如Fortran、C++等），编写用户材料子程序。
4. 调试与验证：对编写的子程序进行调试和验证，确保其正确性和可靠性。
5. 集成与测试：将子程序集成到ABAQUS中，进行整体测试，确保模拟结果的准确性。
三、ABAQUS用户材料子程序应用领域1. 金属材料：用户材料子程序可用于模拟金属的弹塑性、蠕变、疲劳等行为。
2. 聚合物材料：用于模拟聚合物材料的粘弹性、蠕变、塑性等行为。
3. 复合材料：用于模拟复合材料的力学性能和损伤演化等行为。
4. 高温超导材料：用于模拟高温超导材料的电性能和磁性能等行为。
四、实际案例分析以金属材料的弹塑性行为为例，介绍ABAQUS用户材料子程序的开发及应用。
1. 需求分析：金属材料在受到外力作用时，会表现出弹性和塑性行为。
为了更准确地模拟这一行为，需要开发一个弹塑性用户材料子程序。
2. 理论建模：根据金属的弹塑性理论，建立相应的数学模型和物理模型。
包括弹性阶段、屈服阶段和塑性流动阶段的描述。
3. 编程实现：使用Fortran或C++编写用户材料子程序，实现模型的数学描述。
4. 调试与验证：对编写的子程序进行调试和验证，确保其正确性和可靠性。
可以通过对比实验数据和模拟结果来验证子程序的准确性。
Abaqus关于用户子程序（simwe）
Abaqus关于用户子程序（simwe）序，但可以调用用户自己编写的FORTRAN子程序和ABAQUS应用程序。
当用户编写FORTRAN子程序时，建议子程序名以K开头，以免和ABAQUS内部程序冲突。
2．当用户在用户子程序中利用OPEN打开外部文件时，要注意以下两点：一是设备号的选择是有限制的，只能取15－18和大于100的设备号，其余的都已被ABAQUS占用。
二是用户需提供外部文件的绝对路径而不是相对路径。
3．ABAQUS 应用程序必须由用户子程序调用。
当用到某个用户子程序时，用户所关心的主要有两方面：一是ABAQUS提供的用户子程序的接口参数。
有些参数是ABAQUS传到用户子程序中的，例如SUBROUTINE DLOAD中的KSTEP，KINC，COORDS；有些是需要用户自己定义的，例如F。
二是ABAQUS何时调用该用户子程序，对于不同的用户子程序ABAQUS调用的时间是不同的。
有些是在每个STEP的开始，有的是STEP结尾，有的是在每个INCREMENT的开始等等。
当ABAQUS调用用户子程序是，都会把当前的STEP和INCREMENT利用用户子程序的两个实参KSTEP和KINC传给用户子程序，用户可编个小程序把它们输出到外部文件中，这样对ABAQUS何时调用该用户子程序就会有更深的了解。
下面就选出几个常用的用户子程序和应用程序进行详细解释：一．SUBROUTINEDLOAD(F,KSTEP,KINC,TIME,NOEL,NPT,LAYER,KSPT,COORDS, JLTYP,SNAME)参数：1． F为用户定义的是每个积分点所作用的荷载的大小；2．KSTEP,KINC为ABAQUS传到用户子程序当前的STEP和INCREMENT值；3． TIME(1),TIME(2)为当前STEP TIME和INCREMENT TIME的值；4． NOEL,NPT为积分点所在单元的编号和积分点的编号；5． COORDS为当前积分点的坐标；6．除F外，所有参数的值都是ABAQUS传到用户子程序中的。
abaqus用户子程序vusdfld单元 积分点出的极限应变
abaqus用户子程序vusdfld单元积分点出的极限应变摘要：1.Abaqus 用户子程序简介2.VUSDFLD 单元概述3.积分点出的极限应变计算方法4.应用实例与结果分析5.总结与展望正文：【1.Abaqus 用户子程序简介】Abaqus 是一款广泛应用于结构分析和仿真的有限元软件。
用户子程序是Abaqus 中一种强大的功能，可以通过自定义编程实现对模型的特定处理和计算。
用户子程序可以在Abaqus 的各个分析步骤中调用，为分析过程提供更多的灵活性和可控性。
【2.VUSDFLD 单元概述】VUSDFLD 单元是Abaqus 中的一种特殊的单元类型，用于模拟材料在非常规应力状态下的行为，例如在高应变率和高应变下的材料行为。
VUSDFLD 单元可以定义材料的本构关系，即应力和应变之间的关系，以便在Abaqus 中进行分析。
【3.积分点出的极限应变计算方法】在Abaqus 中，可以通过用户子程序实现对模型中各积分点的极限应变计算。
具体步骤如下：（1）首先，在用户子程序中定义模型的几何参数、材料参数和边界条件。
（2）然后，通过循环遍历模型中的所有积分点，计算每个积分点的应力。
（3）接着，根据材料的本构关系，计算每个积分点的应变。
（4）最后，判断每个积分点的应变是否达到极限应变，如果达到则输出结果，并结束计算。
【4.应用实例与结果分析】假设有一个模型，由VUSDFLD 单元组成，需要计算在特定载荷条件下各积分点的极限应变。
可以通过编写用户子程序实现该功能。
在程序中，首先定义模型的几何参数、材料参数和边界条件，然后计算每个积分点的应力和应变，最后判断并输出极限应变结果。
【5.总结与展望】通过Abaqus 用户子程序和VUSDFLD 单元，可以实现对模型的极限应变计算。
该方法具有较强的灵活性和可控性，可以满足不同问题的分析需求。
Abaqus子程序经典介绍————复合材料固化温度场所用到四个子程序详解
复合材料固化仿真所用到四个子程序详解冯希金目录1. 子程序FILM详解 (3)1.1 子程序FILM的功能描述 (3)1.2 程序界面 (3)1.3 需要定义的变量 (3)1.4 从例程中传递进来的信息 (4)1.5 FILM子程序与INP文件的关系 (5)2. 用户子程序HETVAL (7)2.1子程序HETVAL的功能描述 (7)2.2 程序界面 (7)2.3 需要定义的变量 (7)2.4 可以被更新的变量 (7)2.5 传递到子程序中的信息 (8)2.6子程序HETVAL与INP文件的关系 (8)3. 子程序disp (9)3.1 子程序DISP的功能描述 (9)3.2 程序界面 (9)3.3 需要定义的变量 (9)3.4 传递到子程序中的信息 (9)1. 子程序FILM详解1.1 子程序FILM的功能描述该子程序在热交换分析中用来定义非均匀的对流换热系数和环境温度（sink temperature）。
它的应用在于：（1）可以用来定义基于节点的、基于单元的或者是基于面的非均匀对流换热系数。
（2）可以用来定义环境温度，这个环境温度可以是空间位置、时间、温度、节点号、单元号、积分点号等的函数。
（3）在允许热交换的过程中被调用，这些热交换可以是节点间的、或者是面的积分点间的，它们可以是基于节点、单元或面的非均匀对流条件。
（4）忽略了振幅（5）不论是基于单元的还是基于面的对流换热，都采用一阶热传导单元的节点作为面积分点。
1.2 程序界面1.3 需要定义的变量H(1) ——节点上的对流换热系数，单位是：JT–1L–2–1. H(1) 作为基于节点、基于单元或者是基于面的对流换热条件的数值被传递到例程中参与计算。
如果没有定义值，那么H1（1）被初始化为0，这个系数不能作为输出变量用于输出目的。
H(2) ——,在该积分点上，对流换热系数相对于表面温度的变化率。
其单位是JT–1L–2–2. 通过定义这个值，可以提高非线性分析中的收敛速度，尤其是当对流换热系数是表面温度的函数时更是如此。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
Home浅谈ABAQUS用户子程序李青清华大学工程力学系摘要本文首先概要介绍了ABAQUS的用户子程序和应用程序，然后从参数，功能两方面详细论述了DLOAD, UEXTERNALDB, URDFIL三个用户子程序和GETENVVAR，POSFIL，DBFILE三个应用程序，并详细介绍了ABAQUS的结果文件（.FIL）存储格式。
关键字ABAQUS，用户子程序，应用程序，结果文件一、前言：ABAQUS为用户提供了强大而又灵活的用户子程序接口（USER SUBROUTINE）和应用程序接口(UTILITY ROUTINE)。
ABAQUS 6.2.5一共有42个用户子程序接口，13个应用程序接口，用户可以定义包括边界条件、荷载条件、接触条件、材料特性以及利用用户子程序和其它应用软件进行数据交换等等。
这些用户子程序接口使用户解决一些问题时有很大的灵活性，同时大大的扩充了ABAQUS的功能。
例如：如果荷载条件是时间的函数，这在ABAQUS/CAE 和INPUT 文件中是难以实现的，但在用户子程序DLOAD中就很容易实现。
二．在ABAQUS中使用用户子程序ABAQUS的用户子程序是根据ABAQUS提供的相应接口，按照FORTRAN语法用户自己编写的代码。
在一个算例中，用户可以用到多个用户子程序，但必须把它们放在一个以.FOR为扩展名的文件中。
运行带有用户子程序的算例时有两种方法，一是在CAE中运行，在EDIT JOB菜单的GENERAL子菜单的USER SUBROUTINE FILE对话框中选择用户子程序所在的文件即可；另外是在ABABQUS COMMAND用运行，语法如下：ABAQUS JOB=[JOB] USER¡[.FOR]¡C用户在编写用户子程序时，要注意以下几点：1．用户子程序不能嵌套。
即任何用户子程序都不能调用任何其他用户子程Home序，但可以调用用户自己编写的FORTRAN子程序和ABAQUS应用程序。
当用户编写FORTRAN子程序时，建议子程序名以K开头，以免和ABAQUS内部程序冲突。
2．当用户在用户子程序中利用OPEN打开外部文件时，要注意以下两点：一是设备号的选择是有限制的，只能取15－18和大于100的设备号，其余的都已被ABAQUS占用。
二是用户需提供外部文件的绝对路径而不是相对路径。
3．ABAQUS 应用程序必须由用户子程序调用。
当用到某个用户子程序时，用户所关心的主要有两方面：一是ABAQUS提供的用户子程序的接口参数。
有些参数是ABAQUS传到用户子程序中的，例如SUBROUTINE DLOAD中的KSTEP，KINC，COORDS；有些是需要用户自己定义的，例如F。
二是ABAQUS何时调用该用户子程序，对于不同的用户子程序ABAQUS调用的时间是不同的。
有些是在每个STEP的开始，有的是STEP结尾，有的是在每个INCREMENT的开始等等。
当ABAQUS调用用户子程序是，都会把当前的STEP和INCREMENT利用用户子程序的两个实参KSTEP和KINC传给用户子程序，用户可编个小程序把它们输出到外部文件中，这样对ABAQUS何时调用该用户子程序就会有更深的了解。
下面就选出几个常用的用户子程序和应用程序进行详细解释：一．SUBROUTINEDLOAD(F,KSTEP,KINC,TIME,NOEL,NPT,LAYER,KSPT,COORDS, JLTYP,SNAME) 参数：1．F为用户定义的是每个积分点所作用的荷载的大小；2． KSTEP,KINC为ABAQUS传到用户子程序当前的STEP和INCREMENT值；3． TIME(1),TIME(2)为当前STEP TIME和INCREMENT TIME的值；4． NOEL,NPT为积分点所在单元的编号和积分点的编号；5． COORDS为当前积分点的坐标；6．除F外，所有参数的值都是ABAQUS传到用户子程序中的。
功能：1．荷载可以被定义为积分点坐标、时间、单元编号和单元节点编号的函数。
Home2．用户可以从其他程序的结果文件中进行相关操作来定义积分点F的大小。
例1：这个例子在每个积分点施加的荷载不仅是坐标的函数，而且是随STEP 变化而变化的。
SUBROUTINE DLOAD(P,KSTEP,KINC,TIME,NOEL,NPT,LAYER,KSPT,COORDS,1 JLTYP,SNAME)CINCLUDE 'ABA_PARAM.INC'CDIMENSION TIME(2),COORDS(3)CHARACTER*80 SNAMEPARAMETER (PLOAD=100.E4)CIF (KSTEP.EQ.1) THEN ！当STEP=1时的荷载大小P=PLOADELSE IF (KSTEP.EQ.2) THEN ！当STEP＝2时的荷载大小P=COORDS(1)*PLOAD ！施加在积分点的荷载P是坐标的函数ELSE IF (KSTEP.EQ.3) THEN ！当STEP=3时的荷载大小P=COORDS(1)**2*PLOADELSE IF (KSTEP.EQ.4) THEN ！当STEP=4时的荷载大小P=COORDS(1)**3*PLOADELSE IF (KSTEP.EQ.5) THEN ！当STEP=5时的荷载大小P=COORDS(1)**4*PLOADEND IFRETURNEND二． UBROUTINE UEXTERNALDB(LOP,LRESTART,TIME,DTIME,KSTEP,KINC) 参数：用户可以利用LOP开关来控制自己的代码程序何时被ABAQUS调用。
LOP=0（3）表示在计算的开始（结束）ABAQUS调用此用户子程序；LOP=1 (2) 表示在每个INCREMENT的开始（结束）ABAQUS调用此用户子程序；LOP了＝4 表示在每个RESTART的开始ABAQUS调用此用户子程序。
这为用户子程序提供了很大的灵活性。
功能：1．可以用来和其它用户子程序及其它软件进行数据通讯。
2．可以用来在适当的时间打开，关闭外部文件。
3．用户可以把自己编写的ABAQUS扩充功能的程序代码通过此用户子程序嵌Home 入到ABAQUS中。
例2．新建一个与JOB名相同但扩展名(.ALE)不同的文件，此用户子程序用到了GETENVVAR应用程序来获得ABAQUS的环境变量，用DMKNAME子程序来合成所需的文件名。
SUBROUTINE UEXTERNALDB(LOP,LRSTART,TIME,DTIME,KSTEP,KINC)INCLUDE 'ABA_PARAM.INC'CHARACTER XINDIR*255,XFNAME*80CHARACTER DMKNAME*255,FNAMEX*80CLXFNAME=0LXINDIR=0XFNAME =' 'XINDIR =' 'CALL GETENVV AR('FNAME',XFNAME,LXFNAME) !读取input文件名CALL GETENVV AR ('OUTDIR',XINDIR,LXINDIR) !读取input文件所在的路径IF(LOP.EQ.0) THENFNAMEX=DMKNAME(XFNAME(1:LXFNAME),XINDIR(1:LXINDIR), '.ALE')！生成所要新建文件的文件名OPEN(UNIT=17,FILE=FNAMEX,STATUS='UNKNOWN',FORM='FORMATTED')！打开文件WRITE(17,*)'Opening new user external file...'WRITE(17,*)'Writing dummy data to this file...'END IFRETURNENDcC COMPOSE A FILENAME DIRECTORY/JOBNAME.EXTENCHARACTER*(*) FUNCTION DMKNAME(FNAME,DNAME,EXTEN)CCHARACTER*(*) FNAME,DNAME,EXTENC FNAME I JOBNAMEC DNAME I DIRECTORYC EXTEN I EXTENSIONC DMKNAME O DIRECTORY/JOBNAME.EXTENLTOT = LEN(FNAME)LF = 0DO K1 = LTOT,2,-1HomeIF (LF.EQ.0.AND.FNAME(K1:K1).NE.' ') LF = K1END DOLTOT = LEN(DNAME)LD = 0DO K1 = LTOT,2,-1IF (LD.EQ.0.AND.DNAME(K1:K1).NE.' ') LD = K1END DOLTOT = LEN(EXTEN)LE = 0DO K1 = LTOT,2,-1IF (LE.EQ.0.AND.EXTEN(K1:K1).NE.' ') LE = K1END DOIF ((LF + LD + LE) .LE. LEN(DMKNAME)) THENDMKNAME = DNAME(1:LD)//FNAME(1:LF)LTOT = LD + LFIF ( LE.GT.0) THENDMKNAME = DMKNAME(1:LTOT)//EXTEN(1:LE)END IFEND IFCRETURNEND三．SUBROUTINE URDFIL (LSTOP,LOVRWRT,KSTEP,KINC,DTIME,TIME)参数：1． LSTOP是决定ABAQUS分析是否继续的开关。
如果LSTOP=1，分析中止；否则，分析继续。
2． LOVRWRT是决定能否把上个INCREMENT的结果文件覆盖的开关。
LOVRWRT＝1，覆盖，这样可大大减少结果文件的大小；否则，不覆盖。
3． LSTEP和LOVRWRT参数是留给用户自己定义的，KSTEP,KINC,DTIME,TIME是ABAQUS传给用户子程序的参数。
功能：1．读结果文件（.FIL）中的数据。
2．利用LSTOP开关，用户可中止ABAQUS计算URDFIL要用到以下两个ABAQUS应用程序：POSFIL和DBFILECALL POSFIL (NSTEP,NINC,ARRAY,JRCD) Home参数：1. NSTEP和NINC的值都是由调用它的URDFIL用户子程序接口中的参数KSTEP和KINC传递下来。