27 |
! Critical buoyancy (K) used to adjust the approach to |
! Critical buoyancy (K) used to adjust the approach to |
28 |
! quasi-equilibrium. It must be < 0. |
! quasi-equilibrium. It must be < 0. |
29 |
|
|
30 |
real beta, alpha |
real, protected:: beta, alpha |
31 |
! Parameters that control the rate of approach to quasi-equilibrium |
! Parameters that control the rate of approach to quasi-equilibrium |
32 |
! (their standard values are 1. and 0.96, respectively) (beta must |
! (their standard values are 1. and 0.96, respectively) (beta must |
33 |
! be less than or equal to 1). |
! be less than or equal to 1). |