1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
|
echo
echo "*** wcs2.sh ***"
echo "Starting DS9..."
if [ `xpaaccess ds9` = no ]; then
ds9 &
i=1
while [ "$i" -le 30 ]
do
sleep 2
if [ `xpaaccess ds9` = yes ]; then
break
fi
i=`expr $i + 1`
done
fi
testit () {
echo "Testing $1"
xpaset -p ds9 fits $1
xpaset -p ds9 wcs sky fk5
xpaset -p ds9 align yes
read
xpaset -p ds9 wcs sky galactic
read
xpaset -p ds9 frame clear
}
# load default image
xpaset -p ds9 grid yes
xpaset -p ds9 wcs skyformat deg
echo "AST"
testit wcs2/ast.fits
echo "STScI DSS"
testit wcs2/wcen.fits.gz
echo "Old SCAMP"
testit wcs2/ngc6819.fits
echo "TAN+ PV"
testit wcs2/paucam_0_0_t7_0_science.fits
echo "TAN PV2_1=0 PV2_2=0"
testit wcs2/a68.fits
echo "ZPN+ PV"
testit wcs2/UKIDDS_K_3219_606_17_67_3.fits
echo "TNX"
testit wcs2/30s_01.fits
echo "ZPX"
testit wcs2/E5.3090.fits
echo "TAN-SIP"
testit wcs2/sst.fits
testit wcs2/mos8.fits
echo "SAO Plate"
testit wcs2/ac.fits
testit wcs2/crts_short.fits
#echo "TAB"
#testit wcs2/sparse.fits
echo "WCSDEP"
testit wcs2/ngc6819.fits
echo "HPX"
testit wcs2/wmap.fits
echo "GLON-ZEA"
testit wcs2/South_galactic.fits
echo "RA-CAR"
testit wcs2/CAR_model.fits
testit wcs2/car_01.fits
echo "GLON-CAR"
testit wcs2/GLM_00350+0115_mosaic_I4_cutout_14706.fits
echo "IRAF"
testit wcs2/obj011.fits
xpaset -p ds9 quit
|
