      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,vx,
     & vy,vz,wx,wy,wz,
     & DisttoProx,ProxtoDist,fem,aam,iem,mlf,apf,cdf,
     & GCS_CS,LCS_CS,PRO_CS,DIS_CS,JCS_CS,EUL_CS,TDP_ANL,CKC_ANL,
     & HH_ANL,FULL_ANL,UPR_ANL,MAX_ANL,CC_ANL,CCR_ANL,CCL_ANL,
     & CKC_NMA_ANL,F3DR_ANL,F3DL_ANL,STUP_ANL,STDN_ANL,STRUP_ANL,
     & STLUP_ANL,STRDN_ANL,STLDN_ANL,MAYO_ANL,MIR_ANL,MIL_ANL
      character seg_names(15)*4,jnt_names(15)*4,AnzVarName(128)*20,
     &          ANZFileVersion*1,ANLNames(21)*20
                                         
      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,proximal,distal,rthd,lfhd,rtwr,lfwr,flex,abad,inex,vx,
     & vy,vz,wx,wy,wz,
     & DisttoProx,ProxtoDist,fem,aam,iem,mlf,apf,cdf,
     & GCS_CS,LCS_CS,PRO_CS,DIS_CS,JCS_CS,EUL_CS,TDP_ANL,CKC_ANL,
     & HH_ANL,FULL_ANL,UPR_ANL,MAX_ANL,CC_ANL,CCR_ANL,CCL_ANL,
     & CKC_NMA_ANL,F3DR_ANL,F3DL_ANL,STUP_ANL,STDN_ANL,STRUP_ANL,
     & STLUP_ANL,STRDN_ANL,STLDN_ANL,MAYO_ANL,MIR_ANL,MIL_ANL,
     & seg_names,jnt_names,AnzVarName,ANZFileVersion,ANLNames
                                                
