binary_xcts.h

/*
 *  Definition of Lorene class Binary_xcts
 *
 */

/*
 *   Copyright (c) 2010  Michal Bejger
 *
 *   This file is part of LORENE.
 *
 *   LORENE is free software; you can redistribute it and/or modify
 *   it under the terms of the GNU General Public License version 2
 *   as published by the Free Software Foundation.
 *
 *   LORENE is distributed in the hope that it will be useful,
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *   GNU General Public License for more details.
 *
 *   You should have received a copy of the GNU General Public License
 *   along with LORENE; if not, write to the Free Software
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 */
 
#ifndef __BINARY_XCTS_H_ 
#define __BINARY_XCTS_H_ 

/*
 * $Id: binary_xcts.h,v 1.4 2014/10/13 08:52:32 j_novak Exp $
 * $Log: binary_xcts.h,v $
 * Revision 1.4  2014/10/13 08:52:32  j_novak
 * Lorene classes and functions now belong to the namespace Lorene.
 *
 * Revision 1.3  2010/12/20 09:58:31  m_bejger
 * Pointer to the linear momentum added
 *
 * Revision 1.2  2010/12/09 10:35:56  m_bejger
 * Declaration of the virial theorem volume version added
 *
 * Revision 1.1  2010/05/04 07:44:02  m_bejger
 * Initial version
 *
 *
 * $Header: /cvsroot/Lorene/C++/Include/binary_xcts.h,v 1.4 2014/10/13 08:52:32 j_novak Exp $
 *
 */

// Lorene headers
#include "star.h"

namespace Lorene {
class Binary_xcts {

    // Data : 
    // -----
    protected:

    Star_bin_xcts star1 ;
     
    Star_bin_xcts star2 ;
    
    Star_bin_xcts* et[2] ; 
    
    double omega ;
    
    double x_axe ;


    // Derived data : 
    // ------------
    protected:
    mutable double* p_mass_adm ; 

    mutable double* p_mass_kom ; 

    mutable Tbl* p_angu_mom ; 

    mutable Tbl* p_lin_mom ; 
    
    mutable double* p_total_ener ; 

    mutable double* p_virial ; 

    mutable double* p_virial_vol ; 
    
    // Constructors - Destructor
    // -------------------------
    public:
    Binary_xcts(Map& mp1, int nzet1, const Eos& eos1, int irrot1, 
                Map& mp2, int nzet2, const Eos& eos2, int irrot2) ;         


    Binary_xcts(const Binary_xcts& ) ;          

    Binary_xcts(Map& mp1, const Eos& eos1, Map& mp2, const Eos& eos2, 
                FILE* fich) ;           

    ~Binary_xcts() ;            
 


    // Memory management
    // -----------------
    protected:
        
    void del_deriv() const ; 
    
    void set_der_0x0() const ; 


    // Mutators / assignment
    // ---------------------
    public:
    void operator=(const Binary_xcts&) ;    
    
    Star_bin_xcts& set(int i) { 
            assert( (i==1) || (i==2) ); 
            del_deriv() ; 
            return *et[i-1] ;
            
    } ; 

    double& set_omega() {return omega; } ; 

    double& set_x_axe() {return x_axe; } ; 
    

    // Accessors
    // ---------
    public:
    const Star_bin_xcts& operator()(int i) const 
        { assert( (i==1) || (i==2) ); 
          return *et[i-1] ;} ; 

    double get_omega() const {return omega; } ; 
    
    double get_x_axe() const {return x_axe; } ; 

    double separation() const ; 


    // Outputs
    // -------
    public:
    void sauve(FILE *) const ;      
    
    friend ostream& operator<<(ostream&, const Binary_xcts& ) ; 

    void display_poly(ostream& ) const ; 

    void write_global(ostream& ) const  ;

      private:
    ostream& operator>>(ostream& ) const ;    


    // Computational routines
    // ----------------------
    public:

        double mass_adm() const ;

        double mass_adm_vol() const ;

        double mass_kom() const ;
    
        double mass_kom_vol() const ;

        const Tbl& angu_mom() const ;   

        const Tbl& lin_mom() const ;    
        
        double total_ener() const ; 

        double virial() const ; 

        double virial_vol() const ; 
        
        double ham_constr() const ; 

        const Tbl& mom_constr() const ; 

    void orbit(double fact_omeg_min, double fact_omeg_max, double& xgg1, 
           double& xgg2) ;
       
    void analytical_omega() ; 

    void analytical_shift() ; 

} ;

ostream& operator<<(ostream& , const Binary_xcts& ) ;   

}
#endif