|
steric_1.11
|
|
Makefile,
Makefile.sgi,
README.steric,
contplot,
craig.c,
craig.h,
crystal.c,
crystal.h,
integrat.c,
integrat.h,
leach.c,
leach.h,
long_steric,
makeit,
mapcont,
mapcont.c,
mapprof,
mapprof.c,
profplot,
proja.c,
proja.h,
ryan.c,
ryan.h,
ryan_perm.c,
ryan_perm.h,
ryan_quad.c,
ryan_quad.h,
steraid.c,
steraid.h,
stercalc.c,
stercalc.h,
stercomm.c,
stercomm.h,
sterdefn.h,
stererr.h,
sterfile.c,
sterfile.h,
stergrap.c,
stergrap.h,
stergrp.c,
stergrp.h,
steric,
steric.TeX,
steric.err,
steric.grp,
steric.hlp,
steric.ini,
steric.par,
stermain.c,
stermem.c,
stermem.h,
sterover.c,
sterover.h,
sterplot,
stertext.c,
stertext.h,
test.bgf,
test.inp,
vectors.c,
vectors.h,
|
|
|
#include
#define maxPermSize 50 /*=maxAtoms*/
#define maxPerms 200
static int pos[maxPermSize];
int perm[maxPerms][maxPermSize];
int permCount;
static double Fact(int n)
{
if(n==1 || n==0)
{
return 1;
}
else
{
return n*Fact(n-1);
}
}
static void Perm ( int k , int n , int N )
{
int i;
for(pos[k]=k ; pos[k]<=(n-N)+k ; pos[k]++)
{
if( pos[k]>pos[k-1] )
{
if(k==N)
{
permCount++;
for(i=1;i<=N ; i++ )
{
perm[permCount][i]=pos[i];
}
}
else /* k
|
