GAP 4.8.9 installation with standard packages -- copy to your CoCalc project to get it
#ifdef __cplusplus1extern "C" {2#endif3456#ifndef _REDUCTION_H_7#define _REDUCTION_H_89#ifndef _CARAT_TYPEDEF_H_10#include"typedef.h"11#endif1213#ifdef __STDC__14/*-------------------------------------------------------------*\15| FILE: mink_red.c16\*-------------------------------------------------------------*/17extern matrix_TYP *mink_red(matrix_TYP *G, matrix_TYP *T);1819/*-------------------------------------------------------------*\20| FILE: pair_red.c21\*-------------------------------------------------------------*/22extern void pr_red(int **G, int **T, int n);23extern matrix_TYP *pair_red(matrix_TYP *Gram, matrix_TYP *Tr);2425/*-------------------------------------------------------------*\26| FILE: reduction_sort.c27\*-------------------------------------------------------------*/28extern void reduction_sort(int **G,int **T,int n);2930/*-------------------------------------------------------------*\31| FILE: short_reduce.c32\*-------------------------------------------------------------*/33extern matrix_TYP *short_reduce(matrix_TYP *A, matrix_TYP *SV, matrix_TYP *Trf);34extern matrix_TYP *pr_short_red(matrix_TYP *A, matrix_TYP *Trf);3536#else37/*-------------------------------------------------------------*\38| FILE: mink_red.c39\*-------------------------------------------------------------*/40extern matrix_TYP *mink_red();4142/*-------------------------------------------------------------*\43| FILE: pair_red.c44\*-------------------------------------------------------------*/45extern void pr_red();46extern matrix_TYP *pair_red();4748/*-------------------------------------------------------------*\49| FILE: reduction_sort.c50\*-------------------------------------------------------------*/51extern void reduction_sort();5253/*-------------------------------------------------------------*\54| FILE: short_reduce.c55\*-------------------------------------------------------------*/56extern matrix_TYP *short_reduce();57extern matrix_TYP *pr_short_red();5859#endif60#endif61626364#ifdef __cplusplus65}66#endif67686970