| File |
Line number |
Procedure |
Code |
|
./eesupp/src/print.F |
337 |
PRINT_LIST_I |
CHARACTER punc |
|
./eesupp/src/print.F |
366 |
PRINT_LIST_I |
punc = ',' |
|
./eesupp/src/print.F |
373 |
PRINT_LIST_I |
WRITE(msgBuf,'(A,I9,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
378 |
PRINT_LIST_I |
WRITE(msgBuf,'(I5,'' '',A,I9,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
391 |
PRINT_LIST_I |
punc = ' ' |
|
./eesupp/src/print.F |
392 |
PRINT_LIST_I |
IF ( markEnd ) punc = ',' |
|
./eesupp/src/print.F |
395 |
PRINT_LIST_I |
WRITE(msgBuf,'(A,I9,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
400 |
PRINT_LIST_I |
WRITE(msgBuf,'(I5,'' '',A,I9,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
470 |
PRINT_LIST_L |
CHARACTER punc |
|
./eesupp/src/print.F |
499 |
PRINT_LIST_L |
punc = ',' |
|
./eesupp/src/print.F |
506 |
PRINT_LIST_L |
WRITE(msgBuf,'(A,L5,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
511 |
PRINT_LIST_L |
WRITE(msgBuf,'(I5,'' '',A,L5,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
524 |
PRINT_LIST_L |
punc = ' ' |
|
./eesupp/src/print.F |
525 |
PRINT_LIST_L |
IF ( markEnd ) punc = ',' |
|
./eesupp/src/print.F |
528 |
PRINT_LIST_L |
WRITE(msgBuf,'(A,L5,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
533 |
PRINT_LIST_L |
WRITE(msgBuf,'(I5,'' '',A,L5,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
603 |
PRINT_LIST_RL |
CHARACTER punc |
|
./eesupp/src/print.F |
632 |
PRINT_LIST_RL |
punc = ',' |
|
./eesupp/src/print.F |
639 |
PRINT_LIST_RL |
WRITE(msgBuf,'(A,1PE23.15,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
644 |
PRINT_LIST_RL |
WRITE(msgBuf,'(I5,'' '',A,1PE23.15,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
657 |
PRINT_LIST_RL |
punc = ' ' |
|
./eesupp/src/print.F |
658 |
PRINT_LIST_RL |
IF ( markEnd ) punc = ',' |
|
./eesupp/src/print.F |
661 |
PRINT_LIST_RL |
WRITE(msgBuf,'(A,1PE23.15,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
666 |
PRINT_LIST_RL |
WRITE(msgBuf,'(I5,'' '',A,1PE23.15,A)') nDup,'@',xOld,punc |