*-- Author : S.Burke / J.V. Morris
      SUBROUTINE FKZTOR(SIN,CIN,BZ,COUT)
**********************************************************************                                        
*                                                                    *                                        
* Transform a covariance matrix from fixed z to fixed R              *                                        
*                                                                    *                                        
* Assumed to be in terms of (R,PHI)                                  *                                        
*                                                                    *                                        
*                        *** NOT TESTED ***                          *                                        
*                                                                    *                                        
**********************************************************************                                        
**********************************************************************                                        
      CALL UCOPY(CIN(2,2),COUT(2,2),38)                                                                
*