Recall buffer length: 128 1	?help 2	help,!warn,/st 3	help,/sys 4	?persist
5	?length 6	hsi_vis_display,vis 7	hsi_vis_display,visc 8	xdoc,'hsi_vis_display
9	oplot,-imaginary(visc[reverse(w6)].obsvis) 10	plot,imaginary(visc[w6].obsvis)
11	w6=where(visc.isc eq 6) 12	plot,w6=where(visc.isc eq 6) 13	plot,visc.u,visc.v
14	visc=self_conjugate(vis) 15	.r self_conjugate 16	plot,visc.u,visc.v,psym=6
17	plot,visc.u,visc.v 18	visc=self_conjugate(vis) 19	.r self_conjugate
20	visc=self_conjugate(vis) 21	plot,visc.u,visc.v 22	help,visc 23	.c
24	visc=self_conjugate(vis) 25	.r self_conjugate
26	plot,visin[pos].v,visin[neg].v 27	plot,visin[pos].u,visin[neg].u
28	visc=self_conjugate(vis) 29	.r self_conjugate 30	visc=self_conjugate(vis)
31	.r self_conjugate 32	plot,visin[pos].u 33	oplot,reverse(visin[pos].u)
34	plot,visin[pos].u 35	plot,reverse(visin[pos].u) 36	plot,visin[pos].u
37	oplot,visin[neg].u 38	plot,visin[pos].u 39	oplot,-visin[neg].v,thick=2
40	oplot,visin[neg].v,thick=2 41	oplot,visin[neg].v 42	plot,visin[pos].v
43	print,visin[138:149].u,visin[138:149].v
44	plot,visin[138:149].u,visin[138:149].v
45	plot,visin[137:149].u,visin[137:149].v
46	plot,visin[139:149].u,visin[139:149].v
47	plot,visin[130:149].u,visin[130:149].v
48	plot,visin[100:149].u,visin[100:149].v 49	plot,visin.u,visin.v
50	plot,visin[pos].u,visin[neg].u 51	erase 52	plot,visin[pos].u,visin[neg].u
53	pmm,visin[pos].u 54	print,umaxdiff 55	visc=self_conjugate(vis)
56	.r self_conjugate 57	visc=self_conjugate(vis) 58	.r self_conjugate
59	help,vis 60	plot,vis[pos].v+vis[neg].v 61	plot,vis[pos].v,-vis[neg].v
62	help,pos,neg 63	help,z 64	z=conj(vis.obsvis)
65	print,correlate(imaginary(visc[pos].obsvis),-imaginary(visc[neg].obsvis))
66	print,correlate(imaginary(visc[pos].obsvis),-imaginary(visc[neg].obsvis)
67	oplot,-imaginary(visc[neg].obsvis),line=2 68	plot,imaginary(visc[pos].obsvis)
69	oplot,-imaginary(vis[neg].obsvis),line=2 70	plot,imaginary(vis[pos].obsvis)
71	pmm,imaginary(visc[pos].obsvis) 72	pmm,imaginary(visc[neg].obsvis)
73	negc=where(visc.v lt 0,nn) 74	posc=where(visc.v gt 0,np) 
75	pmm,imaginary(vis[neg].obsvis) 76	pmm,imaginary(vis[pos].obsvis)
77	pmm,imaginary(vis[pos]) 78	neg=where(vis.v lt 0,nn)
79	pos=where(vis.v gt 0,np) 
80	plot,imaginary(vis.obsvis),-imaginary(visc.obsvis)
81	oplot,imaginary(vis.obsvis),imaginary(visc.obsvis)
82	oplot,vis.obsvis,visc.obsvis 83	plot,vis.obsvis,vis.obsvis 84	help,vis
85	pmm,imaginary(visc.obsvis)-imaginary(vis.obsvis)
86	pmm,abs(visc.obsvis-vis.obsvis)
87	plot,imaginary(visc[pos].obsvis),imaginary(visc[neg].obsvis),psym=6
88	neg=where(visc.v lt 0,nn) & print,nn 89	pos=where(visc.v gt 0,np) & print,np
90	window,2 91	visc=hsi_vis_combine(vis)
92	plot,imaginary(vis[pos].obsvis),imaginary(vis[neg].obsvis),psym=6
93	neg=where(vis.v lt 0,nn) & print,nn 94	pos=where(vis.v gt 0,np) & print,np
95	vis=vism 96	neg=where(vis.v lt 0,nn) & print,nn
97	pos=where(vis.v gt 0,np) & print,np
98	plot,imaginary(visc[wv].obsvis),imaginary(visc[wvp].obsvis),psym=6
99	plot,imaginary(visc[wv].obsvis),imaginary(visc[wvp].obsvis)
100	plot,imaginary(visc[wvp].obsvis) 101	plot,imaginary(visc[wv].obsvis)
102	plot,imaginary(visc[wc].obsvis) 103	wvp=where(visc.v gt 0,pv) & print,pv
104	wv=where(visc.v le 0,nv) & print,nv 105	wv=where(visc.v lt 0,nv) & print,nv
106	help,vis_c 107	plot,imaginary(vis_c(wv).obsvis),yra=[-150,150]
108	wvp=where(vis_c.v gt 0,pv) & print,pv
109	wv=where(vis_c.v lt 0,nv) & print,nv 110	vis_c=hsi_vis_combine(vism,/conj)
111	oplot,[0,99],[0,0] 112	oplot,imaginary(visc(wvp).obsvis),line=2
113	plot,imaginary(visc(wv).obsvis),yra=[-150,150] 114	oplot,[0,99],[0,0]
115	oplot,imaginary(visc(wvp).obsvis),line=2 116	plot,imaginary(visc(wv).obsvis)
117	oplot,-imaginary(visc(wvp).obsvis),line=2
118	oplot,imaginary(visc(wvp).obsvis),line=2 119	plot,imaginary(visc(wv).obsvis)
120	plot,imaginary(visc(wv)) 121	wvp=where(visc.v gt 0,pv) & print,pv
122	wv=where(visc.v lt 0,nv) & print,nv 123	wv=where(visc.v gt 0,pv) & print,pv
124	wv=where(visc.v lt 0,nv) & print,nv
125	for j=1,8 do oplot,w[j]*[1,1],[0,1000] 126	print,w
127	for j=0,8 do w(j)=min(where(vis.isc eq j)) 128	w=lonarr(9)