diff options
Diffstat (limited to 'Dragon/src')
| -rw-r--r-- | Dragon/src/BREANM.f | 5 | ||||
| -rw-r--r-- | Dragon/src/BRENEM.f | 5 | ||||
| -rw-r--r-- | Dragon/src/BRERT.f | 5 |
3 files changed, 15 insertions, 0 deletions
diff --git a/Dragon/src/BREANM.f b/Dragon/src/BREANM.f index 99287ef..345268d 100644 --- a/Dragon/src/BREANM.f +++ b/Dragon/src/BREANM.f @@ -155,6 +155,11 @@ ENDIF ENDIF *---- +* THE SPH PARAMETERS ARE NOT DEGENERATE IN NON-FUNDAMENTAL MODE +* CONDITION. THE ONLY SOLUTION CORRESPONDS TO J_FUEL=1 +*---- + IF(ISPH.EQ.1) J_FUEL=1 +*---- * NGET NORMALIZATION OF THE DISCONTINUITY FACTORS *---- IF(J_FUEL.GT.0) THEN diff --git a/Dragon/src/BRENEM.f b/Dragon/src/BRENEM.f index 3e0a281..862ea80 100644 --- a/Dragon/src/BRENEM.f +++ b/Dragon/src/BRENEM.f @@ -169,6 +169,11 @@ ENDIF ENDIF *---- +* THE SPH PARAMETERS ARE NOT DEGENERATE IN NON-FUNDAMENTAL MODE +* CONDITION. THE ONLY SOLUTION CORRESPONDS TO J_FUEL=1 +*---- + IF(ISPH.EQ.1) J_FUEL=1 +*---- * NGET NORMALIZATION OF THE DISCONTINUITY FACTORS *---- IF(J_FUEL.GT.0) THEN diff --git a/Dragon/src/BRERT.f b/Dragon/src/BRERT.f index 3dd87fb..10d4155 100644 --- a/Dragon/src/BRERT.f +++ b/Dragon/src/BRERT.f @@ -214,6 +214,11 @@ ENDIF ENDIF *---- +* THE SPH PARAMETERS ARE NOT DEGENERATE IN NON-FUNDAMENTAL MODE +* CONDITION. THE ONLY SOLUTION CORRESPONDS TO J_FUEL=1 +*---- + IF(ISPH.EQ.1) J_FUEL=1 +*---- * NGET NORMALIZATION OF THE DISCONTINUITY FACTORS *---- IF(J_FUEL.GT.0) THEN |