init_bfield Subroutine
- Sascha Brinker
-
- memory-management, profiling, KKRhost, bfield
- 69 statements
- Source File
public subroutine init_bfield(bfield, natyp, lbfield, lbfield_constr, lbfield_all, lbfield_trans, lbfield_mt, ltorque, ibfield, ibfield_constr, itscf0, itscf1, npan_log, npan_eq, ncheb, ntotd, nfund, ncelld, lmax, iend, ntcell, ipan_intervall, ifunm, icleb, cleb, thetasnew)
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(type_bfield), | intent(inout) | :: | bfield | |||
| integer, | intent(in) | :: | natyp | |||
| logical, | intent(in) | :: | lbfield | |||
| logical, | intent(in) | :: | lbfield_constr | |||
| logical, | intent(in) | :: | lbfield_all | |||
| logical, | intent(in) | :: | lbfield_trans | |||
| logical, | intent(in) | :: | lbfield_mt | |||
| logical, | intent(in) | :: | ltorque | |||
| integer, | intent(in) | :: | ibfield | |||
| integer, | intent(in) | :: | ibfield_constr | |||
| integer, | intent(in) | :: | itscf0 | |||
| integer, | intent(in) | :: | itscf1 | |||
| integer, | intent(in) | :: | npan_log | |||
| integer, | intent(in) | :: | npan_eq | |||
| integer, | intent(in) | :: | ncheb | |||
| integer, | intent(in) | :: | ntotd | |||
| integer, | intent(in) | :: | nfund | |||
| integer, | intent(in) | :: | ncelld | |||
| integer, | intent(in) | :: | lmax | |||
| integer, | intent(in) | :: | iend | |||
| integer, | intent(in), | dimension (natyp) | :: | ntcell | ||
| integer, | intent(in), | dimension (0:ntotd, natyp) | :: | ipan_intervall | ||
| integer, | intent(in), | dimension (1:(2*lmax+1)**2,natyp) | :: | ifunm | ||
| integer, | intent(in), | dimension (ncleb, 4) | :: | icleb |
Pointer array |
|
| real(kind=dp), | intent(in), | dimension (ncleb) | :: | cleb |
GAUNT coefficients (GAUNT) |
|
| real(kind=dp), | intent(in), | dimension (ntotd*(ncheb+1), nfund, ncelld) | :: | thetasnew |
interpolated shape function in Chebychev radial mesh |