Searched refs:errorsN (Results 1 – 1 of 1) sorted by relevance
| /phasta/M2N/src/ |
| H A D | readnblk.f | 47 real*8, allocatable :: errorsN(:,:), yphbarN(:,:,:), vortN(:,:) local
765 allocate(errorsN(nshgN,ndoferrors)) ! size of my final mapped field array
766 errorsN=-9.87654321e32 ! set to absurd, easily recognized value to find holes
791 allocate(errorsN(1,1))
870 errorsN(intvID,idof) = errors(i,idof)
929 errorsN(intvID,idof) =
1431 call Write_M2N_Field(myrank,irankN,'a','errors',6,errorsN,'d',
1433 deallocate(errorsN)
|