Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations cowski on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

Force jump back in time in DLFUX Subroutine

Status
Not open for further replies.

nelros

Mechanical
Joined
May 7, 2013
Messages
7
Location
EU
Hi,
I am using the DFLUX Subroutine to calculate fluxes.
What I need is a method to jump back in time or increment.
The problem is:

IF ((Schritt=='1: Aufheizen').OR.(Schritt=='2: Halten').and.
1 (NPT==1)) Then
F1 = F0*0.45
end if

I believe that the flux value will change only for this node.
Thats why I tried this:

IF ((Schritt=='1: Aufheizen').OR.(Schritt=='2: Halten').and.
1 (NOEL==MP_Pyro1).and.(SOL<(Tmax/4*4))) then
Aufheizen=1
end if

IF ((Schritt=='1: Aufheizen').OR.(Schritt=='2: Halten').and.
1 (Aufheizen==1)) Then
F1 = F0*0.45
end if

This way I have only one increment with false values.
Does anyone have an idea how to solve this?

Thank you in advance!
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top