| Symbol | Description | Uses |
| sr_name | subroutine name which calls this S/R | 4 |
| File | Line number | Procedure | Code |
| ./model/src/packages_unused_msg.F | 10 | PACKAGES_UNUSED_MSG |
SUBROUTINE PACKAGES_UNUSED_MSG( sw_name, sr_name, df_sufx ) |
| ./model/src/packages_unused_msg.F | 33 | PACKAGES_UNUSED_MSG |
CHARACTER*(*) sw_name, sr_name, df_sufx |
| ./model/src/packages_unused_msg.F | 60 | PACKAGES_UNUSED_MSG |
iLen2 = ILNBLNK(sr_name) |
| ./model/src/packages_unused_msg.F | 79 | PACKAGES_UNUSED_MSG |
WRITE(caller_sub,'(2A)') sr_name(1:iLen2) |