Lines Matching refs:nforc
19 subroutine restartread(istep,nset,nload,nforc, nboun,nk,ne, argument
54 integer istep,nset,nload,nforc,nboun,nk,ne,nmpc,nalset,nmat, local
121 read(15)nforc
204 call skip(nset,nalset,nload,nbody,nforc,nboun,nk,ne,nkon,
258 read(15)(nodeforc(i),i=1,2*nforc)
259 read(15)(ndirforc(i),i=1,nforc)
260 read(15)(xforc(i),i=1,nforc)
261 read(15)(ikforc(i),i=1,nforc)
262 read(15)(ilforc(i),i=1,nforc)
263 if(nam.gt.0) read(15)(iamforc(i),i=1,nforc)
264 read(15)(xforcold(i),i=1,nforc)