| Symbol | Description | Uses |
| iLen1 | 9 |
| File | Line number | Procedure | Code |
| ./model/src/packages_unused_msg.F | 100 | PACKAGES_UNUSED_MSG |
IF ( iLen1.GE.1 ) THEN |
| ./model/src/packages_unused_msg.F | 108 | PACKAGES_UNUSED_MSG |
& ': ', sw_name(1:iLen1), '= F (set from "data.pkg")' |
| ./model/src/packages_unused_msg.F | 51 | PACKAGES_UNUSED_MSG |
INTEGER iLen, iLen1, iLen2, iLen3 |
| ./model/src/packages_unused_msg.F | 59 | PACKAGES_UNUSED_MSG |
iLen1 = ILNBLNK(sw_name) |
| ./model/src/packages_unused_msg.F | 63 | PACKAGES_UNUSED_MSG |
IF ( iLen1.GE.4 ) THEN |
| ./model/src/packages_unused_msg.F | 64 | PACKAGES_UNUSED_MSG |
iLen = iLen1 - 3 |
| ./model/src/packages_unused_msg.F | 65 | PACKAGES_UNUSED_MSG |
pkgLwc = sw_name(4:iLen1) |
| ./model/src/packages_unused_msg.F | 67 | PACKAGES_UNUSED_MSG |
pkgUpc = sw_name(4:iLen1) |
| ./model/src/packages_unused_msg.F | 69 | PACKAGES_UNUSED_MSG |
WRITE(data_file,'(2A)') 'data.', sw_name(4:iLen1) |