blob: 394be4943e852358d9cca4ba77e4f10814a670d5 (
plain)
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
|
wcs {return $WCS_}
wcsa {return $WCSA_}
wcsb {return $WCSB_}
wcsc {return $WCSC_}
wcsd {return $WCSD_}
wcse {return $WCSE_}
wcsf {return $WCSF_}
wcsg {return $WCSG_}
wcsh {return $WCSH_}
wcsi {return $WCSI_}
wcsj {return $WCSJ_}
wcsk {return $WCSK_}
wcsl {return $WCSL_}
wcsm {return $WCSM_}
wcsn {return $WCSN_}
wcso {return $WCSO_}
wcsp {return $WCSP_}
wcsq {return $WCSQ_}
wcsr {return $WCSR_}
wcss {return $WCSS_}
wcst {return $WCST_}
wcsu {return $WCSU_}
wcsv {return $WCSV_}
wcsw {return $WCSW_}
wcsx {return $WCSX_}
wcsy {return $WCSY_}
wcsz {return $WCSZ_}
image {return $IMAGE_}
physical {return $PHYSICAL_}
amplifier {return $AMPLIFIER_}
detector {return $DETECTOR_}
fk4 {return $FK4_}
b1950 {return $FK4_}
fk5 {return $FK5_}
j2000 {return $FK5_}
galactic {return $GALACTIC_}
ecliptic {return $ECLIPTIC_}
# SEXAGESIMAL
[+-]?{D}+:{D}+:{D}+"."? |
[+-]?{D}+:{D}+:{D}*"."{D}+ {set yylval $yytext; return $SEXSTR_}
# HMS
[+-]?{D}+h{D}+m{D}+"."?s |
[+-]?{D}+h{D}+m{D}*"."{D}+s {set yylval $yytext; return $HMSSTR_}
# DMS
[+-]?{D}+d{D}+m{D}+"."?s |
[+-]?{D}+d{D}+m{D}*"."{D}+s {set yylval $yytext; return $SMSSTR_}
|