×
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

sfilm subroutine

sfilm subroutine

sfilm subroutine

(OP)
Hi!

I want to know if it's possible to write subroutine of 3 different time dependent surface film conditions at same time, with differnet h1, h2 and h3? they aren't temperature dependent. I wrote subroutine for one, but i am no sure if i can write for 3 sfilms. (i want to simulate 3 different intakes of energy, simultaneous, independent).

can you help me please. here is my code for one...

SUBROUTINE FILM(H,SINK,TEMP,KSTEP,KINC,TIME,NOEL,NPT,
     1 COORDS,JLTYP,FIELD,NFIELD,SNAME,NODE,AREA)
C
      INCLUDE 'ABA_PARAM.INC'
C
      DIMENSION H(2),TIME(2),COORDS(3), FIELD(NFIELD)
      CHARACTER*80 SNAME
C     
      SINK=1000
C      
        x=coords(1)   
        y=coords(2)
C        
        t2=time(2)        
C    
C     
        b=4   
        a=3     
C        
      H(1)=100*exp(-(((y-t2)/a)**4+((x)/b)**4))/4*a*b
C              
      return
      end
 

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