gragusa

\ProvidesClass{mydiss}[2012/08/22 v1.3 mydiss class (Michael Ummels)]
\NeedsTeXFormat{LaTeX2e}[1996/06/01]


% Options

\newif\if@iso
\@isofalse
\newif\if@crop
\@cropfalse

gragusa

\ProvidesClass{mydiss}[2012/08/22 v1.3 mydiss class (Michael Ummels)]
\NeedsTeXFormat{LaTeX2e}[1996/06/01]


% Options

\newif\if@iso
\@isofalse
\newif\if@crop
\@cropfalse

gragusa

;; This buffer is for notes you don't want to save, and for Lisp evaluation.
;; If you want to create a file, visit that file with C-x C-f,
;; then enter the text in that file's own buffer.

gragusa

;; This buffer is for notes you don't want to save, and for Lisp evaluation.
;; If you want to create a file, visit that file with C-x C-f,
;; then enter the text in that file's own buffer.

gragusa

gragusa

# Utilities needed in rand()

# (exp(x) - 1) / x
function d2(z::Real)
	const p1 = 0.840066852536483239e3
	const p2 = 0.200011141589964569e2
	const q1 = 0.168013370507926648e4
	const q2 = 0.18013370407390023e3
	const q3 = 1.0

gragusa

(quail-define-package
 "symbol-input" "unicode" "unicode-sym" t
 "Easier input for unicode technical symbols"
 nil t nil nil nil nil nil nil nil nil t)

(quail-define-rules
    ("\\alpha"   ?α)
    ("\\beta"    ?β)
    ("\\gamma"   ?γ)
    ("\\delta"   ?δ)

gragusa

using MinimumDivergence
using ModelsGenerators
using Ipopt
using Divergences

HellingerDistance()  = CressieRead(0.5)
ContinuousUpdating() = CressieRead(2.0)

ModifiedHellingerDistance(ϑ::Real)  = ModifiedCressieRead(0.5, ϑ)

gragusa

n = 31

ttt()=(randn(100,1), randn(100,1), randn(100,5)) 

function rvproducer()
    for i = 1:n
        produce(ttt())
    end
end

gragusa

using ForwardDiff

import ForwardDiff: Dual, epsilon



function my_dual_fad{T<:Real}(f!::Function, x::Vector{T}, jac_out::Matrix{T}, dual_in, dual_out, args...)
  for i in 1:length(x)
    dual_in[i] = Dual(x[i], zero(T))
  end