Lines Matching refs:idwal

62       integer :: ierror, numphavg, ivort, idwal, idebug, iphavg  local
86           read(72,*) idwal
106         call mpi_bcast(idwal,1,MPI_INTEGER,0,mpi_comm_world,ierr)
141         if(idwal .gt. 0) then
143           idwal = 1 ! security
516       if(idwal==1) then
543           idwal = 0
660           if(idwal == 1) then
758       if(idwal == 1) then
784       nsynciofieldswriterestart = 1+iybar+ierror+numphavg+ivort+idwal
821       if(idwal == 1) then