Module that wraps tapenade generated routines to calculate ! Ge and derivatives.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(GeModelTapenade) | :: | model | ||||
real(kind=pr), | intent(in) | :: | n(:) | |||
real(kind=pr), | intent(in) | :: | t | |||
real(kind=pr), | intent(out) | :: | ge |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(GeModelTapenade) | :: | model | ||||
real(kind=pr), | intent(in) | :: | n(:) | |||
real(kind=pr) | :: | nb(:) | ||||
real(kind=pr), | intent(in) | :: | t | |||
real(kind=pr) | :: | tb | ||||
real(kind=pr) | :: | ge | ||||
real(kind=pr) | :: | geb |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(GeModelTapenade) | :: | model | ||||
real(kind=pr), | intent(in) | :: | n(:) | |||
real(kind=pr), | intent(in) | :: | nd(:) | |||
real(kind=pr), | intent(in) | :: | t | |||
real(kind=pr), | intent(in) | :: | td | |||
real(kind=pr), | intent(out) | :: | ge | |||
real(kind=pr), | intent(out) | :: | ged |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(GeModelTapenade) | :: | model | ||||
real(kind=pr), | intent(in) | :: | n(:) | |||
real(kind=pr) | :: | nb(:) | ||||
real(kind=pr), | intent(in) | :: | nd(:) | |||
real(kind=pr) | :: | ndb(:) | ||||
real(kind=pr), | intent(in) | :: | t | |||
real(kind=pr) | :: | tb | ||||
real(kind=pr), | intent(in) | :: | td | |||
real(kind=pr) | :: | tdb | ||||
real(kind=pr) | :: | ge | ||||
real(kind=pr) | :: | geb | ||||
real(kind=pr) | :: | ged | ||||
real(kind=pr) | :: | gedb |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(GeModelTapenade) | :: | model | ||||
real(kind=pr), | intent(in) | :: | n(:) | |||
real(kind=pr), | intent(in) | :: | nd(:) | |||
real(kind=pr), | intent(in) | :: | t | |||
real(kind=pr), | intent(in) | :: | td0 | |||
real(kind=pr), | intent(in) | :: | td | |||
real(kind=pr), | intent(out) | :: | ge | |||
real(kind=pr), | intent(out) | :: | ged0 | |||
real(kind=pr), | intent(out) | :: | ged | |||
real(kind=pr), | intent(out) | :: | gedd |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
type(Substances), | public | :: | components |
Substances contained in the module |
procedure, public :: excess_gibbs | |
procedure(tapenade_ge), public, deferred :: ge | |
procedure(tapenade_ge_b), public, deferred :: ge_b | |
procedure(tapenade_ge_d), public, deferred :: ge_d | |
procedure(tapenade_ge_d_b), public, deferred :: ge_d_b | |
procedure(tapenade_ge_d_d), public, deferred :: ge_d_d | |
procedure, public :: ln_activity_coefficient |
Excess Gibbs model generic interface
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(GeModelTapenade), | intent(in) | :: | self | |||
real(kind=pr), | intent(in) | :: | n(:) | |||
real(kind=pr), | intent(in) | :: | t | |||
real(kind=pr), | intent(out), | optional | :: | Ge | ||
real(kind=pr), | intent(out), | optional | :: | GeT | ||
real(kind=pr), | intent(out), | optional | :: | GeT2 | ||
real(kind=pr), | intent(out), | optional, | dimension(size(n)) | :: | Gen | |
real(kind=pr), | intent(out), | optional, | dimension(size(n)) | :: | GeTn | |
real(kind=pr), | intent(out), | optional | :: | Gen2(size(n),size(n)) |