You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

39 lines
820 B

/**********
Copyright 1990 Regents of the University of California. All rights reserved.
Author: 1987 Kanwar Jit Singh
**********/
/*
* singh@ic.Berkeley.edu
*/
#include "ngspice.h"
#include <stdio.h>
#include "ifsim.h"
#include "asrcdefs.h"
#include "sperror.h"
#include "suffix.h"
/* ARGSUSED */
int
ASRCparam(param,value,fast,select)
int param;
IFvalue *value;
GENinstance *fast;
IFvalue *select;
{
ASRCinstance *here = (ASRCinstance*)fast;
switch(param) {
case ASRC_VOLTAGE:
here->ASRCtype = ASRC_VOLTAGE;
here->ASRCtree = value->tValue;
break;
case ASRC_CURRENT:
here->ASRCtype = ASRC_CURRENT;
here->ASRCtree = value->tValue;
break;
default:
return(E_BADPARM);
}
return(OK);
}