52 lines
1.5 KiB
Go
52 lines
1.5 KiB
Go
|
// 被测契约：新模型的矢量视位置管线与 DE441 视赤经赤纬（历元真赤道）一致到半解析表本身的精度。
|
||
|
|
package basic
|
||
|
|
|
||
|
|
import (
|
||
|
|
"bufio"
|
||
|
|
"math"
|
||
|
|
"os"
|
||
|
|
"strconv"
|
||
|
|
"strings"
|
||
|
|
"testing"
|
||
|
|
|
||
|
|
"b612.me/astro/internal/ephem"
|
||
|
|
"b612.me/astro/internal/ephemtest"
|
||
|
|
)
|
||
|
|
|
||
|
|
func TestPlanetApparentVectorMatchesDE441(t *testing.T) {
|
||
|
|
ephemtest.Pin(t, ephem.Semianalytic)
|
||
|
|
f, err := os.Open("testdata/semianalytic/planet_apparent_de441.csv")
|
||
|
|
if err != nil {
|
||
|
|
t.Fatal(err)
|
||
|
|
}
|
||
|
|
defer f.Close()
|
||
|
|
fns := [8]func(float64) (float64, float64){
|
||
|
|
nil, MercuryApparentRaDec, VenusApparentRaDec, MarsApparentRaDec, JupiterApparentRaDec,
|
||
|
|
SaturnApparentRaDec, UranusApparentRaDec, NeptuneApparentRaDec,
|
||
|
|
}
|
||
|
|
rmsLimit := [8]float64{0, 15, 35, 30, 15, 10, 15, 20}
|
||
|
|
maxLimit := [8]float64{0, 35, 110, 150, 40, 20, 45, 50}
|
||
|
|
var ss, mx [8]float64
|
||
|
|
var n [8]int
|
||
|
|
sc := bufio.NewScanner(f)
|
||
|
|
for sc.Scan() {
|
||
|
|
p := strings.Split(sc.Text(), ",")
|
||
|
|
b, _ := strconv.Atoi(p[0])
|
||
|
|
jd, _ := strconv.ParseFloat(p[1], 64)
|
||
|
|
wantRA, _ := strconv.ParseFloat(p[2], 64)
|
||
|
|
wantDec, _ := strconv.ParseFloat(p[3], 64)
|
||
|
|
ra, dec := fns[b](jd)
|
||
|
|
dra := math.Mod(ra-wantRA+540, 360) - 180
|
||
|
|
d := math.Hypot(dra*math.Cos(wantDec*math.Pi/180), dec-wantDec) * 3.6e6
|
||
|
|
ss[b] += d * d
|
||
|
|
n[b]++
|
||
|
|
mx[b] = math.Max(mx[b], d)
|
||
|
|
}
|
||
|
|
for b := 1; b <= 7; b++ {
|
||
|
|
rms := math.Sqrt(ss[b] / float64(n[b]))
|
||
|
|
if rms > rmsLimit[b] || mx[b] > maxLimit[b] {
|
||
|
|
t.Errorf("planet %d: rms %.1f mas (limit %.0f), max %.1f mas (limit %.0f)", b, rms, rmsLimit[b], mx[b], maxLimit[b])
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|