calc_spinvalue_state Subroutine
public subroutine calc_spinvalue_state(inc, tgmatrx, rveig_in, spin_value, eigvect_rot)
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(inc_TYPE), | intent(in) | :: | inc | |||
| type(tgmatrx_TYPE), | intent(in) | :: | tgmatrx | |||
| double complex, | intent(in) | :: | rveig_in(inc%almso,inc%ndegen) | |||
| double precision, | intent(out) | :: | spin_value(inc%ndegen,cfg%nsqa) | |||
| double complex, | intent(out), | optional | :: | eigvect_rot(inc%lmmaxso,inc%natypd,inc%ndegen,cfg%nsqa) |