GAP 4.8.9 installation with standard packages -- copy to your CoCalc project to get it
1#include "typedef.h" 2/**************************************************************************\ 3@--------------------------------------------------------------------------- 4@--------------------------------------------------------------------------- 5@ FILE: intpow.c 6@--------------------------------------------------------------------------- 7@--------------------------------------------------------------------------- 8@ 9\**************************************************************************/ 10 11/*---------------------------------------------------------------------------*\ 12@ 13@ int intpow(a,b); 14@ 15@ compute the b-th power of the integer a (int a, int b) 16@ 17\*---------------------------------------------------------------------------*/ 18 19int intpow(a,b) 20int a,b; 21{ 22int result=1; 23 24 while(b-- > 0) { 25 result *= a; 26 } 27 return(result); 28} 29 30 31