db/d02/st2_8cc_source.html

 //
 // Copyright (c) 2014 Limit Point Systems, Inc.
 //
 // Licensed under the Apache License, Version 2.0 (the "License");
 // you may not use this file except in compliance with the License.
 // You may obtain a copy of the License at
 //
 //   http://www.apache.org/licenses/LICENSE-2.0
 //
 // Unless required by applicable law or agreed to in writing, software
 // distributed under the License is distributed on an "AS IS" BASIS,
 // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
 // See the License for the specific language governing permissions and
 // limitations under the License.
 //


 #include "SheafSystem/st2.h"

 #include "SheafSystem/abstract_poset_member.impl.h"
 #include "SheafSystem/assert_contract.h"
 #include "SheafSystem/at0.h"
 #include "SheafSystem/stp_space.h"
 #include "SheafSystem/fiber_bundles_namespace.h"
 #include "SheafSystem/schema_poset_member.h"
 #include "SheafSystem/wsv_block.h"


 using namespace std;
 using namespace fiber_bundle; // Workaround for MS C++ bug.


 //==============================================================================
 // CLASS ST2_LITE
 //==============================================================================

 //==============================================================================
 // ST2 FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 fiber_bundle::st2_lite::
 st2_lite()
 {

   // Preconditions:

   // Body:

   // Postconditions:

   ensure(invariant());

   // Exit:
 }

 fiber_bundle::st2_lite::
 st2_lite(const st2_lite& xother)
 {
   // Preconditions:

   // Body:

   *this = xother;

   // Postconditions:

   ensure(invariant());

   // Exit:
 }

 fiber_bundle::st2_lite&
 fiber_bundle::st2_lite::
 operator=(const st2_lite& xother)
 {
   // Preconditions:

   // Body:

   // Postconditions:

   ensure(invariant());

   // Exit:

   return *this;
 }

 fiber_bundle::st2_lite::
 ~st2_lite()
 {
   // Preconditions:

   // Body:

   // Postconditions:

   // Exit:

 }

 fiber_bundle::st2_lite::
 st2_lite(const row_dofs_type& xrow_dofs)
 {
   // Preconditions:

   // Body:

   *this = xrow_dofs;

   // Postconditions:

   ensure(invariant());

   // Exit:
 }

 fiber_bundle::st2_lite&
 fiber_bundle::st2_lite::
 operator=(const row_dofs_type& xrow_dofs)
 {
   // Preconditions:

   // Body:

   vd_lite::operator=(xrow_dofs);

   // Postconditions:

   postcondition_of(vd_lite::operator=(xrow_dofs));

   // Exit:

   return *this;

 }

 fiber_bundle::st2_lite::value_type
 fiber_bundle::st2_lite::
 component(int xrow, int xcolumn) const
 {
   // Preconditions:

   require(xrow >= 0 && xrow < dd());
   require(xcolumn >= 0 && xcolumn < dd());

   // Body:

   value_type result = component(index_for_row_column(xrow, xcolumn));

   // Postconditions:

   ensure(invariant());

   // Exit:

   return result;
 }

 void
 fiber_bundle::st2_lite::
 put_component(int xrow, int xcolumn, value_type xcomp)
 {
   // Preconditions:

   require(xrow >= 0 && xrow < dd());
   require(xcolumn >= 0 && xcolumn < dd());

   // Body:

   put_component(index_for_row_column(xrow, xcolumn), xcomp);

   // Postconditions:

   ensure(invariant());
   ensure(isunordered_or_equals(component(index_for_row_column(xrow, xcolumn)), xcomp));

   // Exit:

   return;
 }

 int
 fiber_bundle::st2_lite::
 index_for_row_column(int xrow, int xcolumn) const
 {
   // Preconditions:

   require(0 <= xrow && xrow < dd());
   require(0 <= xcolumn && xcolumn < dd());

   // Body:

   // Convert (xrow, xcolumn) into an index into linear component storage
   // (upper triangular stored by rows).

   int i = xrow;
   int j = xcolumn;

   // Swap i and j if i > j.

   if(i > j)
   {
     int isave = i;
     i = j;
     j = isave;
   }

   int result = j + (i*(2*dd()-1-i))/2;

   // Postconditions:

   ensure(invariant());
   ensure(result >= 0);
   ensure(result < dd()*dd());

   // Exit:

   return result;
 }

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // INTERIOR ALGEBRA (STP) FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 int
 fiber_bundle::st2_lite::
 p() const
 {
   // Preconditions:

   // Body:

   int result = 2;

   // Postconditions:

   ensure(invariant());
   ensure(result == 2);

   // Exit:

   return result;
 }

 //==============================================================================
 // TENSOR ALGEBRA (TP) FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // VECTOR ALGEBRA (VD) FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // CARTESIAN ALGEBRA (TUPLE) FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // ABSTRACT POSET MEMBER FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 const std::string&
 fiber_bundle::st2_lite::
 class_name() const
 {
   // Preconditions:

   // Body:

   const string& result = static_class_name();

   // Postconditions:

   ensure(!result.empty());

   // Exit:

   return result;
 }

 const std::string&
 fiber_bundle::st2_lite::
 static_class_name()
 {
   // Preconditions:

   // Body:

   static const string result("st2_lite");

   // Postconditions:

   ensure(!result.empty());

   // Exit:

   return result;
 }

 fiber_bundle::st2_lite*
 fiber_bundle::st2_lite::
 clone() const
 {
   st2_lite* result = 0;

   // Preconditions:

   // Body:

   result = new st2_lite();

   // Postconditions:

   ensure(result != 0);
   ensure(is_same_type(*result));

   // Exit:

   return result;
 }

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // ANY FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 bool
 fiber_bundle::st2_lite::
 is_ancestor_of(const any_lite& xother) const
 {
   // Preconditions:

   require(&xother != 0);

   // Body:

   // True if other conforms to this.

   bool result = dynamic_cast<const st2_lite*>(&xother) != 0;

   // Postconditions:

   return result;
 }

 bool
 fiber_bundle::st2_lite::
 invariant() const
 {
   bool result = true;

   if(invariant_check())
   {
     // Prevent recursive calls to invariant.

     disable_invariant_check();

     // Must satisfy base class invariant.

     invariance(stp_lite::invariant());

     // Invariances for this class:

     // Finished, turn invariant checking back on.

     enable_invariant_check();
   }

   // Exit

   return result;
 }

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // CLASS ST2
 //==============================================================================

 // ===========================================================
 // HOST FACTORY FACET OF CLASS ST2
 // ===========================================================

 // PUBLIC MEMBER FUNCTIONS

 const sheaf::poset_path&
 fiber_bundle::st2::
 standard_schema_path()
 {
   // Preconditions:


   // Body:

   static const poset_path result(standard_schema_poset_name(), "st2_schema");

   // Postconditions:

   // Exit:

   return result;
 }

 void
 fiber_bundle::st2::
 make_standard_schema(namespace_poset& xns)
 {
   // Preconditions:

   require(xns.state_is_read_write_accessible());
   require(xns.contains_poset(standard_schema_poset_name()));
   require(!xns.contains_poset_member(standard_schema_path()));

   // Body:

   schema_poset_member lschema(xns,
                               standard_schema_path().member_name(),
                               stp::standard_schema_path(),
                               "",
                               false);

   lschema.detach_from_state();

   // Postconditions:

   ensure(xns.contains_poset_member(standard_schema_path()));

   // Exit:

   return;
 }

 fiber_bundle::st2::host_type&
 fiber_bundle::st2::
 new_host(namespace_type& xns,
          const poset_path& xhost_path,
          const poset_path& xschema_path,
          const poset_path& xvector_space_path,
          bool xauto_access)
 {
   // cout << endl << "Entering st2::new_host." << endl;

   // Preconditions:

   require(xns.state_is_auto_read_write_accessible(xauto_access));

   require(!xhost_path.empty());
   require(!xns.contains_path(xhost_path, xauto_access));

   require(xschema_path.full());
   require(xns.path_is_auto_read_accessible(xschema_path, xauto_access));
   require(schema_poset_member::conforms_to(xns, xschema_path, standard_schema_path()));

   require(xns.path_is_auto_read_accessible(xvector_space_path, xauto_access));
   require(xns.contains_poset<scalar_type::host_type>(xvector_space_path, xauto_access));

   // Body:

   host_type& result =
     host_type::new_table(xns, xhost_path, xschema_path, 2, xvector_space_path, xauto_access);

   // Postconditions:

   ensure(xns.owns(result, xauto_access));
   ensure(result.path(true) == xhost_path);
   ensure(result.state_is_not_read_accessible());
   ensure(result.schema(true).path(xauto_access) == xschema_path);

   ensure(result.factor_ct(true) == result.d(true));
   ensure(result.d(true) == schema_poset_member::row_dof_ct(xns, xschema_path, xauto_access));
   ensure(result.vector_space_path(true) == xvector_space_path );
   ensure(result.p(true) == 2);
   ensure(result.dd(true) == result.d(true));
   ensure(result.vector_space_path(true) == xhost_path );

   // Exit:

   // cout << "Leaving st2::new_host." << endl;
   return result;
 }

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // ST2 FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 fiber_bundle::st2::
 st2()
 {
   // Preconditions:

   // Body:

   // Postconditions:

   ensure(invariant());
 }

 fiber_bundle::st2::
 st2(const poset_state_handle* xhost, pod_index_type xhub_id)
 {
   // Preconditions:

   require(xhost != 0);
   require(xhost->state_is_read_accessible());
   require(xhost->contains_member(xhub_id));

   // Body:

   attach_to_state(xhost, xhub_id);

   // Postconditions:

   ensure(invariant());
   ensure(invariant());
   // ensure(host() == xhost);
   ensure(index() == xhub_id);
   ensure(is_attached());
 }

 fiber_bundle::st2::
 st2(const poset_state_handle* xhost, const scoped_index& xid)
 {
   // Preconditions:

   require(xhost != 0);
   require(xhost->state_is_read_accessible());
   require(xhost->contains_member(xid));

   // Body:

   attach_to_state(xhost, xid.hub_pod());

   // Postconditions:

   ensure(invariant());
   ensure(invariant());
   // ensure(host() == xhost);
   ensure(index() ==~ xid);
   ensure(is_attached());
 }

 fiber_bundle::st2::
 st2(const poset_state_handle* xhost, const std::string& xname)
 {

   // Preconditions:

   require(xhost != 0);
   require(xhost->state_is_read_accessible());
   require(!xname.empty());
   require(xhost->contains_member(xname));

   // Body:

   attach_to_state(xhost, xname);

   // Postconditions:

   ensure(invariant());
   // ensure(host() == xhost);
   ensure(name() == xname);
   ensure(is_attached());

 }

 fiber_bundle::st2::
 st2(abstract_poset_member* xother)
 {

   // Preconditions:

   require(xother != 0);

   // Body:

   attach_to_state(xother);

   // Postconditions:

   ensure(invariant());
   ensure(is_attached());
   ensure(is_same_state(xother));

 }

 fiber_bundle::st2::
 st2(poset_state_handle* xhost, bool xauto_access)
 {

   // Preconditions:

   require(precondition_of(new_jim_state(xhost, 0, false, xauto_access)));

   // Body:

   new_jim_state(xhost, 0, false, xauto_access);

   // Postconditions:

   ensure(postcondition_of(new_jim_state(xhost, 0, false, xauto_access)));

   // Exit:

   return;
 }

 fiber_bundle::st2&
 fiber_bundle::st2::
 operator=(const abstract_poset_member& xother)
 {
   // Preconditions:

   require(is_ancestor_of(&xother));
   require(precondition_of(attach_to_state(&xother)));

   // Body:

   attach_to_state(&xother);

   // Postconditions:

   ensure(postcondition_of(attach_to_state(&xother)));

   // Exit:

   return *this;
 }

 fiber_bundle::st2&
 fiber_bundle::st2::
 operator=(const st2& xother)
 {
   // Preconditions:

   require(precondition_of(attach_to_state(&xother)));

   // Body:

   attach_to_state(&xother);

   // Postconditions:

   ensure(postcondition_of(attach_to_state(&xother)));

   // Exit:

   return *this;
 }

 fiber_bundle::st2::
 ~st2()
 {
   // Preconditions:

   // Body:

   // Postconditions:
 }

 const fiber_bundle::st2::volatile_type&
 fiber_bundle::st2::
 lite_prototype() const
 {
   // Preconditions:

   // Body:

   static const volatile_type result;

   // Postconditions:

   // Exit:

   return result;
 }

 fiber_bundle::st2::volatile_type*
 fiber_bundle::st2::
 lite_type() const
 {
   // Preconditions:

   // Body:

   volatile_type* result = new volatile_type(sheaf::row_dofs(*this));

   // Postconditions:

   // Exit:

   return result;
 }


 fiber_bundle::st2::value_type
 fiber_bundle::st2::
 component(int xrow, int xcolumn) const
 {
   // Preconditions:

   require(state_is_read_accessible());
   require((0 <= xrow) && (xrow < dd()));
   require((0 <= xcolumn) && (xcolumn < dd()));

   // Body:

   value_type result = component(index_for_row_column(xrow, xcolumn));

   // Postconditions:

   ensure(invariant());

   // Exit:

   return result;
 }

 fiber_bundle::st2::value_type
 fiber_bundle::st2::
 component(int xrow, int xcolumn, bool xauto_access) const
 {
   // Preconditions:

   require(state_is_auto_read_accessible(xauto_access));
   require((0 <= xrow) && (xrow < dd(xauto_access)));
   require((0 <= xcolumn) && (xcolumn < dd(xauto_access)));

   // Body:

   if(xauto_access)
   {
     get_read_access();
   }

   value_type result = component(xrow, xcolumn);

   if(xauto_access)
   {
     release_access();
   }

   // Postconditions:

   ensure(invariant());

   // Exit:

   return result;
 }

 void
 fiber_bundle::st2::
 put_component(int xrow, int xcolumn, value_type xvalue)
 {

   // Preconditions:

   require(state_is_read_write_accessible());
   require((0 <= xrow) && (xrow < dd()));
   require((0 <= xcolumn) && (xcolumn < dd()));

   // Body:

   put_component(index_for_row_column(xrow, xcolumn), xvalue);

   // Postconditions:

   ensure(invariant());
   ensure(isunordered_or_equals(component(xrow, xcolumn), xvalue));

   // Exit:

   return;
 }

 void
 fiber_bundle::st2::
 put_component(int xrow, int xcolumn, value_type xvalue, bool xauto_access)
 {

   // Preconditions:

   require(state_is_auto_read_write_accessible(xauto_access));
   require((0 <= xrow) && (xrow < dd(xauto_access)));
   require((0 <= xcolumn) && (xcolumn < dd(xauto_access)));

   // Body:

   if(xauto_access)
   {
     get_read_write_access(true);
   }

   put_component(index_for_row_column(xrow, xcolumn), xvalue);

   if(xauto_access)
   {
     release_access();
   }

   // Postconditions:

   ensure(invariant());
   ensure(isunordered_or_equals(component(xrow, xcolumn), xvalue));

   // Exit:

   return;
 }

 int
 fiber_bundle::st2::
 index_for_row_column(int xrow, int xcolumn) const
 {
   // Preconditions:

   require(0 <= xrow && xrow < dd());
   require(0 <= xcolumn && xcolumn < dd());

   // Body:

   // Convert (xrow, xcolumn) into an index into linear component storage
   // (upper triangular stored by rows).

   int i = xrow;
   int j = xcolumn;

   // Swap i and j if i > j.

   if(i > j)
   {
     int isave = i;
     i = j;
     j = isave;
   }

   int result = j + (i*(2*dd()-1-i))/2;

   // Postconditions:

   //  ensure(invariant());
   ensure(result >= 0);
   ensure(result < dd()*dd());

   // Exit:

   return result;
 }

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // STP FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // TENSOR ALGEBRA (TP) FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // VECTOR ALGEBRA (VD) FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // CARTESIAN ALGEBRA (TUPLE) FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // ABSTRACT POSET MEMBER FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 const std::string&
 fiber_bundle::st2::
 class_name() const
 {
   // Preconditions:

   // Body:

   const string& result = static_class_name();

   // Postconditions:

   ensure(!result.empty());

   // Exit:

   return result;
 }

 const std::string&
 fiber_bundle::st2::
 static_class_name()
 {
   // Preconditions:

   // Body:

   static const string result("st2");

   // Postconditions:

   ensure(!result.empty());

   // Exit:

   return result;
 }

 fiber_bundle::st2*
 fiber_bundle::st2::
 clone() const
 {

   // Preconditions:

   // Body:

   // Create new handle of the current class.

   st2 *result = new st2();

   // Postconditions:

   ensure(result != 0);
   ensure(result->invariant());

   // Exit:

   return result;

 }

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // ANY FACET
 //==============================================================================

 // PUBLIC MEMBER FUNCTIONS

 bool
 fiber_bundle::st2::
 is_ancestor_of(const any* xother) const
 {

   // Preconditions:

   require(xother != 0);

   // Body:

   // If other may be dynamically cast to the type of this then this is an
   // ancestor of other.

   bool result = dynamic_cast<const st2*>(xother) != 0;

   // Postconditions:

   ensure(invariant());

   // Exit:

   return result;

 }

 bool
 fiber_bundle::st2::
 invariant() const
 {
   bool result = true;

   // Preconditions:

   // Body:

   // Must satisfy base class invariant.

   invariance(stp::invariant());

   if (invariant_check())
   {
     // Prevent recursive calls to invariant.

     disable_invariant_check();

     // Invariants for this class:

     invariance(is_attached() ? (p() == 2) : true);

     // Finished, turn invariant checking back on.

     enable_invariant_check();
   }

   // Postconditions:

   ensure(is_derived_query);

   // Exit:

   return result;
 }

 // PROTECTED MEMBER FUNCTIONS

 // PRIVATE MEMBER FUNCTIONS


 //==============================================================================
 // NON-MEMBER FUNCTIONS
 //==============================================================================

 //==============================================================================
 // ST2 FACET
 //==============================================================================

 #include "SheafSystem/error_message.h"
 #include "SheafSystem/st2_e2.h"
 #include "SheafSystem/st2_e3.h"

 void
 fiber_bundle::st2_algebra::
 trace(const st2& x0, vd_value_type& xresult, bool xauto_access)
 {
   // Preconditions:

   require(x0.state_is_auto_read_accessible(xauto_access));

   // Body:

   if(xauto_access)
   {
     x0.get_read_access();
   }

   xresult = 0;

   int ldd = x0.dd();
   for(int i=0; i<ldd; ++i)
   {
     xresult += x0.component(i, i);
   }

   if(xauto_access)
   {
     x0.release_access();
   }

   // Postconditions:

   ensure(unexecutable("xresult == trace(x0)"));

   // Exit:

   return;
 }

 fiber_bundle::vd_value_type
 fiber_bundle::st2_algebra::
 trace(const st2& x0, bool xauto_access)
 {
   // Preconditions:

   require(precondition_of(trace(x0, result, xauto_access)));

   // Body:

   vd_value_type result;

   trace(x0, result, xauto_access);

   // Postconditions:

   ensure(postcondition_of(trace(x0, result, xauto_access)));

   // Exit:

   return result;
 }

 void
 fiber_bundle::st2_algebra::
 trace(const st2_lite& x0, vd_value_type& xresult)
 {
   // Preconditions:

   // Body:

   xresult = 0;

   int ldd = x0.dd();
   for(int i=0; i<ldd; ++i)
   {
     xresult += x0.component(i, i);
   }

   // Postconditions:

   ensure(unexecutable("xresult == trace(x0)"));

   // Exit:

   return;
 }

 fiber_bundle::vd_value_type
 fiber_bundle::st2_algebra::
 trace(const st2_lite& x0)
 {
   // Preconditions:

   require(precondition_of(trace(x0, result)));

   // Body:

   vd_value_type result;

   trace(x0, result);

   // Postconditions:

   ensure(postcondition_of(trace(x0, result)));

   // Exit:

   return result;
 }

 void
 fiber_bundle::st2_algebra::
 determinant(const st2& x0, vd_value_type& xresult, bool xauto_access)
 {
   // Preconditions:

   require(x0.state_is_auto_read_accessible(xauto_access));

   // Body:

   const st2_e2* st2_e2_x0 = dynamic_cast<const st2_e2*>(&x0);
   const st2_e3* st2_e3_x0 = dynamic_cast<const st2_e3*>(&x0);

   if(st2_e2_x0)
   {
     determinant(*st2_e2_x0, xresult, xauto_access);
   }
   else if(st2_e3_x0)
   {
     determinant(*st2_e3_x0, xresult, xauto_access);
   }
   else
   {
     post_fatal_error_message(\
       "Unsupported argument types in call to determinant(...)");
   }

   // Postconditions:

   // Exit:

   return;
 }

 fiber_bundle::vd_value_type
 fiber_bundle::st2_algebra::
 determinant(const st2& x0, bool xauto_access)
 {
   // Preconditions:

   require(precondition_of(determinant(x0, result, xauto_access)));

   // Body:

   vd_value_type result;

   determinant(x0, result, xauto_access);

   // Postconditions:

   ensure(postcondition_of(determinant(x0, result, xauto_access)));

   // Exit:

   return result;
 }

 void
 fiber_bundle::st2_algebra::
 determinant(const st2_lite& x0, vd_value_type& xresult)
 {
   // Preconditions:

   // Body:

   const st2_e2_lite* st2_e2_x0 = dynamic_cast<const st2_e2_lite*>(&x0);
   const st2_e3_lite* st2_e3_x0 = dynamic_cast<const st2_e3_lite*>(&x0);

   if(st2_e2_x0)
   {
     determinant(*st2_e2_x0, xresult);
   }
   else if(st2_e3_x0)
   {
     determinant(*st2_e3_x0, xresult);
   }
   else
   {
     post_fatal_error_message(\
       "Unsupported argument types in call to determinant(...)");
   }

   // Postconditions:

   // Exit:

   return;
 }

 fiber_bundle::vd_value_type
 fiber_bundle::st2_algebra::
 determinant(const st2_lite& x0)
 {
   // Preconditions:

   require(precondition_of(determinant(x0, result)));

   // Body:

   vd_value_type result;

   determinant(x0, result);

   // Postconditions:

   ensure(postcondition_of(determinant(x0, result)));

   // Exit:

   return result;
 }

