Combining rule that uses constant values.
[ a_{ijk} = \sqrt[3]{a_i a_j a_k} (1 - k_{ijk}) ]
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(CMR), | intent(in) | :: | self | |||
| real(kind=pr), | intent(in) | :: | T |
Temperature [K] |
||
| real(kind=pr), | intent(in) | :: | ai(:) |
Pure components attractive parameters (\a_i) |
||
| real(kind=pr), | intent(in) | :: | daidt(:) |
|
||
| real(kind=pr), | intent(in) | :: | daidt2(:) |
|
||
| real(kind=pr), | intent(out) | :: | a(:,:,:) |
Matrix |
||
| real(kind=pr), | intent(out) | :: | dadt(:,:,:) |
|
||
| real(kind=pr), | intent(out) | :: | dadt2(:,:,:) |
|
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | private | :: | i | ||||
| integer, | private | :: | j | ||||
| real(kind=pr), | private | :: | k(size(ai),size(ai),size(ai)) | ||||
| integer, | private | :: | l | ||||
| real(kind=pr), | private | :: | zeros(size(ai),size(ai),size(ai)) |