Screamer Project  V3.3.1
Screamer Structure
 All Files Functions Variables
powerc1.f
Go to the documentation of this file.
1  function fpc1 (inod, ibrn, time_flag)
2 c
3 c Define passed variables
4 c
5  integer inod, ibrn
6 c
7 c Calculates the 0.5(dC/dt)V**2 power put into a capacitor.
8 c
9  include 'zdemparm.h'
10  include 'zdemmax.h'
11  include 'zdemwork.h'
12 c
13  volt = fvblk(inod,ibrn,time_flag)
14  fpc1 = 0.5 * cdot(inod,ibrn) * volt * volt
15 c
16  return
17  end
function fvblk(inod, ibrn, time_flag)
Definition: voltgblk.f:1
function fpc1(inod, ibrn, time_flag)
Definition: powerc1.f:1