×
INTELLIGENT WORK FORUMS
FOR ENGINEERING PROFESSIONALS

Log In

Come Join Us!

Are you an
Engineering professional?
Join Eng-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!
  • Students Click Here

*Eng-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

Jobs

Transient internal pressure

Transient internal pressure

Transient internal pressure

(OP)
I want to define a transient internal pressure in a pipeline using an input file and the subroutine DLOAD

1) I use as a starting point the input file at constant pressure:
I use the file.inp as an input file. The loads are defined as:
** LOADS
**
** Name: Load-1 Type: Pressure
*Dsload
Surf-1, P, 7000.
**

2) For the transient internal pressure, I modify the load part in the input file at constant pressure (1) and use a dload subroutine:
** LOADS
**
** Name: Load-1 Type: Pressure
*Dload
Surf-1
**

When I launch the file with Constant pressure (1), it is working ok.
When I launch the transient internal pressure input file (2) and the dload subroutine, I have the following error:
***ERROR: in keyword *DLOAD, file “Job-1.inp”, line 22935: Unknown assembly
element set SURF-1

Why do I have this error?

RE: Transient internal pressure

Try *Dsload in file (2).

RE: Transient internal pressure

(OP)
To test the dload subroutine, I modelled the pressure by two ways
1) Using the input file with the loads written as:

** LOADS
**
** Name: Load-1 Type: Pressure
*Dsload
Surf-1, P, 7000.
**

2) Using the input file with loads written as below and also using a dload subroutine:
** LOADS
**
** Name: Load-1 Type: Pressure
*Dsload
Surf-1,P
**

SUBROUTINE DLOAD(F, KSTEP, KINC, TIME, NOEL, NPT,&
& LAYER, KSPT, COORDS, JLTYP, SNAME)
INCLUDE 'ABA_PARAM.INC'
DIMENSION COORDS(3),TIME(2)
CHARACTER*80 SNAME
DATA P0/7000./
F=P0
RETURN
END

Why these two options does not give the same result?

RE: Transient internal pressure

I've tried a simple example and it's working fine.

Try
*Dsload
Surf-1, PNU, 1


And to ramp up the user load like a regular load, you might use
F=P0*TIME(1)

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Eng-Tips Forums free from inappropriate posts.
The Eng-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Eng-Tips forums is a member-only feature.

Click Here to join Eng-Tips and talk with other members!


Resources