C C C This code is distributed under the terms and conditions of the C CCP4 Program Suite Licence Agreement as a CCP4 Application. C A copy of the CCP4 licence can be obtained by writing to the C CCP4 Secretary, Daresbury Laboratory, Warrington WA4 4AD, UK. C real rsymncs(4,4,maxncs,maxdom), + uvwcen(3,maxncs,maxdom),xyzcen(3,maxncs,maxdom), + refdr(maxdom),refdphi(maxdom),ncslim(2,3),ncsmer,ncsbf,ncssz integer nuvwlim(6,maxncs,maxdom),nncsym(maxdom),ndomain, ckev + msku1,msku2,mskv1,mskv2,mskw1,mskw2,ovlprm,ncstep + msku1,msku2,mskv1,mskv2,mskw1,mskw2,ovlprm,ncstep,ncscomm common /ncssym/rsymncs,uvwcen,xyzcen,refdr,refdphi,ncslim, + ncsmer,ncsbf,ncssz,nuvwlim,nncsym,ndomain, ckev + msku1,msku2,mskv1,mskv2,mskw1,mskw2,ovlprm,ncstep + msku1,msku2,mskv1,mskv2,mskw1,mskw2,ovlprm,ncstep,ncscomm save /ncssym/