---

nport.cc

Go to the documentation of this file.

// SuperMix version 1.0  C++ source file
//
// Copyright (c) 1999 California Institute of Technology.
// All rights reserved.
//
// Redistribution and use in source and binary forms for noncommercial
// purposes are permitted provided that the above copyright notice and
// this paragraph are duplicated in all such forms and that any
// documentation and other materials related to such distribution and
// use acknowledge that the software was developed by California
// Institute of Technology. Redistribution and/or use in source or
// binary forms is not permitted for any commercial purpose. Use of
// this software does not include a permitted use of the Institute's
// name or trademark for any purpose.
//
// DISCLAIMER:
// THIS SOFTWARE AND/OR RELATED MATERIALS ARE PROVIDED "AS-IS" WITHOUT
// WARRANTY OF ANY KIND INCLUDING ANY WARRANTIES OF PERFORMANCE OR
// MERCHANTABILITY OR FITNESS FOR A PARTICULAR USE OR PURPOSE (AS SET
// FORTH IN UCC 23212-2313) OR FOR ANY PURPOSE WHATSOEVER, FOR THE
// LICENSED PRODUCT, HOWEVER USED.  IN NO EVENT SHALL CALTECH/JPL BE
// LIABLE FOR ANY DAMAGES AND/OR COSTS, INCLUDING BUT NOT LIMITED TO
// INCIDENTAL OR CONSEQUENTIAL DAMAGES OF ANY KIND, INCLUDING ECONOMIC
// DAMAGE OR INJURY TO PROPERTY AND LOST PROFITS, REGARDLESS OF
// WHETHER CALTECH/JPL SHALL BE ADVISED, HAVE REASON TO KNOW, OR IN
// FACT SHALL KNOW OF THE POSSIBILITY.  THE USER BEARS ALL RISK
// RELATING TO QUALITY AND PERFORMANCE OF THE SOFTWARE AND/OR RELATED
// MATERIALS.
//
// nport.cc
//
// Change history:
// 11/1/99:  added is_active() and is_source()
// 10/22/99: device::Z0 is back to a parameter again
// 7/26/99;  added state_tag::current_state; removed sdata_nport stuff
// 9/30/98:  changed the fixes to device.
// 9/18/98:  converted alias to subclass of data_ptr_nport
// 9/18/98:  changed nport::S, C, and B
// 9/16/98:  moved most alias code to nport.h;
// 7/27/98:  removed nport::get_data() - now in nport.h
// 7/21/98:  changed generic_nport to sdata_nport
// 7/8/98:   added generic_nport
// 12/29/97: some minor mods, especially compute_passive_noise
// 12/19/97: modified by FR for matmath classes
//           added nport::B().

#include "nport.h"
#include "units.h"
#include "error.h"

unsigned long state_tag::current_state = 1;
unsigned long device::devcount = 0;

parameter device::T  = 300 * Kelvin;
parameter device::Z0 = 50 * Ohm;
parameter device::f  = 0.0;

// **************************************************************

port nport::get_port(int index)
{
  if((index > 0) && (index <=size()))
    return port(id, index);

  // Subscript out of range, return default port.
  error::warning("Port index out of range in nport::get_port(int).");
  return port();
}

int nport::get_port(port p)
{
  if((p.id == id) && (p.index > 0) && (p.index <=size()))
  {
    return p.index;
  }

  // Subscript out of range, return default port.
  error::warning("Port out of range in nport::get_port.");
  return 0;
}

complex nport::S(int i, int j)
{
  // Don't make any assumptions about how this device recalculates itself.
  // This way, we can avoid having to overload this function.
  const sdata *dptr = &get_data();

  // Check range on (i,j) and warn if invalid:
  if((i<1)||(j<1)||(i>size())||(j>size()))
    error::warning("Port number out of range for call to S(i,j).");

  return dptr->S.read(i,j);
}

complex nport::C(int i, int j)
{
  // Don't make any assumptions about how this device recalculates itself.
  // This way, we can avoid having to overload this function.
  const sdata *dptr = &get_data();

  // Check range on (i,j) and warn if invalid:
  if((i<1)||(j<1)||(i>size())||(j>size()))
    error::warning("Port number out of range for call to C(i,j).");

  return dptr->C.read(i,j);
}

complex nport::B(int i)
{
  // Don't make any assumptions about how this device recalculates itself.
  // This way, we can avoid having to overload this function.
  const sdata *dptr = &get_data();

  // Check range on (i) and warn if invalid:
  if((i<1)||(i>size()))
    error::warning("Port number out of range for call to B(i).");

  return dptr->B.read(i);
}

// **************************************************************

alias & alias::operator=(nport & n)
{
  // Beware of self assignment: n = n
  if(this != &n)
  {
    original = &n;
    data_ptr = &data;
  }
  return *this;
}

---

Please direct comments and corrections to supermix@submm.caltech.edu
Go to the supermix home page
Generated by 1.2.7