Function OPS_NDGetStrain

SRC/interpreter/OpenSeesNDTestCommands.cpp:154–183

void* OPS_NDGetStrain()
{
    int tag = 0;
    int size = 6;

    int numdata = 1;
    if (OPS_GetIntInput(&numdata, &tag) < 0) return 0;

    NDMaterial* mat = OPS_getNDMaterial(tag);

    if (mat == NULL)
    {
        opserr << "OPS_NDGetStrain - material with tag " << tag << " does not exist" << endln;
        return 0;
    }

    const Vector &strain = mat->getStrain();

    std::vector<double> values(size);
    for (int i = 0; i < 6; i++) {
        values[i] = strain(i);
    }
    if (OPS_SetDoubleOutput(&size, &values[0], false) < 0) {
        opserr << "WARNING OPS_NDGetStress - failed to set double inputs\n";
        return 0;
    }


    return 0;
}