Statistics
| Revision:

root / trunk / src / df1b2-separable / tdev.cpp @ 1967

History | View | Annotate | Download (518 Bytes)

1
/*
2
 * $Id: tdev.cpp 1967 2014-04-30 23:36:04Z johnoel $
3
 *
4
 * Author: David Fournier
5
 * Copyright (c) 2008-2012 Regents of the University of California
6
 */
7
/**
8
 * \file
9
 * Description not yet available.
10
 */
11
#include <df1b2fun.h>
12

    
13
/**
14
 * Description not yet available.
15
 * \param
16
 */
17
  df1b2variable t_deviate(const df1b2variable& _x,const df1b2variable& _a)
18
  {
19
    df1b2variable& x= (df1b2variable&)(_x);
20
    df1b2variable& a= (df1b2variable&)(_a);
21

    
22
    df1b2variable y=cumd_norm(x);
23
    y=.9999*y+.00005;
24

    
25
    df1b2variable z=inv_cumd_t(y,a);
26

    
27
    return z;
28
  }