- 积分
- 0
- 注册时间
- 2017-1-17
- 仿真币
-
- 最后登录
- 1970-1-1
|
下面是abaqus的用户手册中的算例,对其中的LFLAGS(3).EQ.1等等一些东西不是很理解,虽然用户手册中有详细讲解,但感觉里面讲的挺深奥的,就想问下大家如何通俗的理解呢?不胜感激!IF (LFLAGS(3).EQ.1) THENC Normal incrementation IF (LFLAGS(1).EQ.1 .OR. LFLAGS(1).EQ.2) THENC *STATIC AMATRX(1,1) = AK AMATRX(4,4) = AK AMATRX(1,4) = -AK AMATRX(4,1) = -AK IF (LFLAGS(4).NE.0) THEN FORCE = AK*(U(4)-U(1)) DFORCE = AK*(DU(4,1)-DU(1,1)) SRESID(1) = -DFORCE SRESID(4) = DFORCE RHS(1,1) = RHS(1,1)-SRESID(1) RHS(4,1) = RHS(4,1)-SRESID(4) ENERGY(2) = HALF*FORCE*(DU(4,1)-DU(1,1)) * + HALF*DFORCE*(U(4)-U(1)) * + HALF*DFORCE*(DU(4,1)-DU(1,1))
|
|