Lines Matching refs:iybar

61       integer :: irstart, irstartmap, iybar  local
82           read(72,*) iybar
102         call mpi_bcast(iybar,1,MPI_INTEGER,0,mpi_comm_world,ierr)
113         if(iybar .gt. 0) then
115           iybar = 1 ! security
368       if(iybar==1) then
391           iybar = 0
626           if(iybar == 1) then
691       if(iybar == 1) then
784       nsynciofieldswriterestart = 1+iybar+ierror+numphavg+ivort+idwal
790       if(iybar == 1) then