save_emesh Subroutine
- Philipp Ruessmann
-
- communication, KKRhost
- 43 statements
- Source File
public subroutine save_emesh(ielast, ez, wez, emin, emax, iesemicore, fsemicore, npol, tk, npnt1, npnt2, npnt3, ebotsemi, emusemi, tksemi, npolsemi, n1semi, n2semi, n3semi, iemxd, t_params)
Store the values of the local variables related to the energy mesh,
in the t_params data types
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| integer, | intent(in) | :: | ielast | |||
| complex(kind=dp), | intent(in), | dimension (iemxd) | :: | ez | ||
| complex(kind=dp), | intent(in), | dimension (iemxd) | :: | wez | ||
| real(kind=dp), | intent(in) | :: | emin | |||
| real(kind=dp), | intent(in) | :: | emax | |||
| integer, | intent(in) | :: | iesemicore | |||
| real(kind=dp), | intent(in) | :: | fsemicore | |||
| integer, | intent(in) | :: | npol | |||
| real(kind=dp), | intent(in) | :: | tk | |||
| integer, | intent(in) | :: | npnt1 | |||
| integer, | intent(in) | :: | npnt2 | |||
| integer, | intent(in) | :: | npnt3 | |||
| real(kind=dp), | intent(in) | :: | ebotsemi | |||
| real(kind=dp), | intent(in) | :: | emusemi | |||
| real(kind=dp), | intent(in) | :: | tksemi | |||
| integer, | intent(in) | :: | npolsemi | |||
| integer, | intent(in) | :: | n1semi | |||
| integer, | intent(in) | :: | n2semi | |||
| integer, | intent(in) | :: | n3semi | |||
| integer, | intent(in) | :: | iemxd | |||
| type(type_params), | intent(inout) | :: | t_params |