1* test ASRC temperature coeff
2
3v1  1 0  dc=100 ac=1
4
5b2  2 0  i=v(1) tc1=0.001
6v2  0 2  0
7
8b3  3 0  v=v(1) tc1=0.001
9
10.temp 127.0
11
12.control
13op
14let idc2_gold = 100 * (1 + 100*0.001)
15let vdc3_gold = 100 * (1 + 100*0.001)
16let idc2=i(v2)
17let vdc3=v(3)
18
19* print idc2 vdc3 idc2_gold vdc3_gold
20
21let err1 = idc2/idc2_gold - 1
22let err2 = vdc3/vdc3_gold - 1
23
24if abs(err1) > 1e-9 or abs(err2) > 1e-9
25  echo "ERROR: dc test failed, err1 = $&err1 err2 = $&err2"
26  quit 1
27end
28
29ac dec 1 1kHz 1kHz
30let iac2_gold = 1.0 * (1 + 100*0.001)
31let vac3_gold = 1.0 * (1 + 100*0.001)
32let iac2=i(v2)
33let vac3=v(3)
34
35* print iac2 vac3 iac2_gold vac3_gold
36
37let err3 = iac2/iac2_gold - 1
38let err4 = vac3/vac3_gold - 1
39
40if abs(err3) > 1e-9 or abs(err4) > 1e-9
41  echo "ERROR: ac test failed, err3 = $&err3 err4 = $&err4"
42  quit 1
43end
44
45echo "INFO: success"
46quit 0
47
48.endc
49