| /phasta/phSolver/common/ |
| H A D | new_interface.c | 192 int nfields = 3; /*magic number, solution, time derivatives*/ in countfieldstowriterestart() local 195 nfields++; /*vorticity*/ in countfieldstowriterestart() 199 nfields++; /*instantaneous wss in bflux.f */ in countfieldstowriterestart() 204 nfields = nfields +2; in countfieldstowriterestart() 209 nfields++; in countfieldstowriterestart() 214 nfields++; /*ybar*/ in countfieldstowriterestart() 218 nfields = nfields + outpar.nphasesincycle; in countfieldstowriterestart() 222 nfields++; /*wssbar*/ in countfieldstowriterestart() 228 nfields++; /*dwal*/ in countfieldstowriterestart() 231 outpar.nsynciofieldswriterestart = nfields; in countfieldstowriterestart() [all …]
|
| H A D | syncio.cc | 46 sf->nfields = 0; in syncio_setup_read() 50 void syncio_setup_write(int nfiles, int nfields, int nppf, phio_fp* f) { in syncio_setup_write() argument 55 sf->nfields = nfields; in syncio_setup_write()
|
| H A D | phio_sync.cc | 47 int nfields=0; in sync_openfile_read() local 49 queryphmpiio(syncName.c_str(), &nfields, &nppf); in sync_openfile_read() 52 initphmpiio(&nfields, &nppf, &(sf->nfiles), file, mode); in sync_openfile_read() 63 initphmpiio(&(sf->nfields), &(sf->nppf), in sync_openfile_write()
|
| H A D | syncio.f | 10 subroutine syncio_setup_write(nfiles, nfields, nppf, handle) 14 integer(c_int), value :: nfields
|
| H A D | setsyncioparam.cc | 25 int nfields; in setIOparam() local 67 int nfields; in detectd2wallfiles() local
|
| H A D | syncio.h | 8 void syncio_setup_write(int nfiles, int nfields, int nppf, phio_fp* f);
|
| H A D | phio_sync.h | 6 int nfields; member
|
| H A D | genbkbPosix.f | 23 integer :: descriptor, descriptorG, GPID, color, nfields local 32 nfields = nsynciofieldsreadgeombc
|
| H A D | genbkbSyncIO.f | 23 integer :: descriptor, descriptorG, GPID, color, nfields local 32 nfields = nsynciofieldsreadgeombc
|
| H A D | genbkb.f | 23 integer :: descriptor, descriptorG, GPID, color, nfields local 32 nfields = nsynciofieldsreadgeombc
|
| H A D | d2wall.c | 31 int nfields; in read_d2wall() local
|
| /phasta/M2NFixBnd/src/ |
| H A D | new_interface.c | 51 int nfields; in Write_M2NFixBnd() local 61 nfields = 4; in Write_M2NFixBnd() 83 initphmpiio(&nfields, &nppf, &nfiles, &f_descriptor, "write"); in Write_M2NFixBnd() 190 int nfields; in Write_M2NFixBnd_SolOnly() local 200 nfields = outpar.nsynciofieldswriterestart; in Write_M2NFixBnd_SolOnly() 219 initphmpiio(&nfields, &nppf, &nfiles, &f_descriptor, "write"); in Write_M2NFixBnd_SolOnly() 251 if (field_flag==nfields){ in Write_M2NFixBnd_SolOnly() 280 int nfields; in Write_Restart() local 290 nfields = outpar.nsynciofieldswriterestart; in Write_Restart() 309 initphmpiio(&nfields, &nppf, &nfiles, &f_descriptor, "write"); in Write_Restart() [all …]
|
| H A D | setsyncioparam.cc | 24 int nfields; in setIOparam() local 63 int nfields; in detectd2wallfiles() local
|
| H A D | readnblk.f | 54 integer :: descriptor, color, nfiles, nfields local 175 call queryphmpiio(fnamer, nfields, nppf); 177 write(*,*) 'Number of fields in geombcRed-dat: ',nfields 180 call initphmpiio( nfields, nppf, nfiles, igeom, 299 call queryphmpiio(fnamer//char(0), nfields, nppf); 301 write(*,*) 'Number of fields in restartRedTmp-dat: ',nfields 305 call initphmpiio(nfields,nppf,nfiles,descriptor, 573 call queryphmpiio(fnamer, nfields, nppf); 575 write(*,*) 'Number of fields in geombcRed-dat: ',nfields 578 call initphmpiio( nfields, nppf, nfiles, igeom,
|
| /phasta/M2N/src/ |
| H A D | new_interface.c | 52 int nfields; in Write_M2N() local 72 nfields = 4; in Write_M2N() 94 initphmpiiosub(&nfields, &nppf, &nfiles, &f_descriptor, "write", mpi_comm_local); in Write_M2N() 204 int nfields; in Write_M2N_SolOnly() local 224 nfields = outpar.nsynciofieldswriterestart; in Write_M2N_SolOnly() 246 initphmpiiosub(&nfields, &nppf, &nfiles, &f_descriptor, "write", mpi_comm_local); in Write_M2N_SolOnly() 273 if (field_flag==nfields){ in Write_M2N_SolOnly() 330 int nfields; in Write_M2N_Field() local 341 nfields = outpar.nsynciofieldswriterestart; in Write_M2N_Field() 361 printf("The %d/%d th field to be written is '%s'\n",field_flag,nfields,fieldlabel); in Write_M2N_Field() [all …]
|
| H A D | setsyncioparam.cc | 26 int nfields; in setIOparam() local 83 int nfields; in detectd2wallfiles() local
|
| H A D | readnblk.f | 74 integer :: descriptor, descriptorG, GPID, color, nfiles, nfields local 200 call queryphmpiio(fnamer, nfields, nppf); 202 write(*,*) 'Number of fields in geombc-dat: ',nfields 205 call initphmpiio( nfields, nppf, nfiles, igeom, 312 call queryphmpiio(fnamer//char(0), nfields, nppf); 314 write(*,*) 'Number of fields in restart-dat: ',nfields 317 call initphmpiio(nfields,nppf,nfiles,descriptor, 577 call queryphmpiio(fnamer//char(0), nfields, nppf); 579 write(*,*) 'Number of fields in restart-dat: ',nfields 582 call initphmpiio(nfields,nppf,nfiles,descriptor,
|
| /phasta/AcuStat/src/ |
| H A D | new_interface.c | 48 int nfields; in Write_AcuStat() local 58 nfields = outpar.nsynciofieldswriterestart; // >=4 in Write_AcuStat() 81 initphmpiio(&nfields, &nppf, &nfiles, &f_descriptor, "write"); in Write_AcuStat() 107 if (field_flag==nfields){ in Write_AcuStat() 145 int nfields; in Write_AcuStat2() local 155 nfields = outpar.nsynciofieldswriterestart; // >=4 in Write_AcuStat2() 177 initphmpiio(&nfields, &nppf, &nfiles, &f_descriptor, "write"); in Write_AcuStat2() 267 if (field_flag==nfields){ in Write_AcuStat2() 300 int nfields; in Write_Ybar() local 311 nfields=1; in Write_Ybar() [all …]
|
| H A D | setsyncioparam.cc | 25 int nfields; in setIOparam() local 64 int nfields; in detectd2wallfiles() local
|
| H A D | readnblk.f | 53 integer :: descriptor, color, nfiles, nfields local 197 call queryphmpiio(fnamer//char(0), nfields, nppf); 201 write(*,*) 'Number of fields in restart-dat: ',nfields 205 call initphmpiio(nfields,nppf,nfiles,descriptor,'read'//char(0))
|
| /phasta/phastaIO/ |
| H A D | phastaIO.h | 40 int *nfields, 44 initphmpiio( int *nfields, 50 initphmpiiosub( int *nfields,
|
| H A D | phastaIO.cc | 164 int nppf, nfields; member 394 void queryphmpiio(const char filename[],int *nfields, int *nppf) in queryphmpiio() argument 478 *nfields = atoi( token ); in queryphmpiio() 479 if ( *nfields > MAX_FIELDS_NUMBER) { in queryphmpiio() 482 SerialFile->nfields=*nfields; //TODO: sanity check of this int? in queryphmpiio() 486 + *nfields * MAX_FIELDS_NAME_LENGTH, in queryphmpiio() 506 MPI_Bcast( nfields, 1, MPI_INT, 0, MPI_COMM_WORLD ); in queryphmpiio() 516 int computeMHSize(int nfields, int nppf, int version) { in computeMHSize() argument 521 int actual_size = nfields * nppf * sizeof(unsigned long) + meta_info_size; in computeMHSize() 569 int initphmpiio( int *nfields, int *nppf, int *nfiles, int *filehandle, const char mode[]) in initphmpiio() argument [all …]
|
| H A D | vtkPhastaReader.cxx | 161 int nppf, nfields; member 398 void vtkPhastaReader::queryphmpiio_(const char filename[],int *nfields, int *nppf) in queryphmpiio_() argument 480 *nfields = atoi( token ); in queryphmpiio_() 481 SerialFile->nfields=*nfields; in queryphmpiio_() 485 *nfields * MAX_FIELDS_NAME_LENGTH + in queryphmpiio_() 511 for ( j = 0; j < SerialFile->nfields; j++ ) in finalizephmpiio_() 600 SerialFile->offset_table = ( unsigned long long ** )calloc(SerialFile->nfields, in openfile() 604 for ( j = 0; j < SerialFile->nfields; j++ ) in openfile() 611 for ( j = 0; j < SerialFile->nfields; j++ ) in openfile() 718 for ( j = 0; j<SerialFile->nfields; j++ ) in readheader() [all …]
|
| H A D | vtkPhastaReader.h | 110 int *nfields,
|
| /phasta/phSolver/common/test/ |
| H A D | phIOwriteFields.cc | 31 int nfields = 2; in main() local 40 syncio_setup_write(nfiles, nfields, ppf, &(file[0])); in main()
|