constant.cpp

不错的国外的有限元程序代码,附带详细的manual,可以节省很多的底层工作.

//   file CONSTANT.CXX

#include "constant.hxx"


double  ConstantFunction :: giveValue ()
   // Returns the constant value of the receiver. Reads 'value' in the data
   // file if it hasn't been done yet.
{
   if (! value) {
      value    = new double[1] ;
      value[0] = this -> read("f(t)") ;}

   return *value ;
}