Store the parameters of the binary neutron stars' \(\texttt{FUKA}\) \(\mathrm{ID}\) into member variables
FT 09.02.2022
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(bnsfuka), | intent(inout) | :: | this |
bnsfuka object which this PROCEDURE is a member of |
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| logical, | private, | parameter | :: | debug | = | .FALSE. | |
| character(kind=C_CHAR, len=1), | private, | DIMENSION(str_length) | :: | eos_file_1_tmp_c | |||
| character(kind=C_CHAR, len=1), | private, | DIMENSION(str_length) | :: | eos_file_2_tmp_c | |||
| character(kind=C_CHAR, len=1), | private, | DIMENSION(str_length) | :: | eos_type_1_tmp_c | |||
| character(kind=C_CHAR, len=1), | private, | DIMENSION(str_length) | :: | eos_type_2_tmp_c | |||
| integer, | private | :: | i | ||||
| integer, | private | :: | nchars | ||||
| integer, | private, | parameter | :: | str_length | = | 100 |
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| double precision, | intent(in) | :: | x | |||
| double precision, | intent(in) | :: | y | |||
| double precision, | intent(in) | :: | z |