Lines Matching refs:iybar

78       integer :: ireducemethod, isbinary, irstart, irstartmap, iybar  local
109           read(72,*) iybar
130         call mpi_bcast(iybar,1,MPI_INTEGER,0,mpi_comm_world,ierr)
142         if(iybar .gt. 0) then
144           iybar = 1 ! security
386       if(iybar == 1) then
408           iybar = 0
759         if(iybar == 1) then
787         if(iybar == 1) then
862                   if(iybar==1) then
919                     if(iybar==1) then
982                       if(iybar==1) then
1210       if(iybar == 1) then
1405       nsynciofieldswriterestart = 1+iybar+ierror+numphavg+ivort+idwal
1424       if(iybar == 1) then