Show
Ignore:
Timestamp:
04/09/12 08:55:27 (2 years ago)
Author:
Raymond Toy <rtoy@…>
Children:
f203389e5e78d1f001f68447ac2a9dd86dcfbbf6, 22db89aa72af64360ed2d0f97709fc26ca01368b
Parents:
cb1a5d41baf9d4db12a2563a230d0a1e55c8adea
git-committer:
Raymond Toy <rtoy@…> (04/09/12 08:55:27)
Message:

Fix two typos in the names of tests.

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • rt-tests.lisp

    r6cfb0a rf8943a  
    909909  nil) 
    910910 
    911 (rt:deftest oct.jacobi-sn.1q 
     911(rt:deftest oct.jacobi-cn.1q 
    912912    (let* ((ek (elliptic-k #q.5)) 
    913913           (val (jacobi-cn ek #q.5))) 
     
    11801180       for t3 = (elliptic-theta-3 0 (elliptic-nome m)) 
    11811181       for true = (sqrt (/ (* 2 (elliptic-k m)) (float-pi m))) 
    1182        for result = (check-accuracy 206 t3 true) 
     1182       for result = (check-accuracy 205.7 t3 true) 
    11831183       when result 
    11841184       append (list (list (list k m) result))) 
     
    14121412  nil) 
    14131413 
    1414 (rt:deftest psi.2d 
     1414(rt:deftest psi.2q 
    14151415    (let* ((z (float 4/3 #q1)) 
    14161416           (p (psi z))