#include "mdd.h"

/*
 * MDD Package
 *
 * $Id: mdd_smooth.c,v 1.10 2002/08/27 03:17:38 fabio Exp $
 * 
 * Author: Timothy Kam
 *
 * Copyright 1992 by the Regents of the University of California.
 *
 * All rights reserved.  Permission to use, copy, modify and distribute
 * this software is hereby granted, provided that the above copyright
 * notice and this permission notice appear in all copies.  This software
 * is made available as is, with no warranties.
 */

mdd_t *
mdd_smooth(
  mdd_manager *mgr,
  mdd_t *fn,
  array_t *mvars)
{
    array_t *bdd_vars;
    int i, j, mv_no;
    mvar_type mv;
    mdd_t *top;
    bdd_t *temp;
    array_t *mvar_list = mdd_ret_mvar_list(mgr);
	
	
    if ( mvars == NIL(array_t) ) {
	top = bdd_dup(fn);
	printf("\nWARNING: Empty Array of Smoothing Variables\n");
	return top;
    }
    else if ( array_n(mvars) == 0) {
	top = bdd_dup(fn);
	printf("\nWARNING: Empty Array of Smoothing Variables\n");
	return top;
    }
		
	
    bdd_vars = array_alloc(bdd_t *, 0);	
    for (i=0; i<array_n(mvars); i++) {
	mv_no = array_fetch(int, mvars, i);
	mv = array_fetch(mvar_type, mvar_list, mv_no);
	if (mv.status == MDD_BUNDLED) {
	    (void) fprintf(stderr, 
			"\nmdd_smooth: bundled variable %s used\n",mv.name);
	    fail("");
        }

	for (j=0; j<mv.encode_length; j++) {
	    temp = bdd_get_variable(mgr, mdd_ret_bvar_id(&mv,j) );
	    array_insert_last(bdd_t *, bdd_vars, temp);
	}
    }
	
    top = bdd_smooth(fn, bdd_vars);
  
    for (i=0; i<array_n(bdd_vars); i++) {
	temp = array_fetch(bdd_t *, bdd_vars, i);
	bdd_free(temp);
    }
    array_free(bdd_vars);

    return top;
}

/*---------------------------------------------------------------------------*/
/* Static function prototypes                                                */
/*---------------------------------------------------------------------------*/