| 
            Last change
 on this file since 3444 was             3315, checked in by cmv, 18 years ago           | 
        
        
          | 
             
add code fct transfert de W.Hu + prog de comparaison avec pkspectrum.cc  cmv 24/08/2007 
 
           | 
        
        
          | 
            File size:
            874 bytes
           | 
        
      
      
| Line |   | 
|---|
| 1 | #ifndef HU_TF_FIT_SEEN
 | 
|---|
| 2 | #define HU_TF_FIT_SEEN
 | 
|---|
| 3 | 
 | 
|---|
| 4 | //http://background.uchicago.edu/~whu/transfer/transferpage.html
 | 
|---|
| 5 | 
 | 
|---|
| 6 | #ifdef __cplusplus
 | 
|---|
| 7 | extern "C" {
 | 
|---|
| 8 | #endif
 | 
|---|
| 9 | 
 | 
|---|
| 10 | void TFset_parameters(double omega0hh, double f_baryon, double Tcmb);
 | 
|---|
| 11 | double TFfit_onek(double k, double *tf_baryon, double *tf_cdm); 
 | 
|---|
| 12 | 
 | 
|---|
| 13 | void TFfit_hmpc(double omega0, double f_baryon, double hubble, double Tcmb,
 | 
|---|
| 14 |         int numk, double *k, double *tf_full, double *tf_baryon, double *tf_cdm);
 | 
|---|
| 15 | 
 | 
|---|
| 16 | double TFsound_horizon_fit(double omega0, double f_baryon, double hubble);
 | 
|---|
| 17 | double TFk_peak(double omega0, double f_baryon, double hubble);
 | 
|---|
| 18 | double TFnowiggles(double omega0, double f_baryon, double hubble, 
 | 
|---|
| 19 |                 double Tcmb, double k_hmpc);
 | 
|---|
| 20 | double TFzerobaryon(double omega0, double hubble, double Tcmb, double k_hmpc);
 | 
|---|
| 21 | 
 | 
|---|
| 22 | /* Added by cmv 24/08/2007 */
 | 
|---|
| 23 | void TFprint_parameters(void);
 | 
|---|
| 24 | 
 | 
|---|
| 25 | #ifdef __cplusplus
 | 
|---|
| 26 | }
 | 
|---|
| 27 | #endif
 | 
|---|
| 28 | 
 | 
|---|
| 29 | #endif // HU_TF_FIT_SEEN
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.