modlset.c

spice中支持多层次元件模型仿真的可单独运行的插件源码

/**********
Copyright 1992 Regents of the University of California.  All rights reserved.
Author: 1992 David A. Gates, U. C. Berkeley CAD Group
**********/

#include "spice.h"
#include <stdio.h>
#include <math.h>
#include "const.h"
#include "util.h"
#include "cktdefs.h"
#include "nummacs.h"
#include "modldefs.h"
#include "sperror.h"
#include "suffix.h"

#ifdef __STDC__
extern int MODLcheck( MODLcard * );
extern int MODLsetup( MODLcard * );
#else
extern int MODLcheck();
extern int MODLsetup();
#endif /* STDC */



/*
 * Name:	MODLcheck
 * Purpose:	checks a list of MODLcards for input errors, sets defaults
 * Formals:	cardList: the list to check
 * Returns:	OK/E_PRIVATE
 * Users:	 numerical device setup routines
 * Calls:	error message handler
 */
int
  MODLcheck( cardList )
MODLcard *cardList;
{
  register MODLcard *card, *card2;
  int cardNum = 0, cardNum2;
  int error = OK;
  char ebuf[512];		/* error message buffer */
  
  for ( card = cardList; card != NIL(MODLcard); card = card->MODLnextCard ) {
    cardNum++;

    if ( !card->MODLbandGapNarrowingGiven ) {
      card->MODLbandGapNarrowing = FALSE;
    }
    if ( !card->MODLtempDepMobilityGiven ) {
      card->MODLtempDepMobility = FALSE;
    }
    if ( !card->MODLconcDepMobilityGiven ) {
      card->MODLconcDepMobility = FALSE;
    }
    if ( !card->MODLfieldDepMobilityGiven ) {
      card->MODLfieldDepMobility = FALSE;
    }
    if ( !card->MODLtransDepMobilityGiven ) {
      card->MODLtransDepMobility = FALSE;
    }
    if ( !card->MODLsurfaceMobilityGiven ) {
      card->MODLsurfaceMobility = FALSE;
    }
    if ( !card->MODLmatchingMobilityGiven ) {
      card->MODLmatchingMobility = FALSE;
    }
    if ( !card->MODLsrhGiven ) {
      card->MODLsrh = FALSE;
    }
    if ( !card->MODLconcDepLifetimeGiven ) {
      card->MODLconcDepLifetime = FALSE;
    }
    if ( !card->MODLaugerGiven ) {
      card->MODLauger = FALSE;
    }
    if ( !card->MODLavalancheGenGiven ) {
      card->MODLavalancheGen = FALSE;
    }
  }
  return(OK);
}



/*
 * Name:	MODLsetup
 * Purpose:	setup the physical models used
 * Formals:	cardList: list of cards to setup
 * Returns:	OK/E_PRIVATE
 * Users:	 numerical devices
 * Calls:	MODLcheck
 */
int
  MODLsetup( cardList )
MODLcard *cardList;
{
  int error;

  /* Check the card list */
  if (error = MODLcheck( cardList )) return( error );

  /* Nothing else to do. */
  return( OK );
}