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