fiber_bundle::tp_lite::dd
virtual int dd() const
Dimension of the underlying vector space.
Definition: tp.cc:166

sheaf::poset_state_handle::path
virtual poset_path path(bool xauto_access=true) const
The path of this poset.
Definition: poset_state_handle.cc:1241

sheaf::read_write_monitor_handle::state_is_auto_read_write_accessible
bool state_is_auto_read_write_accessible(bool xauto_access) const
True if state is auto accessible for read and write, that is, if the state is already accessible for ...
Definition: read_write_monitor_handle.cc:387

fiber_bundle::st2::make_standard_schema
static void make_standard_schema(namespace_poset &xns)
Creates the standard schema for this class in namespace xns.
Definition: st2.cc:450

fiber_bundle::st2_lite::static_class_name
static const std::string & static_class_name()
The name of this class.
Definition: st2.cc:318

fiber_bundle::tp::dd
virtual int dd() const
Dimension of the underlying vector space.
Definition: tp.cc:788

sheaf::poset_path::full
bool full() const
True if both poset name and member name are not empty.
Definition: poset_path.cc:311

fiber_bundle::st2_lite::p
virtual int p() const
Degree of this as an antisymmetric tensor space.
Definition: st2.cc:240

fiber_bundle::st2_lite::value_type
vd_value_type value_type
The type of component in the fiber; the scalar type in the fiber vector space.
Definition: st2.h:56

