Symbol Description Uses
ans Returned sum value 5



File Line number Procedure Code
./eesupp/src/gsum_jam.F 13 GLOBAL_SUM_R8_JAM
      SUBROUTINE GLOBAL_SUM_R8_JAM( ans, myThid )
./eesupp/src/gsum_jam.F 34 GLOBAL_SUM_R8_JAM
      Real*8 ans
./eesupp/src/gsum_jam.F 45 GLOBAL_SUM_R8_JAM
      phi = ans
./eesupp/src/gsum_jam.F 49 GLOBAL_SUM_R8_JAM
     &                    ans,
./eesupp/src/gsum_jam.F 61 GLOBAL_SUM_R8_JAM
      CALL JAM_BARRIER_DONE(  ans )