| File |
Line number |
Procedure |
Code |
|
./eesupp/src/print.F |
193 |
PRINT_LIST_I |
CHARACTER punc |
|
./eesupp/src/print.F |
213 |
PRINT_LIST_I |
punc = ',' |
|
./eesupp/src/print.F |
220 |
PRINT_LIST_I |
WRITE(msgBuf,'(A,I9,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
225 |
PRINT_LIST_I |
WRITE(msgBuf,'(I5,'' '',A,I9,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
238 |
PRINT_LIST_I |
punc = ' ' |
|
./eesupp/src/print.F |
239 |
PRINT_LIST_I |
IF ( markEnd ) punc = ',' |
|
./eesupp/src/print.F |
242 |
PRINT_LIST_I |
WRITE(msgBuf,'(A,I9,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
247 |
PRINT_LIST_I |
WRITE(msgBuf,'(I5,'' '',A,I9,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
314 |
PRINT_LIST_L |
CHARACTER punc |
|
./eesupp/src/print.F |
334 |
PRINT_LIST_L |
punc = ',' |
|
./eesupp/src/print.F |
341 |
PRINT_LIST_L |
WRITE(msgBuf,'(A,L5,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
346 |
PRINT_LIST_L |
WRITE(msgBuf,'(I5,'' '',A,L5,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
359 |
PRINT_LIST_L |
punc = ' ' |
|
./eesupp/src/print.F |
360 |
PRINT_LIST_L |
IF ( markEnd ) punc = ',' |
|
./eesupp/src/print.F |
363 |
PRINT_LIST_L |
WRITE(msgBuf,'(A,L5,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
368 |
PRINT_LIST_L |
WRITE(msgBuf,'(I5,'' '',A,L5,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
434 |
PRINT_LIST_R8 |
CHARACTER punc |
|
./eesupp/src/print.F |
454 |
PRINT_LIST_R8 |
punc = ',' |
|
./eesupp/src/print.F |
461 |
PRINT_LIST_R8 |
WRITE(msgBuf,'(A,1PE23.15,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
466 |
PRINT_LIST_R8 |
WRITE(msgBuf,'(I5,'' '',A,1PE23.15,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
480 |
PRINT_LIST_R8 |
punc = ' ' |
|
./eesupp/src/print.F |
481 |
PRINT_LIST_R8 |
IF ( markEnd ) punc = ',' |
|
./eesupp/src/print.F |
484 |
PRINT_LIST_R8 |
WRITE(msgBuf,'(A,1PE23.15,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
489 |
PRINT_LIST_R8 |
WRITE(msgBuf,'(I5,'' '',A,1PE23.15,A)') nDup,'@',xOld,punc |