+extern COS_Symbol cos_Qnil;
+extern COS_Symbol cos_Qt;
+extern COS_Symbol cos_Qcomposition;
+
+#define COS_NIL cos_Qnil
+#define COS_T cos_Qt
+#define COS_COMPOSITION cos_Qcomposition
+
+
+typedef struct COS_Cons_ent COS_Cons_ent;
+typedef struct COS_Cons_ent* COS_Cons;
+
+COS_Cons cos_cons (COS_object car, COS_object cdr);
+int cos_cons_p (COS_object obj);
+COS_object cos_car (COS_Cons pair);
+COS_object cos_cdr (COS_Cons pair);
+
+COS_Cons cos_assoc (COS_object key, COS_Cons alist);
+COS_object cos_alist_get (COS_Cons alist, COS_object key);
+