Changeset 3973 in Sophya for trunk/Cosmo/RadioBeam/subtractradsrc.cmd
- Timestamp:
- Apr 18, 2011, 5:30:44 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Cosmo/RadioBeam/subtractradsrc.cmd
r3830 r3973 12 12 csh> ~/Objs/exe/cmvginit3df -a -1 -2 -C -G 0. -F 0 -x 360,3 -y 360,3 -z 256,3 -Z 0.60 -8 1. -n 10000 -O 0,2 -o lssz060 -T 2 13 13 14 # 1.c/ To run SimLSS with GSM map parametersand 40x40 deg maps (DeltaFreq=500 MHz) 15 csh> ~/Objs/exe/cmvginit3df -a -1 -2 -C -G 0. -F 0 -x 600,1.9 -y 800,1.9 -z 256,2.8 -Z 0.60 -8 1. -n 10000 -O 0,2 -o lssz060 -T 2 16 14 17 # 1.c/ Change the X and Z axis of the cube to adapt it to RadioBeam package convention 15 18 # SimLSS output : the radial (redshift) direction along X axis of the cube (TArray) … … 18 21 19 22 csh> cat > racube.pic 20 set f lssz0 5623 set f lssz060 21 24 readfits ${f}_r.fits 22 25 rename ${f}_r map … … 33 36 print lsscube 34 37 # expmeansig lsscube val 35 saveppf lsscube lsscube .ppf38 saveppf lsscube lsscubez060.ppf 36 39 37 40 csh> spiapp -term -exec racube.pic 38 41 42 #### Cube LSS 40x30 deg (3') @ z=0.6 ( lsscubez060.ppf ) 43 #### -> Size= 122880000 Mean=-7.01664e-05 Sigma=2.53016 Min=-13.7439 Max=14.4648 39 44 40 45 ## Step 2/ Produce synchrotron and radio source sky cubes (cube unit is Temparature- Kelvin) 41 46 # 2.a/ Synchrotron map from HASLAM 400 MHz map 42 csh> ./Objs/syncube syncmap_eq.fits syncube.ppf 47 csh> ./Objs/syncube syncmap_eq.fits syncube.ppf syncmap.ppf 43 48 # 2.b/ radio source cube from NVSS catalog 44 csh> ./Objs/srcat2cube nvss.fits nvsscube.ppf 49 csh> ./Objs/srcat2cube -nvss nvss.fits nvsscube.ppf nvssmap.ppf 50 # Or from the north20 catalog : 51 csh> ./Objs/srcat2cube -north20 north20cm.fits north20cube.ppf north20map.ppf 52 45 53 # 2.c/ Add the two cubes using the following spiapp script 46 54 csh> cat > sumcubes.pic 47 55 openppf syncube.ppf 48 openppf srcnor3d.ppf56 openppf radsrccube.ppf 49 57 # expmeansig syncube val 50 # expmeansig srcnor3dval51 c++exec TArray<r_4> fgndcube = syncube+ srcnor3d; KeepObj(fgndcube);58 # expmeansig nvsscube val 59 c++exec TArray<r_4> fgndcube = syncube+radsrccube; KeepObj(fgndcube); 52 60 print fgndcube 53 61 # expmeansig fgndcube val … … 56 64 csh> spiapp -term -exec sumcubes.pic 57 65 66 #### syncube:Mean= 1.8101 Sigma= 0.326538 Min= 0.857019 Max= 3.58987 67 #### nvsscube: Mean= 1.95073 Sigma= 1.68515 Min= 0.857019 Max= 428.398 68 #### fgndcube=syncube+nvsscube: Mean= 0.140623 Sigma= 1.65068 Min= 0 Max= 426.559 69 #### north20: fgndcube_north: 70 71 ## Step 2.b/ Produce foreground cube from GSM 72 csh> ./Objs/gsm2cube ../Catalogs/GSM/ 1 256 fgndcube_gsm.ppf 73 58 74 ## Step 3/ Apply lobe (50 meter diameter array) effect on foreground cube and LSS cube 59 csh> ./Objs/applobe 50. fgndcube.ppf fgndcube_lobe.ppf 60 csh> ./Objs/applobe 50. lsscube.ppf lsscube_lobe.ppf 61 ## Step 3.b/ Correct for the lobe effect by bringing all to the beam of Diam/Lambda = 130 62 csh> ./Objs/applobe 50. lsscube_lobe.ppf lsscube_corlobe.ppf 130 63 csh> ./Objs/applobe 50. fgndcube_lobe.ppf fgndcube_corlobe.ppf 130 75 csh> set ddish=55. 76 csh> set ddishcor=50. 77 csh> ./Objs/applobe $ddish fgndcube.ppf fgndcube_lobe.ppf 78 csh> ./Objs/applobe -fib $ddish fgndcube.ppf fgndcube_flobe.ppf 79 csh> ./Objs/applobe $ddish lsscube.ppf lsscube_lobe.ppf 80 csh> ./Objs/applobe -fib $ddish lsscube.ppf lsscube_flobe.ppf 81 ## Step 3.b/ Correct for the lobe effect by bringing all to the beam of Diam/Lambda = 150 (55 m @ z=0.7 - 820 MHz) 82 csh> ./Objs/applobe $ddish lsscube_lobe.ppf lsscube_corlobe.ppf $ddishcor 83 csh> ./Objs/applobe $ddish fgndcube_lobe.ppf fgndcube_corlobe.ppf $ddishcor 84 85 ## Step 3.c/ Apply lobe (Filled 11x11 5m dishes array) effect on foreground cube and LSS cube 86 csh> ./Objs/applobe repf11x11.ppf fgndcube.ppf fgndcube_lobe.ppf 87 csh> ./Objs/applobe repf11x11.ppf lsscube.ppf lsscube_lobe.ppf 88 ## Step 3.d/ Correct for the lobe effect by bringing all to the beam of Diam/Lambda = 150 (55 m @ z=0.7 - 820 MHz) 89 csh> ./Objs/applobe repf11x11.ppf lsscube_lobe.ppf lsscube_corlobe.ppf $ddishcor 90 csh> ./Objs/applobe repf11x11.ppf fgndcube_lobe.ppf fgndcube_corlobe.ppf $ddishcor 64 91 65 92 ### Step 4/ Compute power spectra 66 ## mass to temperature converion factor CT21 ~= 0.2 mK93 ## mass to temperature converion factor CT21 ~= 0.21 mK for gHI=2% , 0.11 for gHI=1% , 0.13 for gHI=0.008x(1+0.6) 67 94 ## Foreground maps are in temperature 68 95 ## Noise fluctuations Sigma^2 ~ T_sys^2 / t_obs * DeltaFreq 69 ## Tsys ~ 50 K , DeltaFreq ~ 0. 275 MHz , t_obs ~ 1 day ~ 80 000 s.70 ## sigma_noise ~ 0. 35 mK96 ## Tsys ~ 50 K , DeltaFreq ~ 0.5 MHz , t_obs ~ 1 day ~ 80 000 s. 97 ## sigma_noise ~ 0.25 mK -> 3 mK 71 98 # 4.a/ LSS power spectrum without noise 72 csh> ./Objs/calcpk lsscube.ppf lsspk.ppf 0. 299 csh> ./Objs/calcpk lsscube.ppf lsspk.ppf 0.13 73 100 # and with noise 74 csh> ./Objs/calcpk lsscube.ppf lsspkwn.ppf 0. 2 0.35101 csh> ./Objs/calcpk lsscube.ppf lsspkwn.ppf 0.13 3 75 102 # with the lobe effect 76 csh> ./Objs/calcpk lsscube_lobe.ppf lsspklobe.ppf 0.2 77 csh> ./Objs/calcpk lsscube_lobe.ppf lsspklobewn.ppf 0.2 0.35 78 csh> ./Objs/calcpk lsscube_corlobe.ppf lsspkcorlobe.ppf 0.2 103 csh> ./Objs/calcpk lsscube_lobe.ppf lsspklobe.ppf 0.13 104 csh> ./Objs/calcpk lsscube_flobe.ppf lsspkflobe.ppf 0.13 105 csh> ./Objs/calcpk lsscube_lobe.ppf lsspklobewn.ppf 0.13 3 106 csh> ./Objs/calcpk lsscube_corlobe.ppf lsspkcorlobe.ppf 0.13 79 107 80 108 # 4.b/ Foreground power spectrum 81 109 csh> ./Objs/calcpk fgndcube.ppf fgndpk.ppf 1000 82 110 csh> ./Objs/calcpk fgndcube_lobe.ppf fgndpklobe.ppf 1000 111 csh> ./Objs/calcpk fgndcube_flobe.ppf fgndpkflobe.ppf 1000 83 112 csh> ./Objs/calcpk fgndcube_corlobe.ppf fgndpkcorlobe.ppf 1000 84 113 85 114 # 4.c/ Extract LSS P(k) from Foreground+LSS+noise , after cleaning/subtraction without beam 86 csh> ./Objs/calcpk2 lsscube.ppf 0.2 fgndcube.ppf 1000 subpk.ppf 0.35 50. 0. 0. P2 115 csh> set beamdesc=repf11x11.ppf 116 csh> set ddishcor=50. 117 csh> set noiselev=1. 118 csh> ./Objs/calcpk2 lsscube.ppf 0.13 fgndcube.ppf 1000 subpk.ppf $noiselev $beamdesc 0. 0. P2 87 119 # 4.d / Extract LSS P(k) from Foreground+LSS+noise and beam effect, without beam correction 88 csh> ./Objs/calcpk2 lsscube_lobe.ppf 0. 2 fgndcube_lobe.ppf 1000 subpklobe.ppf 0.35 50. 0. 3. P289 # 4.e / Extract LSS P(k) from Foreground+LSS+noise and beam effect - correcting to a beam of Diam /Lambda = 13090 csh> ./Objs/calcpk2 lsscube_lobe.ppf 0. 2 fgndcube_lobe.ppf 1000 subpkcorlobe.ppf 0.35 50. 130. 3. P2120 csh> ./Objs/calcpk2 lsscube_lobe.ppf 0.13 fgndcube_lobe.ppf 1000 subpklobe.ppf $noiselev $beamdesc 0. 0. P2 121 # 4.e / Extract LSS P(k) from Foreground+LSS+noise and beam effect - correcting to a beam of Diam= $ddishcor 122 csh> ./Objs/calcpk2 lsscube_lobe.ppf 0.13 fgndcube_lobe.ppf 1000 subpkcorlobe.ppf $noiselev $beamdesc $ddishcor 0. P2 91 123 # Or using a linear fit for foreground subtraction (old version) 92 csh> ./Objs/calcpk2 lsscube_lobe.ppf 0. 2 fgndcube_lobe.ppf 1000 subpkcorlobep1.ppf 0.35 50. 130. 3. P1124 csh> ./Objs/calcpk2 lsscube_lobe.ppf 0.13 fgndcube_lobe.ppf 1000 subpkcorlobep1.ppf $noiselev $beamdesc $ddishcor 0. P2 93 125 # 4.f / Estimate residual noise from Foreground removal : 94 csh> ./Objs/calcpk2 zerolss.ppf 0. fgndcube_lobe.ppf 1000 subpknolss.ppf 0.35 50. 130. 3. P295 csh> ./Objs/calcpk2 zerolss.ppf 0. fgndcube_lobe.ppf 1000 subpknolssnocor.ppf 0.35 50. 0. 3.126 csh> ./Objs/calcpk2 lsscube.ppf 0. fgndcube_lobe.ppf 1000 residcorlobe.ppf $noiselev $beamdesc $ddishcor 0. P2 127 csh> ./Objs/calcpk2 lsscube.ppf 0. fgndcube_lobe.ppf 1000 residnocor.ppf $noiselev $beamdesc 0. 0. P2 96 128 97 129 ### Step 5 / Check the results using spiapp … … 100 132 openppf fgndpk.ppf 101 133 openppf fgndpklobe.ppf 134 openppf fgndpkflobe.ppf 102 135 openppf fgndpkcorlobe.ppf 103 136 openppf lsspk.ppf 104 137 openppf lsspklobe.ppf 138 openppf lsspkflobe.ppf 105 139 openppf lsspklobewn.ppf 106 140 openppf subpklobe.ppf … … 136 170 137 171 # Calcul du volume total en Mpc^3 138 set VOL 3*3*3*360*360*256172 set VOL (1.9*1.9*2.8*800*600*256) 139 173 plot2d lsspk x val*$VOL 1 'logx logy nsta xylimits=0.01,2.,10.,1e4 cpts marker=box,5 gold' 140 174 plot2d lsspklobewn x val*$VOL 1 'same nsta cpts marker=box,5 siennared'
Note:
See TracChangeset
for help on using the changeset viewer.