My Project
0.0.16
QUCS Mapping
Main Page
Related Pages
Namespaces
Classes
Files
File List
File Members
All
Classes
Namespaces
Files
Functions
Variables
Typedefs
Enumerations
Enumerator
Friends
Macros
Pages
DownLoad
QUCS-src
qucs-0.0.16
qucs-core
src
components
digital
or.cpp
Go to the documentation of this file.
1
/*
2
* or.cpp - logical or class implementation
3
*
4
* Copyright (C) 2005, 2008, 2009 Stefan Jahn <stefan@lkcc.org>
5
*
6
* This is free software; you can redistribute it and/or modify
7
* it under the terms of the GNU General Public License as published by
8
* the Free Software Foundation; either version 2, or (at your option)
9
* any later version.
10
*
11
* This software is distributed in the hope that it will be useful,
12
* but WITHOUT ANY WARRANTY; without even the implied warranty of
13
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14
* GNU General Public License for more details.
15
*
16
* You should have received a copy of the GNU General Public License
17
* along with this package; see the file COPYING. If not, write to
18
* the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
19
* Boston, MA 02110-1301, USA.
20
*
21
* $Id: or.cpp 1825 2011-03-11 20:42:14Z ela $
22
*
23
*/
24
25
#if HAVE_CONFIG_H
26
# include <config.h>
27
#endif
28
29
#include "component.h"
30
#include "
digital.h
"
31
#include "
or.h
"
32
33
logicor::logicor () :
digital
() {
34
type
=
CIR_OR
;
35
setVariableSized
(
true
);
36
}
37
38
void
logicor::calcOutput
(
void
) {
39
nr_double_t v =
getPropertyDouble
(
"V"
);
40
nr_double_t
n
=
getSize
() - 1;
41
nr_double_t
x
;
42
for
(x = 0,
i
= 0;
i
<
n
;
i
++) {
43
x += 2 / (1 -
calcTransfer
(
i
));
44
}
45
Vout
= v * (1 - n /
x
);
46
}
47
48
void
logicor::calcDerivatives
(
void
) {
49
nr_double_t
n
=
getSize
() - 1;
50
nr_double_t
x
;
51
for
(
int
k = 0; k <
n
; k++) {
52
for
(x = 0,
i
= 0;
i
<
n
;
i
++) {
53
x += 2 / (1 -
calcTransfer
(
i
));
54
}
55
x *= (1 -
calcTransfer
(k));
56
g
[k] = 2 * n *
calcDerivative
(k) / x /
x
;
57
}
58
}
59
60
// properties
61
PROP_REQ
[] = {
62
{
"V"
,
PROP_REAL
, { 1,
PROP_NO_STR
},
PROP_POS_RANGE
},
PROP_NO_PROP
};
63
PROP_OPT
[] = {
64
{
"t"
,
PROP_REAL
, { 0,
PROP_NO_STR
},
PROP_POS_RANGE
},
65
{
"TR"
,
PROP_REAL
, { 10,
PROP_NO_STR
},
PROP_RNGII
(1, 100) },
66
PROP_NO_PROP
};
67
struct
define_t
logicor
::cirdef =
68
{
"OR"
,
69
PROP_NODES
,
PROP_COMPONENT
,
PROP_NO_SUBSTRATE
,
PROP_NONLINEAR
,
PROP_DEF
};
Generated on Tue Dec 25 2012 14:28:06 for My Project by
1.8.2