Go to the source code of this file.
|
subroutine | qel_pol (ENU, LTYP, P21, P22, P23, P24, P25) |
|
subroutine | gen_qel (ENU, LTYP, P21, P22, P23, P24, P25) |
|
subroutine | mass_ini |
|
subroutine | gen_delta (ENU, LLEP, LTARG, JINT, P21, P22, P23, P24, P25) |
|
subroutine | kkevle (NHKKH1, EPN, PPN, KKMAT, IREJ) |
|
function | lucomp (KF) |
|
subroutine gen_delta |
( |
|
ENU, |
|
|
|
LLEP, |
|
|
|
LTARG, |
|
|
|
JINT, |
|
|
|
P21, |
|
|
|
P22, |
|
|
|
P23, |
|
|
|
P24, |
|
|
|
P25 |
|
) |
| |
subroutine gen_qel |
( |
|
ENU, |
|
|
|
LTYP, |
|
|
|
P21, |
|
|
|
P22, |
|
|
|
P23, |
|
|
|
P24, |
|
|
|
P25 |
|
) |
| |
subroutine kkevle |
( |
|
NHKKH1, |
|
|
|
EPN, |
|
|
|
PPN, |
|
|
|
KKMAT, |
|
|
|
IREJ |
|
) |
| |
subroutine qel_pol |
( |
|
ENU, |
|
|
|
LTYP, |
|
|
|
P21, |
|
|
|
P22, |
|
|
|
P23, |
|
|
|
P24, |
|
|
|
P25 |
|
) |
| |