2 // ********************************************************************
 
    3 // * License and Disclaimer                                           *
 
    5 // * The  Geant4 software  is  copyright of the Copyright Holders  of *
 
    6 // * the Geant4 Collaboration.  It is provided  under  the terms  and *
 
    7 // * conditions of the Geant4 Software License,  included in the file *
 
    8 // * LICENSE and available at  http://cern.ch/geant4/license .  These *
 
    9 // * include a list of copyright holders.                             *
 
   11 // * Neither the authors of this software system, nor their employing *
 
   12 // * institutes,nor the agencies providing financial support for this *
 
   13 // * work  make  any representation or  warranty, express or implied, *
 
   14 // * regarding  this  software system or assume any liability for its *
 
   15 // * use.  Please see the license in the file  LICENSE  and URL above *
 
   16 // * for the full disclaimer and the limitation of liability.         *
 
   18 // * This  code  implementation is the result of  the  scientific and *
 
   19 // * technical work of the GEANT4 collaboration.                      *
 
   20 // * By using,  copying,  modifying or  distributing the software (or *
 
   21 // * any work based  on the software)  you  agree  to acknowledge its *
 
   22 // * use  in  resulting  scientific  publications,  and indicate your *
 
   23 // * acceptance of all terms of the Geant4 Software license.          *
 
   24 // ********************************************************************
 
   26 // $Id: G4ErrorSymMatrix.icc 66892 2013-01-17 10:57:59Z gunter $
 
   28 // ------------------------------------------------------------
 
   29 //      GEANT 4 class inline implementation
 
   30 // ------------------------------------------------------------
 
   33 inline G4ErrorSymMatrix::G4ErrorSymMatrix() 
 
   34   : m(0), nrow(0), size(0)
 
   38 inline G4int G4ErrorSymMatrix::num_row() const
 
   43 inline G4int G4ErrorSymMatrix::num_col() const
 
   48 inline G4int G4ErrorSymMatrix::num_size() const
 
   53 inline G4double & G4ErrorSymMatrix::fast(G4int row,G4int col)
 
   55   return *(m.begin()+(row*(row-1))/2+(col-1));
 
   58 inline const G4double & G4ErrorSymMatrix::fast(G4int row,G4int col) const
 
   60   return *(m.begin()+(row*(row-1))/2+(col-1));
 
   64 G4ErrorSymMatrix::operator()(G4int row, G4int col)
 
   66   return (row>=col? fast(row,col) : fast(col,row));
 
   69 inline const G4double &
 
   70 G4ErrorSymMatrix::operator()(G4int row, G4int col) const 
 
   72   return (row>=col? fast(row,col) : fast(col,row));
 
   75 inline void G4ErrorSymMatrix::assign(const G4ErrorSymMatrix &mat) 
 
   80 inline G4ErrorSymMatrix G4ErrorSymMatrix::T() const
 
   82   return G4ErrorSymMatrix(*this);
 
   85 inline G4ErrorSymMatrix::G4ErrorSymMatrix_row
 
   86 G4ErrorSymMatrix::operator[] (G4int r)
 
   88   G4ErrorSymMatrix_row b(*this,r);
 
   92 inline G4ErrorSymMatrix::G4ErrorSymMatrix_row_const
 
   93 G4ErrorSymMatrix::operator[] (G4int r) const
 
   95   const G4ErrorSymMatrix_row_const b(*this,r);
 
   99 inline G4double &G4ErrorSymMatrix::G4ErrorSymMatrix_row::operator[](G4int c)
 
  103       return *(_a.m.begin() + (_r+1)*_r/2 + c);
 
  107       return *(_a.m.begin() + (c+1)*c/2 + _r);
 
  111 inline const G4double &
 
  112 G4ErrorSymMatrix::G4ErrorSymMatrix_row_const::operator[](G4int c) const 
 
  116       return *(_a.m.begin() + (_r+1)*_r/2 + c);
 
  120       return *(_a.m.begin() + (c+1)*c/2 + _r);
 
  124 inline G4ErrorSymMatrix::
 
  125 G4ErrorSymMatrix_row::G4ErrorSymMatrix_row(G4ErrorSymMatrix &a, G4int r) 
 
  129 inline G4ErrorSymMatrix::
 
  130 G4ErrorSymMatrix_row_const::G4ErrorSymMatrix_row_const
 
  131 (const G4ErrorSymMatrix&a,G4int r) 
 
  135 inline G4ErrorSymMatrix G4ErrorSymMatrix::inverse(G4int &ifail) const
 
  137   G4ErrorSymMatrix mTmp(*this);