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 )