/* Use an index to get a CRTerm from the expression.  */
CRTerm* cr_term_get_from_list(CRTerm *a_this, int itemnr)
/* Use an index to get a CRTerm from the expression.  */
CRTerm* cr_term_get_from_list(CRTerm *a_this, int itemnr)
{
	CRTerm *cur = NULL ;
	int nr = 0;
	g_return_val_if_fail (a_this, NULL) ;
	for (cur = a_this ; cur ; cur = cur->next)
		if (nr++ == itemnr)
			return cur;
	return NULL;
}