| Symbol | Description | Uses |
| sumPrc | 7 |
| File | Line number | Procedure | Code |
| ./pkg/thsice/thsice_balance_frw.F | 113 | THSICE_BALANCE_FRW |
IF ( sumPrc.GT.0. _d 0 ) THEN |
| ./pkg/thsice/thsice_balance_frw.F | 114 | THSICE_BALANCE_FRW |
tmpFac = sumFrW / sumPrc |
| ./pkg/thsice/thsice_balance_frw.F | 54 | THSICE_BALANCE_FRW |
_RL sumPrc, sumTilePrc(nSx,nSy) |
| ./pkg/thsice/thsice_balance_frw.F | 78 | THSICE_BALANCE_FRW |
sumPrc = 0. _d 0 |
| ./pkg/thsice/thsice_balance_frw.F | 80 | THSICE_BALANCE_FRW |
& CALL GLOBAL_SUM_TILE_RL( sumTilePrc, sumPrc, myThid ) |
| ./pkg/thsice/thsice_balance_frw.F | 84 | THSICE_BALANCE_FRW |
sumPrc = sumPrc / globalArea |