nelros
Mechanical
- May 7, 2013
- 7
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!
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!