anchor.diff:  !FOX  D V RE INT REFR ;
   !FOX  D V RE INT DXPA ;
   !FOX  D V RE INT DYPA ;
  -!FOX  D V RE INT RNN ;
   !FOX  D V RE INT COEFF ;
   !FOX  D V RE INT ANGRAD ;
   !FOX  D V RE INT ONE ;
  
positive.code: !FOX  TPX(2)=ONE ;
  !FOX  TPY(2)=ONE ;
      do NN=3,morder+1
        RNN=real(NN-1,fPrec)
        MM=NN-1
        OO=NN-2
  !FOX  TX(NN)=(TWO*(UU*TX(MM)))-TX(OO) ;
  !FOX  TY(NN)=(TWO*(VV*TY(MM)))-TY(OO) ;
  !FOX  TPX(NN)=(RNN*(TX(MM)-(UU*TX(NN))))/FU ;
  !FOX  TPY(NN)=(RNN*(TY(MM)-(VV*TY(NN))))/FV ;
      end do
      
      ! get kicks
  
negative.code:   do nn=2,cheby_maxOrder(iTable)
      Tx(nn)=two*(uu*Tx(nn-1))-Tx(nn-2)
      Ty(nn)=two*(vv*Ty(nn-1))-Ty(nn-2)
      ! use definition of derivative applied to definition of polynomial:
      ! d/du Tn(u)= d/du[ 2u*T_(n-1)(u)-T_(n-2)(u) ] = 2T_(n-1)(u) +2u*T'_(n-1)(u) -T'_(n-2)(u)
      !           = 2(T_(n-1)(u) +u*T'_(n-1)(u))-T'_(n-2)(u)
      Tpx(nn)=two*(Tx(nn-1)+uu*Tpx(nn-1))-Tpx(nn-2)
      Tpy(nn)=two*(Ty(nn-1)+vv*Tpy(nn-1))-Tpy(nn-2)
    end do
  
    ! get kicks
  