File |
Line number |
Procedure |
Code |
./model/src/packages_print_msg.F |
39 |
PACKAGES_PRINT_MSG |
CHARACTER*(MAX_LEN_MBUF) pkgLwc |
./model/src/packages_print_msg.F |
46 |
PACKAGES_PRINT_MSG |
WRITE(pkgLwc,'(A)') ' ' |
./model/src/packages_print_msg.F |
52 |
PACKAGES_PRINT_MSG |
pkgLwc(1:iLen+4) = 'pkg/'//pkgName |
./model/src/packages_print_msg.F |
53 |
PACKAGES_PRINT_MSG |
CALL LCASE(pkgLwc(1:iLen+4)) |
./model/src/packages_print_msg.F |
57 |
PACKAGES_PRINT_MSG |
& ' ', pkgLwc(1:pLen), ' compiled ( used ? )' |
./model/src/packages_print_msg.F |
61 |
PACKAGES_PRINT_MSG |
& ' ', pkgLwc(1:pLen), ' compiled and used' |
./model/src/packages_print_msg.F |
73 |
PACKAGES_PRINT_MSG |
& ' ', pkgLwc(1:pLen), ' compiled and used', |
./model/src/packages_print_msg.F |
77 |
PACKAGES_PRINT_MSG |
& ' ', pkgLwc(1:pLen), ' compiled but not used', |
./model/src/packages_unused_msg.F |
49 |
PACKAGES_UNUSED_MSG |
CHARACTER*(MAX_LEN_MBUF) pkgLwc, pkgUpc |
./model/src/packages_unused_msg.F |
65 |
PACKAGES_UNUSED_MSG |
pkgLwc = sw_name(4:iLen1) |
./model/src/packages_unused_msg.F |
66 |
PACKAGES_UNUSED_MSG |
CALL LCASE(pkgLwc(1:iLen)) |
./model/src/packages_unused_msg.F |
72 |
PACKAGES_UNUSED_MSG |
pkgLwc = 'unknown' |
./model/src/packages_unused_msg.F |
82 |
PACKAGES_UNUSED_MSG |
WRITE(data_file,'(2A)') 'data.', pkgLwc(1:iLen) |