| /phasta/phSolver/common/test/ |
| H A D | phIOwriteReadZeroSz.cc | 35 phio_fp file[3]; in main() local 37 syncio_setup_write(nfiles, one, ppf, &(file[0])); in main() 38 posixio_setup(&(file[1]), 'w'); in main() 39 streamio_setup_r(&(file[2]), rs, 'w'); in main() 43 phio_openfile(filename[i], file[i]); in main() 44 phio_writeheader(file[i], phrase, &zero, &one, &zero, type, iotype); in main() 45 phio_writedatablock(file[i], phrase, &fishWeight, &zero, type, iotype); in main() 46 phio_closefile(file[i]); in main() 49 syncio_setup_read(nfiles, &(file[0])); in main() 50 posixio_setup(&(file[1]), 'r'); in main() [all …]
|
| H A D | phIOwriteFields.cc | 38 phio_fp file[3]; in main() local 40 syncio_setup_write(nfiles, nfields, ppf, &(file[0])); in main() 41 posixio_setup(&(file[1]), 'w'); in main() 42 streamio_setup_r(&(file[2]), rs, 'w'); in main() 46 phio_openfile(filename[i], file[i]); in main() 52 phio_writeheader(file[i], str, &blockEntries, &one, &blockEntries, type, iotype); in main() 53 phio_writedatablock(file[i], str, blockArray, &blockEntries, type, iotype); in main() 55 phio_closefile(file[i]); in main() 58 syncio_setup_read(nfiles, &(file[0])); in main() 59 posixio_setup(&(file[1]), 'r'); in main() [all …]
|
| H A D | phIOwrite.cc | 30 phio_fp file[2]; in main() local 31 syncio_setup_write(nfiles, one, ppf, &(file[0])); in main() 32 posixio_setup(&(file[1]), 'w'); in main() 34 phio_openfile(filename[i], file[i]); in main() 35 phio_writeheader(file[i], phrase, &fish, &one, &one, type, iotype); in main() 36 phio_writedatablock(file[i], phrase, &(fishWeight[i]), &one, type, iotype); in main() 37 phio_closefile(file[i]); in main() 39 syncio_setup_read(nfiles, &(file[0])); in main() 40 posixio_setup(&(file[1]), 'r'); in main() 42 phio_openfile(filename[i], file[i]); in main() [all …]
|
| H A D | phIOposixMultiTopo.cc | 18 phio_fp file; in main() local 19 posixio_setup(&file, 'r'); in main() 20 phio_openfile("geombc.dat.", file); in main() 22 phio_readheader(file, "connectivity interior", in main() 27 phio_readdatablock(file,"connectivity interior",vals,&size,"integer",iotype); in main() 31 phio_closefile(file); in main()
|
| H A D | phIOreadheader.cc | 23 phio_fp file[2]; in main() local 24 syncio_setup_read(nfiles[0], &(file[0])); in main() 25 posixio_setup(&(file[1]), 'r'); in main() 30 phio_openfile(filename[i], file[i]); in main() 31 phio_readheader(file[i], "number of nodes", &(numberOfNodes[i]), in main() 33 phio_closefile(file[i]); in main()
|
| H A D | phIOreaddatablock.cc | 27 phio_fp file[2]; in main() local 28 syncio_setup_read(nfiles, &(file[0])); in main() 29 posixio_setup(&(file[1]), 'r'); in main() 34 phio_openfile(filename[i], file[i]); in main() 35 phio_readheader(file[i], phrase, numpts, &two, type, iotype); in main() 39 phio_readdatablock(file[i], phrase, coords[i], &(len[i]), type, iotype); in main() 40 phio_closefile(file[i]); in main()
|
| H A D | phIOreadIlwork.cc | 13 int openfile(const char* geomfilename, phio_fp& file) { in openfile() argument 16 int err = posix_openfile_single(geomfilename, file); in openfile() 54 phio_fp file; in main() local 55 posixio_setup(&(file), 'r'); in main() 56 int err = openfile(geomfilename, file); in main() 60 err = openfile(geomfilename, file); in main() 65 phio_readheader(file, phrase, &len, &one, type, iotype); in main() 67 phio_readdatablock(file, phrase, ilwork, &len, type, iotype); in main() 68 phio_closefile(file); in main()
|
| H A D | testing.cmake | 33 valgrind --log-file=vg.%p --leak-check=yes 41 valgrind --log-file=vg.%p --leak-check=yes
|
| /phasta/converterIO/ |
| H A D | create_IO_N2O_input.sh | 68 file=IO.N2O.input 69 if [ -e $file ]; then 70 rm $file 81 echo "N-geombc-fields-double: $N_geombc_fields_double;" >> $file 82 echo "N-geombc-fields-integer: $N_geombc_fields_integer;" >> $file 83 echo "N-restart-fields-double: $N_restart_fields_double;" >> $file 84 echo "N-restart-fields-integer: $N_restart_fields_integer;" >> $file 85 echo "N-steps: $N_steps;" >> $file 86 echo "N-parts: $N_parts;" >> $file 87 echo "N-files: $N_files;" >> $file [all …]
|
| H A D | create_IO_O2N_input.sh | 355 file=IO.O2N.input 356 if [ -e $file ]; then 357 rm $file 365 echo "N-geombc-fields-double: $N_geombc_fields_double;" >> $file 366 echo "N-geombc-fields-integer: $N_geombc_fields_integer;" >> $file 367 echo "N-restart-fields-double: $N_restart_fields_double;" >> $file 368 echo "N-restart-fields-integer: $N_restart_fields_integer;" >> $file 369 echo "N-steps: $N_steps;" >> $file 370 echo "N-parts: $N_parts;" >> $file 371 echo "N-files: $N_files;" >> $file [all …]
|
| H A D | README.md | 9 …rized by 1 geombc and 1 restart file per mesh part, whereas SyncIO relies on MPI-IO and can handle… 21 …ntains phasta files under the Posix format (one single geombc and restart file per part), where # … 23 The first requirement is that mod(#,@)=0 so that we end up #/@ parts per SyncIO file. 38 ConverterO2N also requires an input file named IO.O2N.input. This input files includes 46 No worry, there is a bash script which can generate automatically this input file, which is provide… 53 Indeed, for mixed topology meshes, there is no garantee that a single geombc file will contain all … 55 Instead, we can always recycle the same input file from a small partitioning to a large one as long… 67 Although there is a serial reader for SyncIO file that is used in Paraview for instance, converterN… 71 …also a bash script named create_IO_N2O_input.sh which can generate the input file for converterN2O. 72 This script is simpler since only the fields in the restart file really need to be deconverted (blo… [all …]
|
| /phasta/phSolver/common/ |
| H A D | phio_sync.cc | 34 int* file = f->file; in close() local 35 closefile(file, mode); in close() 36 finalizephmpiio(file); in close() 37 free(file); in close() 51 int* file = sf->file; in sync_openfile_read() local 52 initphmpiio(&nfields, &nppf, &(sf->nfiles), file, mode); in sync_openfile_read() 53 openfile(syncName.c_str(), mode, file); in sync_openfile_read() 62 int* file = sf->file; in sync_openfile_write() local 64 &(sf->nfiles), file, mode); in sync_openfile_write() 65 openfile(syncName.c_str(), mode, file); in sync_openfile_write()
|
| H A D | rwvelb.f | 32 inquire(file=fname1,exist=exlog) 36 open(unit=72,file='numstart.dat',status='old') 45 inquire(file=fname1,exist=exlog) 51 open (unit=irstin, file=fname1, status='old', 82 open (unit=irstou, file=fname1, status='unknown',
|
| H A D | phio_posix.cc | 20 closefile(f->file, mode); in close() 21 free(f->file); in close() 36 openfile(posixName.c_str(), "read", f->file); in posix_openfile_single() 38 openfile(posixName.c_str(), "write", f->file); in posix_openfile_single() 39 if( ! *(f->file) ) in posix_openfile_single()
|
| H A D | phIO.cc | 52 f->ops->readheader(f->file, keyphrase, valueArray, in phio_readheader() 65 f->ops->writeheader(f->file, keyphrase, valueArray, in phio_writeheader() 77 f->ops->readdatablock(f->file, keyphrase, valueArray, in phio_readdatablock() 89 f->ops->writedatablock(f->file, keyphrase, valueArray, in phio_writedatablock()
|
| H A D | phio_stream.cc | 33 sf->file = (int*) openRStreamWrite(sf->rs); in stream_openfile() 35 sf->file = (int*) openRStreamRead(sf->rs); in stream_openfile() 37 sf->file = (int*) openGRStreamRead(sf->grs, filename); in stream_openfile() 106 fclose((FILE*)sf->file); in stream_closefile()
|
| H A D | rerun_check.f | 11 open(unit=772,file='rerun-check',status='old',iostat=ierr)
|
| H A D | gettab.f | 25 open (unit=itable, file=ftable, form='unformatted',
|
| /phasta/phSolver/cmake/ |
| H A D | GetGitRevisionDescription.cmake.in | 2 # Internal file for GetGitRevisionDescription.cmake 13 # (See accompanying file LICENSE_1_0.txt or copy at 18 file(READ "@HEAD_FILE@" HEAD_CONTENTS LIMIT 1024) 28 file(READ "@GIT_DATA@/packed-refs" PACKED_REFS) 39 file(READ "@GIT_DATA@/head-ref" HEAD_HASH LIMIT 1024)
|
| H A D | GetGitRevisionDescription.cmake | 30 # (See accompanying file LICENSE_1_0.txt or copy at 39 # to find the path to this module rather than the path to a calling list file 58 file(READ ${GIT_DIR} submodule) 65 file(MAKE_DIRECTORY "${GIT_DATA}")
|
| /phasta/phSolver/compressible/ |
| H A D | timedata.f90 | 21 if(myrank.eq.master) inquire(file='xyzts.dat',exist=exts) 49 inquire(file="./varts/.", exist=exVarts) 88 open(unit=626,file='xyzts.dat',status='old') 148 open(unit=1001, file=fvarts, status='unknown') 288 open(unit=1001, file = fvarts, status = "old",
|
| H A D | MachControl.f90 | 51 inquire(file="./MachControl/.", exist=MC_existDir) 216 inquire(file=fname, exist=exMC) 219 open(unit=1002, file=fname, status='old') 259 open(unit=1002, file=fname, status='unknown')
|
| H A D | bflux.f | 107 open (unit=iout, file=fname1, status='unknown', err=995) 109 & open (unit=ichmou, file=fname2, status='unknown', err=996) 111 open (unit=iout, file=fname1, status='unknown', err=995, 114 & open (unit=ichmou, file=fname2, status='unknown', err=996, 320 open (unit=iflux, file=fname1, status='unknown', err=997)
|
| /phasta/phSolver/AMG/ |
| H A D | ramg_tools.f | 384 open(unit=999,file=filename,status='unknown') 720 open(264,file=trim(mfname),status='unknown') 743 open(264,file=trim(mfname),status='unknown') 767 open(264,file=trim(mfname),status='unknown') 790 open(264,file=trim(mfname),status='unknown') 819 open(264,file=trim(mfname),status='unknown') 845 open(264,file=trim(mfname),status='unknown') 875 open(264,file=trim(mfname),status='unknown') 908 open(264,file=trim(mfname),status='unknown') 957 open(264,file=trim(mfname),status='unknown') [all …]
|
| /phasta/phSolver/incompressible/ |
| H A D | itrdrv.f | 138 open (unit=ihist, file=fhist, status='unknown') 139 open (unit=iforce, file=fforce, status='unknown') 140 open (unit=76, file="fort.76", status='unknown') 146 open (unit=8177, file=fnamepold, status='unknown') 548 open (unit=iforce, file=fforce, position='append') 1112 open(unit=816, file='Qhistor.dat',status='replace') 1121 open(unit=8166,file=trim(fname1),status='unknown') 1140 open(unit=816,file='Qhistor.dat',status='unknown') 1142 open(unit=816,file='Qhistor.dat',position='append') 1157 open(unit=8166,file=trim(fname1),status='unknown') [all …]
|