Add ForceTol.h and StressTol.h

src/ForceTol.h

+////////////////////////////////////////////////////////////////////////////////
+//
+// Copyright (c) 2014 The Regents of the University of California
+//
+// This file is part of Qbox
+//
+// Qbox is distributed under the terms of the GNU General Public License
+// as published by the Free Software Foundation, either version 2 of
+// the License, or (at your option) any later version.
+// See the file COPYING in the root directory of this distribution
+// or <http://www.gnu.org/licenses/>.
+//
+////////////////////////////////////////////////////////////////////////////////
+//
+// ForceTol.h
+//
+////////////////////////////////////////////////////////////////////////////////
+#ifndef FORCETOL_H
+#define FORCETOL_H
+
+#include<iostream>
+#include<iomanip>
+#include<sstream>
+#include<stdlib.h>
+
+#include "Sample.h"
+
+class ForceTol : public Var
+{
+  Sample *s;
+
+  public:
+
+  const char *name ( void ) const { return "force_tol"; };
+
+  int set ( int argc, char **argv )
+  {
+    if ( argc != 2 )
+    {
+      if ( ui->onpe0() )
+      cout << " force_tol takes only one value" << endl;
+      return 1;
+    }
+
+    double v = atof(argv[1]);
+    if ( v < 0.0 )
+    {
+      if ( ui->onpe0() )
+        cout << " force_tol must be non-negative" << endl;
+      return 1;
+    }
+
+    s->ctrl.force_tol = v;
+    return 0;
+  }
+
+  string print (void) const
+  {
+     ostringstream st;
+     st.setf(ios::left,ios::adjustfield);
+     st << setw(10) << name() << " = ";
+     st.setf(ios::right,ios::adjustfield);
+     st << setw(10) << s->ctrl.scf_tol;
+     return st.str();
+  }
+
+  ForceTol(Sample *sample) : s(sample) { s->ctrl.force_tol = 0.0; }
+};
+#endif

src/StressTol.h

+////////////////////////////////////////////////////////////////////////////////
+//
+// Copyright (c) 2014 The Regents of the University of California
+//
+// This file is part of Qbox
+//
+// Qbox is distributed under the terms of the GNU General Public License
+// as published by the Free Software Foundation, either version 2 of
+// the License, or (at your option) any later version.
+// See the file COPYING in the root directory of this distribution
+// or <http://www.gnu.org/licenses/>.
+//
+////////////////////////////////////////////////////////////////////////////////
+//
+// StressTol.h
+//
+////////////////////////////////////////////////////////////////////////////////
+#ifndef STRESSTOL_H
+#define STRESSTOL_H
+
+#include<iostream>
+#include<iomanip>
+#include<sstream>
+#include<stdlib.h>
+
+#include "Sample.h"
+
+class StressTol : public Var
+{
+  Sample *s;
+
+  public:
+
+  const char *name ( void ) const { return "stress_tol"; };
+
+  int set ( int argc, char **argv )
+  {
+    if ( argc != 2 )
+    {
+      if ( ui->onpe0() )
+      cout << " stress_tol takes only one value" << endl;
+      return 1;
+    }
+
+    double v = atof(argv[1]);
+    if ( v < 0.0 )
+    {
+      if ( ui->onpe0() )
+        cout << " stress_tol must be non-negative" << endl;
+      return 1;
+    }
+
+    s->ctrl.stress_tol = v;
+    return 0;
+  }
+
+  string print (void) const
+  {
+     ostringstream st;
+     st.setf(ios::left,ios::adjustfield);
+     st << setw(10) << name() << " = ";
+     st.setf(ios::right,ios::adjustfield);
+     st << setw(10) << s->ctrl.scf_tol;
+     return st.str();
+  }
+
+  StressTol(Sample *sample) : s(sample) { s->ctrl.stress_tol = 0.0; }
+};
+#endif