| Symbol | Description | Uses |
| STCOR | 4 |
| File | Line number | Procedure | Code |
| ./pkg/aim/phy_radiat.F | 424 | RADLW |
_RL FLUX(NGP), BRAD(NGP), STCOR(NGP) |
| ./pkg/aim/phy_radiat.F | 492 | RADLW |
STCOR(J)=COR0+COR1*FMU(I2,1,myThid)+COR2*FMU(I2,2,myThid) |
| ./pkg/aim/phy_radiat.F | 508 | RADLW |
DFABS(J,1)=STCOR(J)-FLUX(J) |
| ./pkg/aim/phy_radiat.F | 598 | RADLW |
FTOP(J)=FTOP(J)+FLUX(J)-STCOR(J) |