Searched refs:irstartmap (Results 1 – 2 of 2) sorted by relevance
| /phasta/M2N/src/ |
| H A D | readnblk.f | 78 integer :: ireducemethod, isbinary, irstart, irstartmap, iybar local
108 read(72,*) irstartmap
129 call mpi_bcast(irstartmap,1,MPI_INTEGER,0,mpi_comm_world,ierr)
570 if (irstartmap .gt. 0) itmp = int(log10(float(irstartmap+1)))+1
574 write (fnamer,fmt1) irstartmap
|
| /phasta/M2NFixBnd/src/ |
| H A D | readnblk.f | 61 integer :: irstart, irstartmap, iybar local
81 read(72,*) irstartmap
|