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 Test program for making graphs
31 \*---------------------------------------------------------------------------*/
37 // * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * //
41 scalarField alpha(200);
42 scalarField phie(alpha.size());
43 scalarField phic(alpha.size());
47 alpha[i] = scalar(i)/50.0;
52 phie = (R - 1)/(sqrt(R/(alpha + 1.0e-6)) + 1.0) + 1.0;
53 phic = (R - 1)/(sqrt(R*alpha) + 1.0) + 1.0;
56 graph phi("@f! (R = 5)", "@a!", "@f!", alpha);
59 "@f!&e!", new curve("@f!&e!", curve::curveStyle::CONTINUOUS, phie)
63 "@f!&c!", new curve("@f!&c!", curve::curveStyle::CONTINUOUS, phic)
65 phi.write("phi", "xmgr");
71 // ************************************************************************* //