fixed writing out entries in advective bc
[OpenFOAM-1.6-ext.git] / src / surfMesh / surfaceFormats / wrl / WRLsurfaceFormat.C
blob117313415cb4adebd8d9a7963cd2eedd8ad4593d
1 /*---------------------------------------------------------------------------*\
2   =========                 |
3   \\      /  F ield         | OpenFOAM: The Open Source CFD Toolbox
4    \\    /   O peration     |
5     \\  /    A nd           | Copyright held by original author
6      \\/     M anipulation  |
7 -------------------------------------------------------------------------------
8 License
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
19     for more details.
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
25 \*---------------------------------------------------------------------------*/
27 #include "WRLsurfaceFormat.H"
29 #include "Ostream.H"
30 #include "OFstream.H"
31 #include "ListOps.H"
33 // * * * * * * * * * * * * * * * * Constructors  * * * * * * * * * * * * * * //
35 template<class Face>
36 Foam::fileFormats::WRLsurfaceFormat<Face>::WRLsurfaceFormat()
40 // * * * * * * * * * * * * * * * Member Functions  * * * * * * * * * * * * * //
42 template<class Face>
43 void Foam::fileFormats::WRLsurfaceFormat<Face>::write
45     const fileName& filename,
46     const MeshedSurfaceProxy<Face>& surf
49     const pointField& pointLst = surf.points();
50     const List<Face>&  faceLst = surf.faces();
51     const List<label>& faceMap = surf.faceMap();
53     // for no zones, suppress the group name
54     const List<surfZone>& zones =
55     (
56         surf.surfZones().size() > 1
57       ? surf.surfZones()
58       : oneZone(faceLst, "")
59     );
61     const bool useFaceMap = (surf.useFaceMap() && zones.size() > 1);
63     OFstream os(filename);
64     if (!os.good())
65     {
66         FatalErrorIn
67         (
68             "fileFormats::WRLsurfaceFormat::write"
69             "(const fileName&, const MeshedSurfaceProxy<Face>&)"
70         )
71             << "Cannot open file for writing " << filename
72             << exit(FatalError);
73     }
75     writeHeader(os, pointLst, faceLst.size(), zones);
77     os  << "\n"
78         "Group {\n"
79         " children [\n"
80         "  Shape {\n";
82    writeAppearance(os);
84    os  <<
85         "   geometry IndexedFaceSet {\n"
86         "    coord Coordinate {\n"
87         "     point [\n";
89     // Write vertex coords
90     forAll(pointLst, ptI)
91     {
92         const point& pt = pointLst[ptI];
94         os  << pt.x() << ' ' << pt.y() << ' ' << pt.z() << nl;
95     }
97     os  <<
98         "     ]\n"                     // end point
99         "    }\n"                      // end coord Coordinate
100         "    coordIndex [\n";
102     label faceIndex = 0;
103     forAll(zones, zoneI)
104     {
105         const surfZone& zone = zones[zoneI];
107         if (useFaceMap)
108         {
109             forAll(zone, localFaceI)
110             {
111                 const Face& f = faceLst[faceMap[faceIndex++]];
113                 forAll(f, fp)
114                 {
115                     os << f[fp] << ' ';
116                 }
117                 os << "-1,\n";
118             }
119         }
120         else
121         {
122             forAll(zone, localFaceI)
123             {
124                 const Face& f = faceLst[faceIndex++];
126                 forAll(f, fp)
127                 {
128                     os << ' ' << f[fp];
129                 }
130                 os << " -1,\n";
131             }
132         }
133     }
135     os  <<
136         "    ]\n"                      // end coordIndex
137         "   }\n"                       // end geometry IndexedFaceSet
138         "  }\n"                        // end Shape
139         " ]\n"                         // end children
140         "}\n";                         // end Group
144 // ************************************************************************* //