| File |
Line number |
Procedure |
Code |
|
./eesupp/src/print.F |
335 |
PRINT_LIST_I |
CHARACTER punc |
|
./eesupp/src/print.F |
364 |
PRINT_LIST_I |
punc = ',' |
|
./eesupp/src/print.F |
371 |
PRINT_LIST_I |
WRITE(msgBuf,'(A,I9,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
376 |
PRINT_LIST_I |
WRITE(msgBuf,'(I5,'' '',A,I9,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
389 |
PRINT_LIST_I |
punc = ' ' |
|
./eesupp/src/print.F |
390 |
PRINT_LIST_I |
IF ( markEnd ) punc = ',' |
|
./eesupp/src/print.F |
393 |
PRINT_LIST_I |
WRITE(msgBuf,'(A,I9,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
398 |
PRINT_LIST_I |
WRITE(msgBuf,'(I5,'' '',A,I9,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
468 |
PRINT_LIST_L |
CHARACTER punc |
|
./eesupp/src/print.F |
497 |
PRINT_LIST_L |
punc = ',' |
|
./eesupp/src/print.F |
504 |
PRINT_LIST_L |
WRITE(msgBuf,'(A,L5,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
509 |
PRINT_LIST_L |
WRITE(msgBuf,'(I5,'' '',A,L5,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
522 |
PRINT_LIST_L |
punc = ' ' |
|
./eesupp/src/print.F |
523 |
PRINT_LIST_L |
IF ( markEnd ) punc = ',' |
|
./eesupp/src/print.F |
526 |
PRINT_LIST_L |
WRITE(msgBuf,'(A,L5,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
531 |
PRINT_LIST_L |
WRITE(msgBuf,'(I5,'' '',A,L5,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
601 |
PRINT_LIST_RL |
CHARACTER punc |
|
./eesupp/src/print.F |
630 |
PRINT_LIST_RL |
punc = ',' |
|
./eesupp/src/print.F |
637 |
PRINT_LIST_RL |
WRITE(msgBuf,'(A,1PE23.15,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
642 |
PRINT_LIST_RL |
WRITE(msgBuf,'(I5,'' '',A,1PE23.15,A)') nDup,'@',xOld,punc |
|
./eesupp/src/print.F |
655 |
PRINT_LIST_RL |
punc = ' ' |
|
./eesupp/src/print.F |
656 |
PRINT_LIST_RL |
IF ( markEnd ) punc = ',' |
|
./eesupp/src/print.F |
659 |
PRINT_LIST_RL |
WRITE(msgBuf,'(A,1PE23.15,A)') ' ',xOld,punc |
|
./eesupp/src/print.F |
664 |
PRINT_LIST_RL |
WRITE(msgBuf,'(I5,'' '',A,1PE23.15,A)') nDup,'@',xOld,punc |