star_rot_dirac_diff.h

/*
 *  Definition of Lorene class Star_rot_dirac_diff
 *
 */

/*
 *   Copyright (c) 2005 Motoyuki Saijo
 *
 *   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 as published by
 *   the Free Software Foundation; either version 2 of the License, or
 *   (at your option) any later version.
 *
 *   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 __STAR_ROT_DIRAC_DIFF_H_ 
#define __STAR_ROT_DIRAC_DIFF_H_ 

/*
 *
 * $Header: /cvsroot/Lorene/C++/Include/star_rot_dirac_diff.h,v 1.2 2014/10/13 08:52:36 j_novak Exp $
 *
 */

// Headers Lorene
#include "star_rot_dirac.h"

namespace Lorene {

class Star_rot_Dirac_diff : public Star_rot_Dirac {

    // Data : 
    // -----
    protected:
    double (*frot)(double, const Tbl&) ;
    
    double (*primfrot)(double, const Tbl&) ;
    
    Tbl par_frot ; 
    
    Scalar omega_field ; 
    
    double omega_min ;   
    double omega_max ;   
    
    Scalar prim_field ; 
    
    // Constructors - Destructor
    // -------------------------
    public:
    Star_rot_Dirac_diff(Map& mp_i, int nzet_i, const Eos& eos_i, 
            double (*frot_i)(double, const Tbl&), 
            double (*primfrot_i)(double, const Tbl&), 
            const Tbl& par_frot_i) ;            

    Star_rot_Dirac_diff(const Star_rot_Dirac_diff& ) ;      

    Star_rot_Dirac_diff(Map& mp_i, const Eos& eos_i, FILE* fich,
            double (*frot_i)(double, const Tbl&), 
            double (*primfrot_i)(double, const Tbl&) ) ;            
    
    virtual ~Star_rot_Dirac_diff() ;            


    // Memory management
    // -----------------

    // Everything is inherited from Star_rot_dirac

    // Mutators / assignment
    // ---------------------
    public:
    void operator=(const Star_rot_Dirac_diff& ) ;   
    
    // Accessors
    // ---------
    public:
    const Scalar& get_omega_field() const {return omega_field;} ; 

       virtual double get_omega_c() const ;


    // Outputs
    // -------
    public:
    virtual void sauve(FILE *) const ;      
    
/*  /// Display in polytropic units */
/*  virtual void display_poly(ostream& ) const ; */

    friend ostream& operator<<(ostream& , const Star& ) ;   


    protected:
    virtual ostream& operator>>(ostream& ) const ;    


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

    virtual double tsw() const ;        

    virtual void hydro_euler() ; 

    void fait_omega_field(double omeg_min, double omeg_max,
                  double precis, int nitermax) ;
    
    void fait_prim_field() ;
    
    double funct_omega(double omeg) const ;     

    double prim_funct_omega(double omeg) const ;    

    virtual void equilibrium(double ent_c, double omega0, double fact_omega, 
             int nzadapt, const Tbl& ent_limit,
             const Itbl& icontrol, const Tbl& control,
             double mbar_wanted, double aexp_mass, 
             Tbl& diff) ;
    
 };

}
#endif