1 int USERD_get_maxsize_info
3 int *max_number_of_nodes,
4 int *max_number_of_elements[Z_MAXTYPE],
5 int *max_ijk_dimensions[3]
9 Info << "Entering: USERD_get_maxsize_info" << endl << flush;
15 label maxNParcels = 0;
22 Info << "Checking all time steps for EnSight memory allocation purpose. This can take some time." << endl;
24 for (label t=1; t < TimeList.size(); t++)
31 runTimePtr->setTime(TimeList[t], t);
33 Info << "Checking time = " << TimeList[t].value() << endl << flush;
35 const cellShapeList& cells = meshPtr->cellShapes();
37 label nPoints = meshPtr->nPoints();
38 label nCells = cells.size();
40 maxNPoints = max(maxNPoints, nPoints);
42 for (label n=0; n<nCells;n++)
44 label nFaces = cells[n].nFaces();
45 labelList points = cells[n];
47 if ((nFaces == 6) && (points.size() == 8))
51 else if ((nFaces == 5) && (points.size() == 6))
55 else if ((nFaces == 5) && (points.size() == 5))
59 else if ((nFaces == 4) && (points.size() == 4))
65 nPen06Max = max(nPen06Max, nPen06);
66 nHex08Max = max(nHex08Max, nHex08);
67 nPyr05Max = max(nPyr05Max, nPyr05);
68 nTet04Max = max(nTet04Max, nTet04);
70 if (Numparts_available > 1)
73 // Get the maximum number of spray parcels
75 Cloud<passiveParticle> lagrangian(*meshPtr);
77 if (lagrangian.size() > nMaxParcels)
79 nMaxParcels = lagrangian.size();
85 max_number_of_nodes[0] = maxNPoints;
86 max_number_of_elements[0][Z_HEX08] = nHex08Max;
87 max_number_of_elements[0][Z_PEN06] = nPen06Max;
88 max_number_of_elements[0][Z_PYR05] = nPyr05Max;
89 max_number_of_elements[0][Z_TET04] = nTet04Max;
91 if (Numparts_available > 1)
93 max_number_of_nodes[1] = maxNParcels;
94 max_number_of_elements[1][Z_POINT] = maxNParcels;
98 Info << "Leaving: USERD_get_maxsize_info" << endl << flush;