1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74

#[cfg(feature = "python")]
pub mod py;

/// Elastic constitutive models.
pub mod elastic;

// pub mod plastic;
// pub mod viscoelastic;
// pub mod viscoplastic;

fn jacobian(deformation_gradient: &[[f64; 3]; 3]) -> f64
{
      deformation_gradient[0][0]*deformation_gradient[1][1]*deformation_gradient[2][2]
    - deformation_gradient[0][0]*deformation_gradient[1][2]*deformation_gradient[2][1]
    - deformation_gradient[0][1]*deformation_gradient[1][0]*deformation_gradient[2][2]
    + deformation_gradient[0][1]*deformation_gradient[1][2]*deformation_gradient[2][0]
    + deformation_gradient[0][2]*deformation_gradient[1][0]*deformation_gradient[2][1]
    - deformation_gradient[0][2]*deformation_gradient[1][1]*deformation_gradient[2][0]
}

fn incompressible_deformation_gradient(deformation_gradient: &[[f64; 3]; 3]) -> [[f64; 3]; 3]
{
    let j_1_3 = jacobian(deformation_gradient).powf(1.0/3.0);
    [
        [
            deformation_gradient[0][0]*deformation_gradient[0][0]/j_1_3 + deformation_gradient[0][1]*deformation_gradient[0][1]/j_1_3 + deformation_gradient[0][2]*deformation_gradient[0][2]/j_1_3,
            deformation_gradient[0][0]*deformation_gradient[1][0]/j_1_3 + deformation_gradient[0][1]*deformation_gradient[1][1]/j_1_3 + deformation_gradient[0][2]*deformation_gradient[1][2]/j_1_3,
            deformation_gradient[0][0]*deformation_gradient[2][0]/j_1_3 + deformation_gradient[0][1]*deformation_gradient[2][1]/j_1_3 + deformation_gradient[0][2]*deformation_gradient[2][2]/j_1_3
        ],[
            deformation_gradient[1][0]*deformation_gradient[0][0]/j_1_3 + deformation_gradient[1][1]*deformation_gradient[0][1]/j_1_3 + deformation_gradient[1][2]*deformation_gradient[0][2]/j_1_3,
            deformation_gradient[1][0]*deformation_gradient[1][0]/j_1_3 + deformation_gradient[1][1]*deformation_gradient[1][1]/j_1_3 + deformation_gradient[1][2]*deformation_gradient[1][2]/j_1_3,
            deformation_gradient[1][0]*deformation_gradient[2][0]/j_1_3 + deformation_gradient[1][1]*deformation_gradient[2][1]/j_1_3 + deformation_gradient[1][2]*deformation_gradient[2][2]/j_1_3
        ],[
            deformation_gradient[2][0]*deformation_gradient[0][0]/j_1_3 + deformation_gradient[2][1]*deformation_gradient[0][1]/j_1_3 + deformation_gradient[2][2]*deformation_gradient[0][2]/j_1_3,
            deformation_gradient[2][0]*deformation_gradient[1][0]/j_1_3 + deformation_gradient[2][1]*deformation_gradient[1][1]/j_1_3 + deformation_gradient[2][2]*deformation_gradient[1][2]/j_1_3,
            deformation_gradient[2][0]*deformation_gradient[2][0]/j_1_3 + deformation_gradient[2][1]*deformation_gradient[2][1]/j_1_3 + deformation_gradient[2][2]*deformation_gradient[2][2]/j_1_3
        ]
    ]
}

fn left_cauchy_green(deformation_gradient: &[[f64; 3]; 3]) -> [[f64; 3]; 3]
{
    [
        [
            deformation_gradient[0][0]*deformation_gradient[0][0] + deformation_gradient[0][1]*deformation_gradient[0][1] + deformation_gradient[0][2]*deformation_gradient[0][2],
            deformation_gradient[0][0]*deformation_gradient[1][0] + deformation_gradient[0][1]*deformation_gradient[1][1] + deformation_gradient[0][2]*deformation_gradient[1][2],
            deformation_gradient[0][0]*deformation_gradient[2][0] + deformation_gradient[0][1]*deformation_gradient[2][1] + deformation_gradient[0][2]*deformation_gradient[2][2]
        ],[
            deformation_gradient[1][0]*deformation_gradient[0][0] + deformation_gradient[1][1]*deformation_gradient[0][1] + deformation_gradient[1][2]*deformation_gradient[0][2],
            deformation_gradient[1][0]*deformation_gradient[1][0] + deformation_gradient[1][1]*deformation_gradient[1][1] + deformation_gradient[1][2]*deformation_gradient[1][2],
            deformation_gradient[1][0]*deformation_gradient[2][0] + deformation_gradient[1][1]*deformation_gradient[2][1] + deformation_gradient[1][2]*deformation_gradient[2][2]
        ],[
            deformation_gradient[2][0]*deformation_gradient[0][0] + deformation_gradient[2][1]*deformation_gradient[0][1] + deformation_gradient[2][2]*deformation_gradient[0][2],
            deformation_gradient[2][0]*deformation_gradient[1][0] + deformation_gradient[2][1]*deformation_gradient[1][1] + deformation_gradient[2][2]*deformation_gradient[1][2],
            deformation_gradient[2][0]*deformation_gradient[2][0] + deformation_gradient[2][1]*deformation_gradient[2][1] + deformation_gradient[2][2]*deformation_gradient[2][2]
        ]
    ]
}

fn incompressible_left_cauchy_green(deformation_gradient: &[[f64; 3]; 3]) -> [[f64; 3]; 3]
{
    left_cauchy_green(&incompressible_deformation_gradient(deformation_gradient))
}

fn deviatoric_incompressible_left_cauchy_green(deformation_gradient: &[[f64; 3]; 3]) -> [[f64; 3]; 3]
{
    let b_bar = incompressible_left_cauchy_green(deformation_gradient);
    let b_sph = (b_bar[0][0] + b_bar[1][1] + b_bar[2][2])/3.0;
    [
        [b_bar[0][0] - b_sph, b_bar[0][1], b_bar[0][2]],
        [b_bar[1][0], b_bar[1][1] - b_sph, b_bar[1][2]],
        [b_bar[2][0], b_bar[2][1], b_bar[2][2] - b_sph],
    ]
}