function self_conjugate,visin
;
; Averages upper and lower conjugated visibilities
; Assumes all uv circles are complete and have even # pts
 
visout=visin

isc=visin.isc
subcoll=uniq(isc)
print,subcoll
nsc=n_elements(subcoll)
for j=0,nsc-1 do begin
  print,j,'-------------------------------------'
  sc=isc(subcoll[j])
  w=where(visin.isc eq sc,nw)
  vis=visin[w].obsvis
  u=visin[w].u
  v=visin[w].v
  wp=where(v gt 0,nw)
  for k=0,nw-1 do begin ; assumes ccw order
   vis[k] = 0.5*(vis[k]+conj(vis[2*nw-1-k])) ; upper uv semi circle
   vis[2*nw-1-k]=conj(vis[k]) ; lower is the conjugate
   print,'j=',j,' nw=',nw,' k=',k

endfor ;  k
  visout[w].obsvis=vis
endfor ; j

return,visout

end