Lines Matching refs:intfromfile
62 integer :: intfromfile(50) ! integers read from headers local
332 intfromfile=0
333 call readheader(descriptor,fname1//char(0) ,intfromfile,
343 if(intfromfile(1).ne.0) then
344 nshg2=intfromfile(1)
345 ndof2=intfromfile(2)
346 lstep=intfromfile(3)
391 intfromfile=0
392 call readheader(descriptor,fname1//char(0),intfromfile,
396 ndofybar=intfromfile(2)
421 intfromfile=0
422 call readheader(descriptor,fname1//char(0),intfromfile,
426 ndoferrors=intfromfile(2)
455 intfromfile=0
456 call readheader(descriptor,fname1//char(0),intfromfile,
460 ndofyphbar=intfromfile(2)
498 intfromfile=0
499 call readheader(descriptor,fname1//char(0),intfromfile,
503 ndofvort=intfromfile(2)
530 intfromfile=0
531 call readheader(descriptor,fname1//char(0),intfromfile,
535 ndofdwal=intfromfile(2)
595 intfromfile=0
596 call readheader(descriptor,fname1//char(0),intfromfile,
599 nshg2=intfromfile(1)
600 nmap=intfromfile(2)
604 write(*,*) warning , nmap, intfromfile(1), intfromfile(2)
619 intfromfile=0
620 call readheader(descriptor,fname1//char(0),intfromfile,
623 nshg2=intfromfile(1)
624 nmap=intfromfile(2)