fiber_bundle::st2::lite_type
virtual volatile_type * lite_type() const
Virtual conversion to the associated volatile type.
Definition: st2.cc:733

sheaf::poset_component::path
poset_path path(bool xauto_access=true) const
A path to this component.
Definition: poset_component.cc:787

sheaf::namespace_poset
The default name space; a poset which contains other posets as members.
Definition: namespace_poset.h:68

sheaf::read_write_monitor_handle::state_is_read_accessible
bool state_is_read_accessible() const
True if this is attached and if the state is accessible for read or access control is disabled...
Definition: read_write_monitor_handle.cc:244

sheaf::namespace_poset::path_is_auto_read_accessible
bool path_is_auto_read_accessible(const poset_path &xpath, bool xauto_access) const
True if the state referred to xpath exists and is auto read accessible.
Definition: namespace_poset.cc:1127

fiber_bundle::fiber_bundles_namespace
The standard fiber bundles name space; extends the standard sheaves namespace by defining base space...
Definition: fiber_bundles_namespace.h:53

fiber_bundle::st2_lite::~st2_lite
virtual ~st2_lite()
Destructor.
Definition: st2.cc:95

fiber_bundle::tp_space::vector_space_path
poset_path vector_space_path() const
The path of the underlying vector space.
Definition: tp_space.cc:365

