diff --git a/decomnano/decomnano_fix_bulk_fraction_hollow_shell.wl b/decomnano/decomnano_fix_bulk_fraction_hollow_shell.wl index 801d345..4d12b36 100644 --- a/decomnano/decomnano_fix_bulk_fraction_hollow_shell.wl +++ b/decomnano/decomnano_fix_bulk_fraction_hollow_shell.wl @@ -13,8 +13,7 @@ nh = Compile[{{D, _Real}, {Dh, _Real}, {d, _Real}}, Module[{}, 24*(L[D, d]*(5*L[D, d]^2 + 3*L[D, d] + 1) - (5*L[Dh, d]^3 + 12*L[Dh, d]^2 + 10*L[Dh, d] + 3))/(10*L[D, d]^3 + - 15*L[D, d]^2 + 11*L[D, d] - 10*L[Dh, d]^3 - 15*L[Dh, d]^2 + - 11*L[Dh, d])]] + 15*L[D, d]^2 + 11*L[D, d] - 10*L[Dh, d]^3 - 15*L[Dh, d]^2 - 11*L[Dh, d])]] Natomh = Compile[{{D, _Real}, {Dh, _Real}, {d, _Real}}, diff --git a/decomnano/decomnano_hollow_shell.wl b/decomnano/decomnano_hollow_shell.wl index 49ca4ff..11df66b 100644 --- a/decomnano/decomnano_hollow_shell.wl +++ b/decomnano/decomnano_hollow_shell.wl @@ -13,8 +13,7 @@ nh = Compile[{{D, _Real}, {Dh, _Real}, {d, _Real}}, Module[{}, 24*(L[D, d]*(5*L[D, d]^2 + 3*L[D, d] + 1) - (5*L[Dh, d]^3 + 12*L[Dh, d]^2 + 10*L[Dh, d] + 3))/(10*L[D, d]^3 + - 15*L[D, d]^2 + 11*L[D, d] - 10*L[Dh, d]^3 - 15*L[Dh, d]^2 + - 11*L[Dh, d])]] + 15*L[D, d]^2 + 11*L[D, d] - 10*L[Dh, d]^3 - 15*L[Dh, d]^2 - 11*L[Dh, d])]] Natomh = Compile[{{D, _Real}, {Dh, _Real}, {d, _Real}},