/*Copyright (C) 1992, 1995 by Thomas Glen Smith. All Rights Reserved.*/
/* intcopy APL2 V1.0.0 *************************************************
* Copies an integer array. *
***********************************************************************/
#define INCLUDES 0
#include "includes.h"
int *intcopy(to,from,cnt,incr)
int *to,*from,cnt,incr;
{
while(cnt--) {
*to++=*from;
from+=incr;
}
return(to);
}