| File |
Line number |
Procedure |
Code |
|
./model/src/packages_print_msg.F |
10 |
PACKAGES_PRINT_MSG |
SUBROUTINE PACKAGES_PRINT_MSG( usePKG, pkgName, pkgMsg ) |
|
./model/src/packages_print_msg.F |
32 |
PACKAGES_PRINT_MSG |
CHARACTER*(*) pkgName, pkgMsg |
|
./model/src/packages_print_msg.F |
55 |
PACKAGES_PRINT_MSG |
IF ( pkgMsg .EQ. 'None' ) THEN |
|
./model/src/packages_print_msg.F |
59 |
PACKAGES_PRINT_MSG |
ELSEIF ( pkgMsg .EQ. 'Used' ) THEN |
|
./model/src/packages_print_msg.F |
65 |
PACKAGES_PRINT_MSG |
IF ( pkgMsg .EQ. ' ' ) THEN |
|
./model/src/packages_print_msg.F |
68 |
PACKAGES_PRINT_MSG |
iLen = LEN(pkgMsg) |
|
./model/src/packages_print_msg.F |
69 |
PACKAGES_PRINT_MSG |
pkgUse(1:iLen) = pkgMsg |