Searched refs:qreadN1 (Results 1 – 1 of 1) sorted by relevance
50 real*8 :: qreadN1 local1320 read(700+l) intvID,qreadN1 1322 read(700+l,925) intvID,qreadN11324 dwalN(intvID)=qreadN1 ! fill directly into dwalN