Searched defs:readtable_1 (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | dtn.f | 472 subroutine readtable_1(islot,table,numdata,dx,maxdata,maxslots) subroutine
483 integer islot
484 integer numdata, maxdata, maxslots
486 real*8 table(0:maxdata,2,maxslots),dx
488 character*80 linein,filename
490 integer i,j
491 logical verbose
497 1066 format('TABLE.',i1)
501 1 continue
523 999 continue
[all …]
|