guilhem_lavaux/vide_public
0
0
Fork 0
mirror of https://bitbucket.org/cosmicvoids/vide_public.git synced 2025-07-06 08:11:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Imported healpix tree

Browse source
This commit is contained in:
Guilhem Lavaux 2012-10-30 13:56:48 -04:00
parent 4182c30485
commit 4bfb62f177
136 changed files with 26534 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

124
external/healpix/Healpix_cxx/rotalm_cxx.cc vendored Normal file
View file

@ -0,0 +1,124 @@
/*
* This file is part of Healpix_cxx.
*
* Healpix_cxx 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.
*
* Healpix_cxx 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 Healpix_cxx; if not, write to the Free Software
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
*
* For more information about HEALPix, see http://healpix.jpl.nasa.gov
*/
/*
* Healpix_cxx is being developed at the Max-Planck-Institut fuer Astrophysik
* and financially supported by the Deutsches Zentrum fuer Luft- und Raumfahrt
* (DLR).
*/
/*
* Copyright (C) 2005 Max-Planck-Society
* Author: Martin Reinecke
*/
#include "alm.h"
#include "alm_fitsio.h"
#include "fitshandle.h"
#include "alm_powspec_tools.h"
#include "trafos.h"
using namespace std;
namespace {
Trafo maketrafo (int num)
{
switch (num)
{
case 1: return Trafo(2000,2000,Equatorial,Galactic);
case 2: return Trafo(2000,2000,Galactic,Equatorial);
case 3: return Trafo(2000,2000,Equatorial,Ecliptic);
case 4: return Trafo(2000,2000,Ecliptic,Equatorial);
case 5: return Trafo(2000,2000,Ecliptic,Galactic);
case 6: return Trafo(2000,2000,Galactic,Ecliptic);
case 7: return Trafo(1950,1950,Equatorial,Galactic);
case 8: return Trafo(1950,1950,Galactic,Equatorial);
case 9: return Trafo(1950,1950,Equatorial,Ecliptic);
case 10: return Trafo(1950,1950,Ecliptic,Equatorial);
case 11: return Trafo(1950,1950,Ecliptic,Galactic);
case 12: return Trafo(1950,1950,Galactic,Ecliptic);
default: planck_fail("Unsupported transformation "+dataToString(num));
}
}
} // unnamed namespace
int main(int argc, const char **argv)
{
PLANCK_DIAGNOSIS_BEGIN
announce ("rotalm_cxx");
if (argc!=5)
{
cout << "Usage: rotalm_cxx <infile> <outfile> <itransform> <pol>"
<< endl
<< "Transform 1: Equatorial (2000) -> Galactic (2000)" << endl
<< " 2: Galactic (2000) -> Equatorial (2000)" << endl
<< " 3: Equatorial (2000) -> Ecliptic (2000)" << endl
<< " 4: Ecliptic (2000) -> Equatorial (2000)" << endl
<< " 5: Ecliptic (2000) -> Galactic (2000)" << endl
<< " 6: Galactic (2000) -> Ecliptic (2000)" << endl
<< " 7: Equatorial (1950) -> Galactic (1950)" << endl
<< " 8: Galactic (1950) -> Equatorial (1950)" << endl
<< " 9: Equatorial (1950) -> Ecliptic (1950)" << endl
<< " 10: Ecliptic (1950) -> Equatorial (1950)" << endl
<< " 11: Ecliptic (1950) -> Galactic (1950)" << endl
<< " 12: Galactic (1950) -> Ecliptic (1950)" << endl
<< endl
<< "pol: T or F" << endl << endl;
planck_fail_quietly("Incorrect usage");
}
string infile = argv[1];
string outfile = argv[2];
int trafo = stringToData<int>(argv[3]);
bool polarisation = stringToData<bool>(argv[4]);
Trafo tr(maketrafo(trafo));
fitshandle out;
out.create (outfile);
Alm<xcomplex<double> > almT,almG,almC;
if (!polarisation)
{
int lmax, dummy;
get_almsize (infile,lmax,dummy);
read_Alm_from_fits (infile, almT, lmax, lmax);
rotate_alm(almT,tr.Matrix());
write_Alm_to_fits (out,almT,lmax,lmax,PLANCK_FLOAT32);
}
else
{
int lmax, dummy;
get_almsize_pol (infile,lmax,dummy);
read_Alm_from_fits (infile, almT, lmax, lmax, 2);
read_Alm_from_fits (infile, almG, lmax, lmax, 3);
read_Alm_from_fits (infile, almC, lmax, lmax, 4);
rotate_alm(almT,almG,almC,tr.Matrix());
write_Alm_to_fits (out,almT,lmax,lmax,PLANCK_FLOAT64);
write_Alm_to_fits (out,almG,lmax,lmax,PLANCK_FLOAT64);
write_Alm_to_fits (out,almC,lmax,lmax,PLANCK_FLOAT64);
}
PLANCK_DIAGNOSIS_END
}