source: Sophya/trunk/SigPredictor/lightsynchro.cc@ 801

Last change on this file since 801 was 801, checked in by ansari, 25 years ago

Fichiers au format unix

dominique

File size: 1.1 KB
RevLine 
[801]1 // Dominique YVON, CEA/DAPNIA/SPP 02/2000
2
3#include <stdio.h>
4#include <stdlib.h>
5#include <math.h>
6#include "spheregorski.h"
7#include "fitsioserver.h"
8#include "lightsynchro.h"
9
10#ifdef __MWERKS__
11 #include "mwerksmath.h"
12 #include "macenvvariables.h"
13#endif
14
15LightSynchro::LightSynchro(int_4 nside)
16{ sprintf(Name, "Lumire Synchrotron");
17 freqRef=0.408e9; // frequence de la carte 0.408 GHz
18 index=-0.9;
19 nlat=nside;
20 if (!(nside==1024)) {
21 cerr<<" Fond LightSynchro calculŽ avec Nside= "<<nside<<endl;
22 cerr<<" carte de resolution nside= 1024 disponible"<<endl;
23 }
24
25 resolution=2*3.14159/4./nlat; // Radians
26
27 try { pMap=new SphereGorski<float>(nlat); } // MJy/m2/Hz/st cad 10-20 W/m2/Hz/st
28 catch(bad_alloc) {
29 cerr<<"memory booking error LightSynchro constructor nlat= "<<nlat<<endl;
30 exit(-1);
31 }
32 char filename[150];
33#ifndef __MWERKS__
34 char *PATHDataLScr=getenv("PATHDataLScr");
35#endif
36 sprintf(filename,"%ssync_res%04i.fits",PATHDataLScr,nside);
37 FitsIoServer FitsServer;
38 FitsServer.load((*pMap),filename);
39 // unite: MJy/m2/Hz/st.
40};
41
42LightSynchro::~LightSynchro() {
43 delete pMap;
44}
Note: See TracBrowser for help on using the repository browser.