| Symbol | Description | Uses |
| WORK | 3 |
| File | Line number | Procedure | Code |
| ./pkg/aim/phy_suflux.F | 153 | SUFLUX |
WORK(J)=RH(J,Nlevxy(J,myThid)) |
| ./pkg/aim/phy_suflux.F | 161 | SUFLUX |
CALL SHTORH (-1,NGP,T0,PSA,1. _d 0,Q0,WORK,QSAT0,myThid) |
| ./pkg/aim/phy_suflux.F | 74 | SUFLUX |
_RL WORK(NGP) |