| Symbol | Description | Uses |
| facz | 5 |
| File | Line number | Procedure | Code |
| ./model/src/swfrac.F | 101 | SWFRAC |
facz = fact*swdk(i) |
| ./model/src/swfrac.F | 102 | SWFRAC |
IF (facz .LT. (-200.)) THEN |
| ./model/src/swfrac.F | 105 | SWFRAC |
swdk(i) = rfac(jwtype) * exp(facz/a1(jwtype)) |
| ./model/src/swfrac.F | 106 | SWFRAC |
$ + (1.-rfac(jwtype)) * exp(facz/a2(jwtype)) |
| ./model/src/swfrac.F | 60 | SWFRAC |
_RL facz |