critical_p Program

Calculates the critical temperature of a superconducting structure.


Variables

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

Subroutines

subroutine prehook()

Arguments

None

subroutine finalize()

Arguments

None