      common /Names/                                     
     &       rtft,rtcf,rtth,lfft,lfcf,lfth,pelv,trnk,rtua,rtla,lfua,lfla,head,
     &       rtak,rtkn,rthp,lfak,lfkn,lfhp,pvtk,pvlb,rtel,rtsh,lfel,lfsh,neck,
     &       rt,lf,first,second,x,y,z,cntr,fx,fy,fz,mx,my,mz,rx,ry,rz,SegNames,
     &       JntNames,proximal,distal,rthd,lfhd,rtwr,lfwr,flex,abad,inex,
     &       CSAxes,AngAxes,FrcNames,VarNames,DataTypeNames,JCSFrcNames,
     &       TimeNames,EventNames,CSTypeNames,            
     &       ScrewCompNames,WrenchCompNames,MomCompNames,ImpCompNames,
     &       AnzVarName,JntSegNum,PowerCompNames,TransCompNames,
     &       JCSTransCompNames,PitArmCompNames,Vu3dVarNames
      integer*4
     &       rtft,rtcf,rtth,lfft,lfcf,lfth,pelv,trnk,rtua,rtla,lfua,lfla,head,
     &       rtak,rtkn,rthp,lfak,lfkn,lfhp,pvtk,pvlb,rtel,rtsh,lfel,lfsh,neck,
     &       rt,lf,first,second,x,y,z,cntr,fx,fy,fz,mx,my,mz,rx,ry,rz,proximal,
     &       distal,rthd,lfhd,rtwr,lfwr,flex,abad,inex,JntSegNum(2,15)
      character SegNames(15)*4,JntNames(15)*4,CSAxes(6)*3,AngAxes(3)*3,
     &          FrcNames(6)*3,MrkVarNames(3)*3,
     &          VarNames(70)*3,DataTypeNames(10)*10,JCSFrcNames(8)*3,
     &          TimeNames(3)*3,EventNames(4)*3,CSTypeNames(8)*3,
     &          ScrewCompNames(8)*3,WrenchCompNames(8)*3,MomCompNames(8)*3,
     &          ImpCompNames(4)*3,AnzVarName(128)*20,PowerCompNames(4)*3,
     &          TransCompNames(4)*3,JCSTransCompNames(4)*3,
     &          PitArmCompNames(4)*3,Vu3dVarNames(26)*3
                                              
                               
                                                           
