14 |
|
|
15 |
C This allows the leading diagonal (top two rows) to be non-unity |
C This allows the leading diagonal (top two rows) to be non-unity |
16 |
C (a feature required when tapering adiabatically). |
C (a feature required when tapering adiabatically). |
17 |
#define GM_NON_UNITY_DIAGONAL |
#undef GM_NON_UNITY_DIAGONAL |
18 |
|
|
19 |
C Allows to use different values of K_GM and K_Redi ; also to |
C Allows to use different values of K_GM and K_Redi ; also to |
20 |
C be used with the advective form (Bolus velocity) of GM |
C be used with the advective form (Bolus velocity) of GM |