Symbol Description Uses
rmspp 13



File Line number Procedure Code
./model/src/ini_pressure.F 115 INI_PRESSURE
             rmspp = rmspp 
./model/src/ini_pressure.F 127 INI_PRESSURE
        _GLOBAL_SUM_R8( rmspp, myThid )
./model/src/ini_pressure.F 130 INI_PRESSURE
           rmspp = 0. _d 0
./model/src/ini_pressure.F 132 INI_PRESSURE
           rmspp = sqrt(rmspp/count)
./model/src/ini_pressure.F 135 INI_PRESSURE
     &       'Iteration ', npiter, ', RMS-difference = ', rmspp
./model/src/ini_pressure.F 142 INI_PRESSURE
       IF ( rmspp .ne. 0. ) THEN
./model/src/ini_pressure.F 143 INI_PRESSURE
        IF ( rmspp .EQ. rmsppold ) THEN
./model/src/ini_pressure.F 51 INI_PRESSURE
      _RL count, rmspp, rmsppold 
./model/src/ini_pressure.F 83 INI_PRESSURE
       rmspp    = 1. _d 0
./model/src/ini_pressure.F 89 INI_PRESSURE
        rmsppold = rmspp
./model/src/ini_pressure.F 90 INI_PRESSURE
        rmspp    = 0. _d 0