Searched defs:genblkPosix (Results 1 – 1 of 1) sorted by relevance
| /phasta/phSolver/common/ |
| H A D | genblkPosix.f | 1 subroutine genblkPosix (IBKSZ) subroutine 17 integer, target, allocatable :: ientp(:,:) 18 integer mater(ibksz) 19 integer, target :: intfromfile(50) ! integers read from headers 20 character*255 fname1 21 integer :: descriptor, descriptorG, GPID, color 22 integer :: numparts, writeLock 23 integer :: ierr_io, numprocs 24 integer, target :: itpblktot,ierr,iseven 25 character*255 fname2 [all …]
|