Method record

SRC/element/PFEMElement/BackgroundMesh.cpp:3295–3454

//

int BackgroundMesh::record() {
    Domain* domain = OPS_GetDomain();
    if (domain == 0) return 0;
    int ndm = OPS_GetNDM();

    double timestamp = domain->getCurrentTime();
    currentTime = timestamp;

    // record
    for (int i = 0; i < (int)recorders.size(); ++i) {
        if (recorders[i] != 0) {
            if (recorders[i]->record(domain->getCommitTag(),
                                     currentTime)) {
                opserr << "WARNING: failed to record -- "
                          "BgMesh::gridEles\n";
                return -1;
            }
        }
    }

    // record time
    if (theFile.good() == false) {
        return 0;
    }
    theFile << timestamp << " ";

    // record range
    int numRange = 1;
    double range = bsize;
    if (recordRange > 0) {
        numRange = (int)ceil(recordRange / bsize);
        range = recordRange;
    }

    // record wave height and velocity
    for (int i = 0; i < (int)locs.size(); i += ndm) {
        // particles in range
        VDouble crds(ndm);
        for (int j = 0; j < ndm; ++j) {
            crds[j] = locs[i + j];
        }

        VInt index;
        lowerIndex(crds, index);

        VInt minind = index, maxind = index;
        minind -= numRange;
        maxind += numRange + 1;

        VParticle pts;
        gatherParticles(minind, maxind, pts);

        // velocity
        VDouble vel(ndm);
        double wt = 0.0;

        // get information
        for (int j = 0; j < (int)pts.size(); ++j) {