sheaf::namespace_poset::contains_poset_member
bool contains_poset_member(pod_index_type xposet_hub_id, pod_index_type xmember_hub_id, bool xauto_access=true) const
True if this contains a poset with hub id xposet_hub_id which contains a member with hub id xmember_h...
Definition: namespace_poset.cc:425

sheaf::read_write_monitor_handle::state_is_auto_read_accessible
bool state_is_auto_read_accessible(bool xauto_access) const
True if the state is auto accessible for read, that is, if the state is already accessible for read o...
Definition: read_write_monitor_handle.cc:309

sheaf::poset_state_handle
A client handle for a general, abstract partially order set.
Definition: poset_state_handle.h:136

sheaf::poset_path
A path defined by a poset name and a member name separated by a forward slash (&#39;/&#39;). For example: "cell_definitions/triangle".
Definition: poset_path.h:48

fiber_bundle::st2::invariant
bool invariant() const
Class invariant.
Definition: st2.cc:1060

std
STL namespace.

fiber_bundle::st2_lite::component
virtual value_type component(int xrow, int xcolumn) const
The value of the component in a specified row and column.
Definition: st2.cc:145

fiber_bundle::st2::clone
virtual st2 * clone() const
Make a new handle, no state instance of current.
Definition: st2.cc:999

sheaf::poset_component::get_read_access
virtual void get_read_access() const
Get read access to the state associated with this.
Definition: poset_component.cc:1519

fiber_bundle::st2::is_ancestor_of
bool is_ancestor_of(const any *xother) const
True if other conforms to current.
Definition: st2.cc:1034

fiber_bundle::st2_algebra::determinant
SHEAF_DLL_SPEC void determinant(const st2 &x0, vd_value_type &xresult, bool xauto_access)
The determinant of a symmetric tensor (pre-allocated version for persistent types).
Definition: st2.cc:1228

fiber_bundle::st2_algebra::trace
SHEAF_DLL_SPEC void trace(const st2 &x0, vd_value_type &xresult, bool xauto_access)
The trace of a symmetric tensor (pre-allocated version for persistent types).
Definition: st2.cc:1116

sheaf::row_dofs
T::row_dofs_type & row_dofs(T &x0)
The row dofs pod type for x0 (mutable version).
Definition: abstract_poset_member.impl.h:130

fiber_bundle::st2_lite::st2_lite
st2_lite()
Default constructor.
Definition: st2.cc:47

fiber_bundle::st2_lite::put_component
virtual void put_component(int xrow, int xcolumn, value_type xcomp)
Sets value of a component in a specified row and column.
Definition: st2.cc:167

fiber_bundle::st2::static_class_name
static const std::string & static_class_name()
The name of this class.
Definition: st2.cc:980

fiber_bundle::stp_space::d
static int d(const namespace_poset &xns, int xp, const poset_path &xvector_space_path, bool xauto_access)
The tensor dimension implied by tensor degree xp and the dimension of the domain vector space specifi...
Definition: stp_space.cc:86

sheaf::poset_component::release_access
virtual void release_access(bool xall=false) const
Release access. If xall is true, release all levels of access. Otherwise, release one level of access...
Definition: poset_component.cc:1561

fiber_bundle::any_lite
Abstract base class with useful features for all volatile objects.
Definition: any_lite.h:48

sheaf::any
Abstract base class with useful features for all objects.
Definition: any.h:39

fiber_bundle::st2_lite::invariant
bool invariant() const
Class invariant.
Definition: st2.cc:389

fiber_bundle::st2_lite
A general symmetric tensor of degree 2 over an abstract vector space (volatile version).
Definition: st2.h:43

fiber_bundle::st2::class_name
virtual const std::string & class_name() const
The name of this class.
Definition: st2.cc:961

sheaf::poset_state_handle::schema
virtual schema_poset_member & schema()
The schema for this poset (mutable version).
Definition: poset_state_handle.cc:6212

fiber_bundle::at0_space
A space of scalars viewed as an antisymmetric tensor space of degree 0.
Definition: at0_space.h:42

sheaf::read_write_monitor_handle::state_is_read_write_accessible
bool state_is_read_write_accessible() const
True if this is attached and if the state is accessible for read and write or access control is disab...
Definition: read_write_monitor_handle.cc:333

fiber_bundle::st2::new_host
static host_type & new_host(namespace_type &xns, const poset_path &xhost_path, const poset_path &xschema_path, const poset_path &xvector_space_path, bool xauto_access)
Creates a new host table for members of this type. The poset is created in namespace xns with path xh...
Definition: st2.cc:479

fiber_bundle::st2_lite::is_ancestor_of
virtual bool is_ancestor_of(const any_lite &xother) const
Conformance test; true if other conforms to this.
Definition: st2.cc:370

fiber_bundle::st2_e3_lite
A symmetric tensor of degree 2 over a Euclidean vector space of dimension 3 (volatile version)...
Definition: st2_e3.h:148

sheaf::namespace_poset::owns
bool owns(const poset_state_handle &xposet, bool xauto_access) const
True if and only if this contains the poset xposet. synonym for contains_poset(xposet.poset_path(true), xauto_access)
Definition: namespace_poset.cc:404

sheaf::scoped_index
An index within the external ("client") scope of a given id space.
Definition: scoped_index.h:116

fiber_bundle::st2::lite_prototype
virtual const volatile_type & lite_prototype() const
Virtual constructor for the associated volatile type.
Definition: st2.cc:715

sheaf::namespace_poset::contains_path
bool contains_path(const poset_path &xpath, bool xauto_access=true) const
True if this contains the poset or poset member specified by xpath.
Definition: namespace_poset.cc:1095

sheaf::poset_state_handle::contains_member
virtual bool contains_member(pod_index_type xmbr_hub_id, bool xauto_access=true) const
True if some version of this poset contains poset member with hub id xmbr_hub_id. ...
Definition: poset_state_handle.cc:1776

fiber_bundle::tp_space::p
int p(int xd, int xdd) const
Tensor degree as a function of tensor dimension xd and domain dimension xdd.
Definition: tp_space.cc:235

fiber_bundle::st2_lite::index_for_row_column
virtual int index_for_row_column(int xrow, int xcolumn) const
The index into linear storage of the component in a specified row and column.
Definition: st2.cc:190

sheaf::poset_path::empty
bool empty() const
True if both poset name and member name are empty.
Definition: poset_path.cc:291

fiber_bundle::st2::index_for_row_column
virtual int index_for_row_column(int xrow, int xcolumn) const
Returns index into linear storage of the component in a specified row and column. ...
Definition: st2.cc:867

fiber_bundle::st2::put_component
void put_component(int xrow, int xcolumn, value_type xvalue)
Sets the component with row index xrow and column index xcolumn to xvalue.
Definition: st2.cc:807

sheaf::namespace_poset::contains_poset
bool contains_poset(pod_index_type xhub_id, bool xauto_access=true) const
True if this contains a poset with hub id xhub_id..
Definition: namespace_poset.cc:326

fiber_bundle::st2::standard_schema_path
static const poset_path & standard_schema_path()
The path to the standard schema for this class.
Definition: st2.cc:432

fiber_bundle::st2_lite::operator=
st2_lite & operator=(const st2_lite &xother)
Assignment operator.
Definition: st2.cc:79

fiber_bundle::vd_space::factor_ct
static int factor_ct(int xd)
Factor_ct() as a function of dimension xd.
Definition: vd_space.cc:167

sheaf::pod_index_type
int_type pod_index_type
The plain old data index type.
Definition: pod_types.h:49

fiber_bundle::vd::value_type
vd_value_type value_type
The POD ("plain old data") type of scalar in the vector space of this.
Definition: vd.h:423

fiber_bundle::st2_e2
A symmetric tensor of degree 2 over a Euclidean vector space of dimension 2 (persistent version)...
Definition: st2_e2.h:431

fiber_bundle::tp_space::dd
int dd() const
The dimension of the underlying ("domain") vector space.
Definition: tp_space.cc:317

fiber_bundle::st2_lite::clone
virtual st2_lite * clone() const
Virtual constructor, makes a new instance of the same type as this.
Definition: st2.cc:337

fiber_bundle::st2::~st2
~st2()
Destructor.
Definition: st2.cc:704

fiber_bundle::st2_e2_lite
A symmetric tensor of degree 2 over a Euclidean vector space of dimension 2 (volatile version)...
Definition: st2_e2.h:150

fiber_bundle::st2_lite::class_name
virtual const std::string & class_name() const
The name of this class.
Definition: st2.cc:299

sheaf::abstract_poset_member
An abstract client handle for a member of a poset.
Definition: abstract_poset_member.h:164

fiber_bundle::st2::st2
st2()
Default constructor.
Definition: st2.cc:538

fiber_bundle::stp_space
An abstract symmetric tensor space of degree p.
Definition: stp_space.h:42

fiber_bundle
Namespace for the fiber_bundles component of the sheaf system.
Definition: base_space_crg_interval.h:36

fiber_bundle::st2
A general symmetric tensor of degree 2 over an abstract vector space (persistent version).
Definition: st2.h:234

fiber_bundle::st2::component
value_type component(int xrow, int xcolumn) const
The component with row index xrow and column index xcolumn.
Definition: st2.cc:751

fiber_bundle::st2::operator=
virtual st2 & operator=(const abstract_poset_member &xother)
Assignment operator; synonym for attach_to_state(&xother).
Definition: st2.cc:661

fiber_bundle::vd_row_dofs_type
Row dofs type for class vd.
Definition: vd.h:61

sheaf::read_write_monitor_handle::state_is_not_read_accessible
bool state_is_not_read_accessible() const
True if this is attached and if the state is accessible for read or if access control is disabled...
Definition: read_write_monitor_handle.cc:276

sheaf::schema_poset_member
A client handle for a poset member which has been prepared for use as a schema.
Definition: schema_poset_member.h:75

fiber_bundle::vd_value_type
double vd_value_type
The type of component in the fiber; the scalar type in the fiber vector space.
Definition: fiber_bundle.h:63

fiber_bundle::st2_e3
A symmetric tensor of degree 2 over a Euclidean vector space of dimension 3 (persistent version)...
Definition: st2_e3.h:435

sheaf::scoped_index::hub_pod
pod_type hub_pod() const
The pod value of this mapped to the unglued hub id space.
Definition: scoped_index.h:710

sheaf::isunordered_or_equals
SHEAF_DLL_SPEC bool isunordered_or_equals(float x1, float x2)
True if isunordered(x1, x2) or x1 == x2.
Definition: sheaf.cc:102