00001
00002
00003
00004
00005
00006
00007 #ifndef _vector_H_
00008 #define _vector_H_
00009 #if __STDC__
00010
00011 extern void Factorial(int n,Value *result);
00012 extern void Binomial(int n,int p,Value *result);
00013 extern void CNP(int a,int b,Value *result);
00014 extern void Gcd(Value a,Value b,Value *result);
00015 extern int First_Non_Zero(Value *p, unsigned length);
00016 extern Vector *Vector_Alloc(unsigned length);
00017 extern void Vector_Free(Vector *vector);
00018 extern void Vector_Print(FILE *Dst,char *Format,Vector *Vec);
00019 extern Vector *Vector_Read(void);
00020 extern void Vector_Set(Value *p,int n,unsigned length);
00021 extern void Vector_Exchange(Value *p1, Value *p2, unsigned length);
00022 extern void Vector_Copy(Value *p1, Value *p2, unsigned length);
00023 extern void Vector_Add(Value *p1,Value *p2,Value *p3,unsigned length);
00024 extern void Vector_Sub(Value *p1,Value *p2,Value *p3,unsigned length);
00025 extern void Vector_Or(Value *p1,Value *p2,Value *p3,unsigned length);
00026 extern void Vector_Scale(Value *p1, Value *p2, Value lambda, unsigned
00027 length);
00028 extern void Vector_AntiScale(Value *p1,Value *p2,Value lambda,
00029 unsigned length);
00030 extern void Inner_Product(Value *p1,Value *p2,unsigned length, Value *result);
00031 extern void Vector_Max(Value *p,unsigned length, Value *result);
00032 extern void Vector_Min(Value *p,unsigned length, Value *result);
00033 extern void Vector_Combine(Value *p1,Value *p2,Value *p3,Value
00034 lambda, Value mu, unsigned length);
00035 extern int Vector_Equal(Value *Vec1,Value *Vec2,unsigned n);
00036 extern void Vector_Min_Not_Zero(Value *p,unsigned length,int *index,Value
00037 *result);
00038 extern void Vector_Gcd(Value *p,unsigned length,Value *result);
00039 extern void Vector_Map(Value *p1,Value *p2,Value *p3,unsigned
00040 length, Value *(*f)());
00041 extern void Vector_Normalize(Value *p,unsigned length);
00042 extern void Vector_Normalize_Positive(Value *p,int length,
00043 int pos);
00044 extern void Vector_Reduce(Value *p,unsigned length,
00045 void(*f)(Value,Value *),Value *result);
00046 extern void Vector_Sort(Value *vector,unsigned n);
00047
00048 #else
00049
00050 extern void Factorial();
00051 extern void Binomial();
00052 extern void CNP();
00053 extern void Gcd();
00054 extern int First_Non_Zero();
00055 extern Vector *Vector_Alloc();
00056 extern void Vector_Free();
00057 extern void Vector_Print();
00058 extern Vector *Vector_Read();
00059 extern void Vector_Set();
00060 extern void Vector_Exchange();
00061 extern void Vector_Copy();
00062 extern void Vector_Add();
00063 extern void Vector_Sub();
00064 extern void Vector_Or();
00065 extern void Vector_Scale(
00066 );
00067 extern void Vector_AntiScale(
00068 );
00069 extern void Inner_Product();
00070 extern void Vector_Max();
00071 extern void Vector_Min();
00072 extern void Vector_Combine(
00073 );
00074 extern int Vector_Equal();
00075 extern void Vector_Min_Not_Zero(
00076 );
00077 extern void Vector_Gcd();
00078 extern void Vector_Map(
00079 );
00080 extern void Vector_Normalize();
00081 extern void Vector_Normalize_Positive(
00082 );
00083 extern void Vector_Reduce(
00084 );
00085 extern void Vector_Sort();
00086
00087
00088 #endif
00089 #endif
00090
00091
00092
00093
00094
00095
00096
00097