Symbol | Description | Uses |
ERFAC | 4 |
File | Line number | Procedure | Code |
./pkg/fizhi/fizhi_utils.F | 213 | QSAT |
_RL ESFAC, ERFAC |
./pkg/fizhi/fizhi_utils.F | 215 | QSAT |
PARAMETER ( ERFAC = (1.0-ESFAC)/ESFAC ) |
./pkg/fizhi/fizhi_utils.F | 364 | QSAT |
D = (P-ERFAC*QX) |
./pkg/fizhi/fizhi_utils.F | 371 | QSAT |
IF (LDQDT) DQDT = (1.0 + ERFAC*Q) * D * DQX |