

#ifndef AQuadruple_included
#define AQuadruple_included

#define __AQuadruple_S7 __AQuadruple_2
#define _AQuadruple_S7 _AQuadruple_2
extern OBJ __AQuadruple_S7;
extern OBJ _AQuadruple_S7(OBJ,OBJ,OBJ,OBJ);

#define __AQuadruple_S7_ __AQuadruple_3
#define _AQuadruple_S7_ _AQuadruple_3
extern OBJ __AQuadruple_S7_;
extern OBJ _AQuadruple_S7_(OBJ);

#define __AQuadruple_A4th __AQuadruple_4
#define _AQuadruple_A4th _AQuadruple_4
extern OBJ __AQuadruple_A4th;
extern OBJ _AQuadruple_A4th(OBJ);

#define __AQuadruple_A3rd __AQuadruple_5
#define _AQuadruple_A3rd _AQuadruple_5
extern OBJ __AQuadruple_A3rd;
extern OBJ _AQuadruple_A3rd(OBJ);

#define __AQuadruple_A2nd __AQuadruple_6
#define _AQuadruple_A2nd _AQuadruple_6
extern OBJ __AQuadruple_A2nd;
extern OBJ _AQuadruple_A2nd(OBJ);

#define __AQuadruple_A1st __AQuadruple_7
#define _AQuadruple_A1st _AQuadruple_7
extern OBJ __AQuadruple_A1st;
extern OBJ _AQuadruple_A1st(OBJ);

#define __AQuadruple_Aunquad __AQuadruple_12
#define _AQuadruple_Aunquad _AQuadruple_12
extern OBJ __AQuadruple_Aunquad;
extern TUP4 _AQuadruple_Aunquad(OBJ);

#ifndef AQuadruple_S7
#define AQuadruple_S7(x1,x2,x3,x4,x5) {x5=_AQuadruple_S7(x1,x2,x3,x4);}
#endif

#ifndef AQuadruple_S7_
#define AQuadruple_S7_(x1,x2) {x2=_AQuadruple_S7_(x1);}
#endif

#ifndef AQuadruple_A4th
#define AQuadruple_A4th(x1,x6) {x6=_AQuadruple_A4th(x1);}
#endif

#ifndef AQuadruple_A3rd
#define AQuadruple_A3rd(x1,x6) {x6=_AQuadruple_A3rd(x1);}
#endif

#ifndef AQuadruple_A2nd
#define AQuadruple_A2nd(x1,x6) {x6=_AQuadruple_A2nd(x1);}
#endif

#ifndef AQuadruple_A1st
#define AQuadruple_A1st(x1,x6) {x6=_AQuadruple_A1st(x1);}
#endif

#ifndef AQuadruple_Aunquad
#define AQuadruple_Aunquad(x1,x26,x27,x28,x29) {TUP4 t;t=_AQuadruple_Aunquad(x1);x26=t.c1;x27=t.c2;x28=t.c3;x29=t.c4;}
#endif

#endif
