Symbol Description Uses
iLen2 7


File Line number Procedure Code
./model/src/packages_unused_msg.F 103 PACKAGES_UNUSED_MSG 
           WRITE(msgBuf,'(5A)') '** Warning ** ', caller_sub(1:iLen2),
./model/src/packages_unused_msg.F 107 PACKAGES_UNUSED_MSG 
           WRITE(msgBuf,'(5A)') '** Warning ** ', caller_sub(1:iLen2),
./model/src/packages_unused_msg.F 51 PACKAGES_UNUSED_MSG 
      INTEGER iLen, iLen1, iLen2, iLen3
./model/src/packages_unused_msg.F 60 PACKAGES_UNUSED_MSG 
      iLen2 = ILNBLNK(sr_name)
./model/src/packages_unused_msg.F 75 PACKAGES_UNUSED_MSG 
      IF ( iLen2.EQ.0 ) THEN
./model/src/packages_unused_msg.F 77 PACKAGES_UNUSED_MSG 
        iLen2 = iLen + 10
./model/src/packages_unused_msg.F 79 PACKAGES_UNUSED_MSG 
        WRITE(caller_sub,'(2A)') sr_name(1:iLen2)