/**********
Copyright 1990 Regents of the University of California.  All rights reserved.
Author: 1985 Thomas L. Quarles
**********/

    /* CKTparam
     *  attach the given parameter to the specified device in the given circuit
     */

#include "ngspice/ngspice.h"
#include "ngspice/cktdefs.h"
#include "ngspice/ifsim.h"
#include "ngspice/devdefs.h"
#include "ngspice/sperror.h"


/* ARGSUSED */
int
CKTparam(CKTcircuit *ckt, GENinstance *fast, int param, IFvalue *val, IFvalue *selector)
{
    int type;

    NG_IGNORE(ckt);

    type = fast->GENmodPtr->GENmodType;
    if(DEVices[type]->DEVparam) {
        return(DEVices[type]->DEVparam (param, val, fast, selector));
    } else {
        return(E_BADPARM);
    }
}