| [658] | 1 | #include <iostream.h>
 | 
|---|
 | 2 | 
 | 
|---|
 | 3 | extern "C" {
 | 
|---|
 | 4 | void anafast_(int&, int&, int&,double&,float*,float*,float*,float*,
 | 
|---|
 | 5 |               float*,float*,float*);
 | 
|---|
 | 6 | void synfast_(int&, int&, int&,int&, float&,float*,float*,float*,
 | 
|---|
 | 7 |               double*, double*,double*,double*,double*,float*);
 | 
|---|
 | 8 | void  input_map_(char*,float*,int&);
 | 
|---|
 | 9 | void  ecrire_fits_(int&,int&,int&,float*,char*,char*,int&,float&,float&);
 | 
|---|
 | 10 | 
 | 
|---|
 | 11 | }
 | 
|---|
 | 12 | 
 | 
|---|
 | 13 | void anafast_(int&, int&, int&,double&,float*,float*,float*,float*,
 | 
|---|
 | 14 |               float*,float*,float*)
 | 
|---|
 | 15 | {
 | 
|---|
 | 16 | cerr << "anafast_() bidon ... - Fonction vide - Reza 04/99 " << endl;
 | 
|---|
 | 17 | throw " Unsupported function - anafast_() bidon ";
 | 
|---|
 | 18 | }
 | 
|---|
 | 19 | 
 | 
|---|
 | 20 | void synfast_(int&, int&, int&,int&, float&,float*,float*,float*,
 | 
|---|
 | 21 |               double*, double*,double*,double*,double*,float*)
 | 
|---|
 | 22 | {
 | 
|---|
 | 23 | cerr << "synfast_() bidon ... - Fonction vide - Reza 04/99 " << endl;
 | 
|---|
 | 24 | throw " Unsupported function - synfast_() bidon ";
 | 
|---|
 | 25 | }
 | 
|---|
 | 26 | 
 | 
|---|
 | 27 | void  input_map_(char*,float*,int&)
 | 
|---|
 | 28 | {
 | 
|---|
 | 29 | cerr << "input_map_() bidon ... - Fonction vide - Reza 04/99 " << endl;
 | 
|---|
 | 30 | throw " Unsupported function - input_map_() bidon " ;
 | 
|---|
 | 31 | }
 | 
|---|
 | 32 | 
 | 
|---|
 | 33 | void  ecrire_fits_(int&,int&,int&,float*,char*,char*,int&,float&,float&)
 | 
|---|
 | 34 | {
 | 
|---|
 | 35 | cerr << "ecrire_fits_() bidon ... - Fonction vide - Reza 04/99 " << endl;
 | 
|---|
 | 36 | throw " Unsupported function - ecrire_fits_() bidon " ;
 | 
|---|
 | 37 | }
 | 
|---|
 | 38 | 
 | 
|---|
 | 39 | 
 | 
|---|