alewald.f:      subroutine alewald()
alewald.f:c      subroutine alewald(g,hklal)
burz.f:      SUBROUTINE BURZ (ISYSTM,ISYMCE,IBRAVL,NG)
burz.f:C  is determined by this subroutine (if it was given in the
calcincoh.f:      subroutine calcincoh(ki,kf,incohmon,incohana)
calcki.f:      subroutine calcki(bmat,h,ei,ef,q,ki,fail,phi,psi,pn)
calclattice.f:      subroutine calclattice(u,v,bmat, m_rlv, h,k,l,
calclattice.f:c01Dec      subroutine calclattice(u,v,bmat,m,h,k,l,zeta,eta,hklcen,uint,vint)
calclattice.f:      subroutine qspace(bmat,h,k,l,x,y)
calclattice.f:      subroutine irreduc(u,v,uirr,virr)
calclattice.f:      subroutine lcd(uirr,fac)
calclattice.f:      subroutine mult(x,y,a,b)
conditions.f:      subroutine conditions
datestamp_g77.f:      SUBROUTINE datestamp(date_stamp) 
datestamp_sgi.f:      SUBROUTINE datestamp(date_stamp) 
ellipse.f:      subroutine ellipse(xc,yc,major,minor,ang)
ellipse.f:      subroutine ellipseproj(xc,yc,rm,arm,um)
extinc.f:      SUBROUTINE EXTINC (ISYMCE,NS)
fsqlattice.f:      subroutine fsqlattice(m_rlv,h,k,l,struct,sfhkl,absent)
fsqlattice.f:cDec01      subroutine fsqlattice(m,h,k,l,qmax,struct,sfhkl,absent)
functions.f:C  BURZ subroutine which is assigned to SYMBR and comes from
generate.f:      subroutine generateb(a,aa,b,c,BB)
generate.f:      subroutine generatea(amat,bmat)
generate.f:      subroutine ijk(i,j,k)
hdiag.f:      SUBROUTINE HDIAG(H,N,IEGEN,U,NR,X,IQ)
hdiag.f:C*    THE SUBROUTINE OPERATES ONLY ON THE ELEMENTS OF H THAT ARE TO THE
help.f:      subroutine full
help.f:      subroutine help(command)
indexsort.f:      subroutine indexx2d(m_rlv, arrin, indx1, indx2, 
indexsort.f:cCommon      subroutine indexx2d(m_rlv, arrin, indx1, indx2, 
indexsort.f:      subroutine unique(m_rlv, arrin, absent,  indx1, indx2, 
io.f:	subroutine supper(aword)
io.f:	subroutine lower(aword)
io.f:	subroutine reportsymmetry(ISYSTM)
label.f:      subroutine label(kistrt,kistop,kfstrt,kfstop,xscale,yscale,
lazy.f:      subroutine lazy(npos,bpos,xyzpos,struct, noisy)
lazy.f:c01Dec      subroutine lazy(nmax,npos,bpos,xyzpos,struct, noisy)
lazy.f:ccc      subroutine lazy(npos,bpos,xyzpos,struct, noisy)
logscale.f:      subroutine logscale(z1,z2,multmax,pmax,dec)
multf.f:      SUBROUTINE MULTF(elemt,kodlp,npos,bpos,xyzpos)
multf.f:c01Dec      SUBROUTINE MULTF(elemt,kodlp,npos,bpos,xyzpos,nmax)
operations.f:      subroutine cross(a,b,c)
operations.f:      subroutine MMMULT (a, b, m, n, o, c)
operations.f:      subroutine MVMULT (amat, vin, m, n, vout)
pg_lib.f:      subroutine pg_init(idev, rainbow) 
pg_lib.f:      subroutine select_palette(rainbow, idev)
pg_lib.f:c      subroutine select_color(value)
pg_lib.f:      subroutine place_circle(x, y, pointsize, circsize,  
pg_lib.f:      subroutine place_cross(x, y, pointsize, circsize,  
pg_lib.f:c      subroutine pg_graph(x,y,sig,yc,npt)
pg_lib.f:      subroutine pg_close(idev)
pg_lib.f:      subroutine init_pg2d(iaxis)
pg_lib.f:cMoved      subroutine init_pg2d(xmin,xmax,ymin,ymax, iaxis)
pg_lib.f:c      subroutine init_pg1d()
pg_lib.f:ccMoved      subroutine init_pg2d(xmin,xmax,ymin,ymax, iaxis)
pg_lib.f:      subroutine plot_txtinfo(thistext, this_many)
pg_lib.f:      subroutine plot_stamp(version_stamp)
pg_lib.f:      subroutine plot_labelinfo(arrin, nunique, uniqueLabel, 
pg_lib.f:      subroutine cycle_color(icolor, base)
pg_lib.f:c      subroutine sketch_layout()
plotincoh.f:      subroutine prepincoh(m_rlv,zeta,eta,incohmon,incohana,
plotincoh.f:c01Dec      subroutine plotincoh(m,zeta,eta,incohmon,incohana,
plotincoh.f:      subroutine plotincoh(m_rlv,zeta,eta,incohmon,incohana,
plotincoh.f:c01Dec      subroutine plotincoh(m,zeta,eta,incohmon,incohana,
plotlattice.f:      subroutine plotlattice(circsize,m_rlv,x,y,h,k,l,qmax,
plotlattice.f:c01Dec      subroutine plotlattice(circsize,m,x,y,h,k,l,qmax,gray,struct,
plotlattice.f:      subroutine count_intensities(m_rlv, x, y,absent,  sfhkl, sfn, 
plotlattice.f:c      subroutine count_intensities(xmin, xmax, ymin, ymax, m_rlv, x, y,
plotlattice.f:      subroutine scale_circle(scale, sfmin, sfmax, replot, 
plotlattice.f:      subroutine linscale(x1,x2,xmin,xmax,nsub)
plotspur.f:      subroutine rank_higher(nspurtot, nelastictot)
plotspur.f:      subroutine prepspur(nn_spur, nspurtot,
plotspur.f:      subroutine plotspur(nn_spur,
plotspur.f:      subroutine reportspur(nn_spur, nspurtot, nelastictot, 
printequiv.f:      subroutine printequiv(fs,ts,ns)
pulverix.f:      subroutine pulverix(hkl,absent)
pulverix.f:c01dec      subroutine pulverix(hkl,absent)
spurion_bits.f:      subroutine title(a,atitle,len)
spurion_bits.f:      subroutine hkl_int(hh, kk, ll, a_hkl)
spurion_bits.f:      subroutine hkl_float(q1, q2, bmatuv_inv,  a_hkl)
spurion_bits.f:      subroutine checkneg(a,neg)
spurion_bits.f:      subroutine checkten(a,ten)
spurion_bits.f:      subroutine calcspurious(ki,kf, qspur,espur)
spurion_bits.f:c01Dec      subroutine calcspurious(ki,kf,n,qspur,espur)
spurion_bits.f:      subroutine autoscale(x,y)
spurion_bits.f:cCommon      subroutine autoscale(x,y,xmin,xmax,ymin,ymax)
spurion_bits.f:      subroutine square()
spurion_bits.f:cCommon      subroutine square(xmin,xmax,ymin,ymax)
spurion_bits.f:      subroutine arrows(i,j,ki,kf)
spurion_bits.f:      subroutine bit(spurhist,power,value,on)
spurion_bits.f:C subroutine for checking and changing the bits of spurhist
spurion_bits.f:      subroutine which_bit(longhist,power,value)
spurion_bits.f:C subroutine returns the position of the first bit in lonhist with value value.
spurion_bits.f:      subroutine set_bit(longhist,power,value)
spurion_bits.f:C subroutine for changing the bits of spurhist
spurion_bits.f:      subroutine set_warning(power,value, wstring)
spurion_bits.f:C subroutine for changing the bits of warn_options
spurion_bits.f:      subroutine toggle_bit(longhist,power,value)
spurion_bits.f:C subroutine for toggling the bits of spurhist
spurion_bits.f:      subroutine cmd_filenames(version_stamp, struct, 
spurion_bits.f:      subroutine get_filenames_old(version_stamp, struct)
spurion_bits.f:c      SUBROUTINE datestamp(date_stamp) 
spurion_main.f:C      Subroutines
spurion_main.f:      subroutine intro(version_stamp, date_stamp)
spurion_main.f:      subroutine version(astring, date_stamp)
spurion_mod.f:      subroutine load_modmenuitems()
spurion_mod.f:      subroutine load_modmenu()
spurion_mod.f:      subroutine load_mod_itemvalue()
spurion_mod.f:cOld      subroutine load_mod_itemvalue(ec, es, hc, hs, fe, npts, mon)
spurion_mod.f:      subroutine display_submenu(aversion, key, current_thisop,
spurion_mod.f:c      subroutine display_modmenu(aversion, key, current_modop,
spurion_routines.f:      subroutine init_vectors(a, aa, bmat, bmatuv, b, 
spurion_routines.f:      subroutine init_vectorlabels(rlu, u, v, zetatitle, etatitle, 
spurion_routines.f:      subroutine init_scanvectors(constq, ec, es, npts, angle, 
spurion_routines.f:      subroutine init_qrange(qmin, qmax, qlowmin, qlowmax,
spurion_routines.f:      subroutine plot_center(u, v, uuv, vuv, hklcen)
spurion_routines.f:cCommon      subroutine plot_center(xmin, xmax, ymin, ymax, 
spurion_routines.f:      subroutine plot_axes(uxvi, qztitle, rlu, right, axis,
spurion_routines.f:      subroutine plot_Q_ki_kf(qarr, kiarr, nscan)     
spurion_routines.f:      subroutine load_menuitems()
spurion_routines.f:      subroutine load_menu()
spurion_routines.f:c      subroutine load_menu(tol, c, sortlogscale, tolerance)
spurion_routines.f:      subroutine load_stndannote()
spurion_routines.f:      subroutine load_itemvalue(tol, etol, 
spurion_routines.f:      subroutine report_menuitem(i)
spurion_routines.f:      subroutine display_menu(aversion, scale, spurhist) 
spurion_routines.f:      subroutine display_spurhist(spurhist, unit)
spurion_routines.f:      subroutine cmd_spurion( m_rlv, npts, nscan, nspurtot, nspur, 
spurion_routines.f:      subroutine cmd_incoherent(nscan, m_rlv, zeta, eta,
spurion_routines.f:      subroutine cmd_aluminum(nscan, npts, minq, maxq, magq,
spurion_routines.f:c      subroutine cmd_aluminum(nscan, npts, gal, minq, maxq, magq, hklal, 
spurion_routines.f:      subroutine cmd_orientvecs(uuv, vuv)
spurion_routines.f:      subroutine cmd_zoomspur(nscan) 
spurion_routines.f:      subroutine cmd_rescaleplot(xstar, ystar, rlu, right, circsize)
spurion_routines.f:cCommon      subroutine cmd_rescaleplot(xmin, xmax, ymin, ymax, 
spurion_routines.f:      subroutine cmd_showintensities_old(gray, rainbow)
spurion_routines.f:      subroutine cmd_circsize_old(c, struct)
spurion_routines.f:      subroutine cmd_sortlog_old(sortlogscale, tolerance)
spurion_routines.f:      subroutine cmd_printout(idev )
spurion_routines.f:      subroutine cmd_labelvec(kiarr, kfarr, kistrt, kistop,
spurion_routines.f:cCommon      subroutine cmd_labelvec(kiarr, kfarr, kistrt, kistop,
spurion_routines.f:      subroutine cmd_annotation(unitout, version_stamp,
spurion_routines.f:      subroutine cmd_modify()
spurion_routines.f:c02Mar      subroutine cmd_modify(ec, es, hc, hs, fe, npts, mon)
spurion_routines.f:      subroutine cmd_selecttolerance()
spurion_routines.f:      subroutine cmd_BumpA4( phimax, pi)
spurion_routines.f:      subroutine cmd_genICPrun(mon, npts, bmatuv, h, q, hc, hs, ki, 
spurion_routines.f:      subroutine cmd_selectReflection( sp, spurtitle, m_rlv, 
spurion_routines.f:      subroutine cmd_scanplot( )
spurion_scan.f:      subroutine plot_scan(constq, ec, es, hc, hs, mon, nscan,
spurion_scan.f:      subroutine plot_scan_intensity(nscan)
spurion_scan.f:      subroutine plot_scan_intBragg(nscan, nspurtot, sfhkl)
spurion_scan.f:      subroutine plot_scan_intElastic(nscan, nelastictot)
spurion_scan.f:      subroutine plot_scan_intAl(nscan) 
spurion_scan.f:      subroutine plot_scan_intIncoh(nscan, nincohmon, nincohana)
spurion_scan.f:      subroutine plot_scan_qaxis(nscan)
spurion_scan.f:      subroutine plot_scan_eaxis(nscan)
spurion_scan.f:      subroutine plot_scan_higherspurions(nscan, nspurtot, esparr, 
spurion_scan.f:      subroutine plot_scan_higherbragg(nscan, nspurtot, esparr, 
spurion_scan.f:      subroutine plot_scan_higherelastic(nscan, nelastictot, esparr)
spurion_scan.f:      subroutine plot_scan_annotate(version_stamp, nspurtot,nelastictot, 
spurion_structmenu.f:      subroutine load_structmenuitems()
spurion_structmenu.f:      subroutine load_structmenu()
spurion_structmenu.f:      subroutine load_structitemvalue(relcircsize, sorttol, base)
spurion_structmenu.f:cOld      subroutine load_mod_itemvalue(ec, es, hc, hs, fe, npts, mon)
spurion_structmenu.f:c      subroutine display_structmenu(aversion, key, current_structop,
spurion_structmenu.f:      subroutine cmd_structmenu(relcircsize, sorttol, base, 
spur_qbuf.f:      subroutine qbuf_default()
structfac.f:      subroutine sfsqd(natoms,fi,xyz,hkl,sfq)
structfac.f:c01Dec      subroutine sfsqd(nmax,natoms,fi,xyz,hkl,sfq)
structfac.f:cNotUsed      subroutine sort(n,hkl,list)
structfac.f:cNotUsed       subroutine bubble(n,x,order)
subroutines.f:      SUBROUTINE SLASH (XYZ)
subroutines.f:      SUBROUTINE EQVP
subroutines.f:      SUBROUTINE FSC (ELEMT,MN)
subroutines.f:      SUBROUTINE SYMBF (ASYMB,IELMT)
subroutines.f:      SUBROUTINE ANOMA (ANODE,ELEMEN,KODLP)
subroutines.f:      SUBROUTINE NEUTF (I)                                              NEUT0000
subroutines.f:      SUBROUTINE CHROME (I)
subroutines.f:      SUBROUTINE FER (I)
subroutines.f:      SUBROUTINE CUIVRE (I)
subroutines.f:      SUBROUTINE MOLYBD (I)
subroutines.f:      SUBROUTINE ARGENT (I)
transform.f:      subroutine transform(ui,vi,bmat,u3,v3,b1mat)
transform.f:      subroutine rotate(theta,i,r)
transform.f:      subroutine calctheta(x,y,theta)
