Symbol Description Uses
mass_fw 10



File Line number Procedure Code
./pkg/sbo/SBO.h 32 NO PROCEDURE
      _RL mass_fw, xcom_fw, ycom_fw, zcom_fw
./pkg/sbo/SBO.h 34 NO PROCEDURE
     &             mass_fw, xcom_fw, ycom_fw, zcom_fw
./pkg/sbo/sbo_calc.F 174 SBO_CALC
      mass_fw  = 0.0
./pkg/sbo/sbo_calc.F 443 SBO_CALC
      CALL GLOBAL_SUM_TILE_RL( tile_mass_fw  , mass_fw  , myThid )
./pkg/sbo/sbo_calc.F 462 SBO_CALC
      IF ( mass_fw.NE.zeroRL ) THEN
./pkg/sbo/sbo_calc.F 463 SBO_CALC
        xcom_fw = xcom_fw / mass_fw
./pkg/sbo/sbo_calc.F 464 SBO_CALC
        ycom_fw = ycom_fw / mass_fw
./pkg/sbo/sbo_calc.F 465 SBO_CALC
        zcom_fw = zcom_fw / mass_fw
./pkg/sbo/sbo_output.F 124 SBO_OUTPUT
     &    '%SBO sbo_mass_fw                  = ', mass_fw
./pkg/sbo/sbo_output.F 80 SBO_OUTPUT
      sbo_diag(20) = mass_fw