foam-extend4.1-coherent-io/applications/solvers/solidMechanics/elasticOrthoNonLinULSolidFoam/createForceDisplacementFile.H

OFstream * filePtr(nullptr);

if(Pstream::master())
  {
    filePtr = new OFstream("forceDisp.dat");
    OFstream& forceDispFile = *filePtr;
    forceDispFile << "#Disp(mm)\tForce(N)" << endl;
  }