Calculates the critical temperature of a superconducting structure.
Type | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|
type(structure) | :: | stack | ||||
integer, | parameter | :: | bisections | = | 20 | |
integer, | parameter | :: | bootstraps | = | 10 | |
integer, | parameter | :: | iterations | = | 10 | |
real(kind=wp), | parameter | :: | threshold | = | 1e-08_wp | |
real(kind=wp), | parameter | :: | initgap | = | 1e-02_wp | |
real(kind=wp) | :: | minimum | = | 0.00_wp | ||
real(kind=wp) | :: | maximum | = | 1.00_wp | ||
real(kind=wp) | :: | critical | = | 0.50_wp | ||
integer | :: | n | = | 0 |