# Created by Octave 3.6.1, Thu Mar 22 16:18:37 2012 UTC <root@t61>
# name: cache
# type: cell
# rows: 3
# columns: 9
# name: <cell-element>
# type: sq_string
# elements: 1
# length: 5
Ubern


# name: <cell-element>
# type: sq_string
# elements: 1
# length: 82
 [bp,bn]=Ubern(x)

 Bernoulli function
 bp = B(x)=x/(exp(x)-1)
 bn = B(-x)=x+B(x)



# name: <cell-element>
# type: sq_string
# elements: 1
# length: 18
 [bp,bn]=Ubern(x)




# name: <cell-element>
# type: sq_string
# elements: 1
# length: 10
Ubernoulli


# name: <cell-element>
# type: sq_string
# elements: 1
# length: 148

   b=Ubernoulli(x,sg)
   
   Bernoulli function
   b = B(x)=x/(exp(x)-1) if sg==1
   b = B(-x)=x+B(x)      if sg==0
   also works if x is a vector



# name: <cell-element>
# type: sq_string
# elements: 1
# length: 80

   b=Ubernoulli(x,sg)
   
   Bernoulli function
   b = B(x)=x/(exp(x)-1) if sg=



# name: <cell-element>
# type: sq_string
# elements: 1
# length: 10
Ucompconst


# name: <cell-element>
# type: sq_string
# elements: 1
# length: 54
 R = compconst (nodes,Nnodes,elements,Nelements,D,C);



# name: <cell-element>
# type: sq_string
# elements: 1
# length: 54
 R = compconst (nodes,Nnodes,elements,Nelements,D,C);




# name: <cell-element>
# type: sq_string
# elements: 1
# length: 8
Ucomplap


# name: <cell-element>
# type: sq_string
# elements: 1
# length: 161
 L = Ucomplap (nodes,Nnode,elements,Nelements,coeff)
    Computes the P1 finite element approximation of the 
    differential operator - d ( coeff d (.)\dx)\dx



# name: <cell-element>
# type: sq_string
# elements: 1
# length: 80
 L = Ucomplap (nodes,Nnode,elements,Nelements,coeff)
    Computes the P1 finite 



# name: <cell-element>
# type: sq_string
# elements: 1
# length: 9
Ucompmass


# name: <cell-element>
# type: sq_string
# elements: 1
# length: 65
 Bmat	= Ucompmass (nodes,Nnodes,elements,Nelements,Bvect,Cvect);



# name: <cell-element>
# type: sq_string
# elements: 1
# length: 65
 Bmat	= Ucompmass (nodes,Nnodes,elements,Nelements,Bvect,Cvect);




# name: <cell-element>
# type: sq_string
# elements: 1
# length: 15
Udriftdiffusion


# name: <cell-element>
# type: sq_string
# elements: 1
# length: 134
A=Udriftdiffusion(x,psi,coeff)

 Builds the Scharfetter-Gummel approximation
 of the differential operator - (coeff (n' - n psi'))' 




# name: <cell-element>
# type: sq_string
# elements: 1
# length: 31
A=Udriftdiffusion(x,psi,coeff)




# name: <cell-element>
# type: sq_string
# elements: 1
# length: 14
Umediaarmonica


# name: <cell-element>
# type: sq_string
# elements: 1
# length: 101
 m = mediaarmonica(w,x);
 returns the harmonic mean value of w in each of the intervals x_i , x_i+1




# name: <cell-element>
# type: sq_string
# elements: 1
# length: 80
 m = mediaarmonica(w,x);
 returns the harmonic mean value of w in each of the in



# name: <cell-element>
# type: sq_string
# elements: 1
# length: 18
Uscharfettergummel


# name: <cell-element>
# type: sq_string
# elements: 1
# length: 387
A=Uscharfettergummel(nodes,Nnodes,elements,Nelements,acoeff,bcoeff,v)

 Builds the Scharfetter-Gummel  matrix for the 
 the discretization of the LHS 
 of the Drift-Diffusion equation:

 $ -(a(x) (u' - b v'(x) u))'= f $

 where a(x) is piecewise constant
 and v(x) is piecewise linear, so that 
 v'(x) is still piecewise constant
 b is a constant independent of x
 and u is the unknown




# name: <cell-element>
# type: sq_string
# elements: 1
# length: 70
A=Uscharfettergummel(nodes,Nnodes,elements,Nelements,acoeff,bcoeff,v)




# name: <cell-element>
# type: sq_string
# elements: 1
# length: 9
constants


# name: <cell-element>
# type: sq_string
# elements: 1
# length: 814
 This file is part of 

 SECS1D - A 1-D Drift--Diffusion Semiconductor Device Simulator
 -------------------------------------------------------------------
 Copyright (C) 2004-2007  Carlo de Falco



  SECS1D is free software; you can redistribute it and/or modify
  it under the terms of the GNU General Public License as published by
  the Free Software Foundation; either version 2 of the License, or
  (at your option) any later version.

  SECS1D is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  GNU General Public License for more details.

  You should have received a copy of the GNU General Public License
  along with SECS1D; If not, see <http://www.gnu.org/licenses/>.



# name: <cell-element>
# type: sq_string
# elements: 1
# length: 23
 This file is part of