1 /*---------------------------------------------------------------------------*\
3 \\ / F ield | OpenFOAM: The Open Source CFD Toolbox
5 \\ / A nd | Copyright (C) 1991-2009 OpenCFD Ltd.
7 -------------------------------------------------------------------------------
9 This file is part of OpenFOAM.
11 OpenFOAM is free software; you can redistribute it and/or modify it
12 under the terms of the GNU General Public License as published by the
13 Free Software Foundation; either version 2 of the License, or (at your
14 option) any later version.
16 OpenFOAM is distributed in the hope that it will be useful, but WITHOUT
17 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
18 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
21 You should have received a copy of the GNU General Public License
22 along with OpenFOAM; if not, write to the Free Software Foundation,
23 Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
29 Incompressible laminar CFD code.
31 \*---------------------------------------------------------------------------*/
38 #include "IOstreams.H"
42 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
44 int main(int argc, char *argv[])
47 # include "setRootCase.H"
48 # include "createTime.H"
50 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
52 Perr<< "\nStarting transfers\n" << endl;
56 if (Pstream::parRun())
58 if (Pstream::myProcNo() != Pstream::masterNo())
61 Perr<< "slave sending to master "
62 << Pstream::masterNo() << endl;
63 OPstream toMaster(Pstream::scheduled, Pstream::masterNo());
67 Perr<< "slave receiving from master "
68 << Pstream::masterNo() << endl;
69 IPstream fromMaster(Pstream::scheduled, Pstream::masterNo());
78 int slave=Pstream::firstSlave();
79 slave<=Pstream::lastSlave();
83 Perr << "master receiving from slave " << slave << endl;
84 IPstream fromSlave(Pstream::scheduled, slave);
92 int slave=Pstream::firstSlave();
93 slave<=Pstream::lastSlave();
97 Perr << "master sending to slave " << slave << endl;
98 OPstream toSlave(Pstream::scheduled, slave);
104 Info<< "End\n" << endl;
110 // ************************************************************************* //