Additional non-parallel subroutines, needed main computational subroutines to run:
- (1)
subroutineall_3HOB_dimensione dimens.
Outputs number of all 3HOB brackets for given e (total HO energy). The return value is dimens—dimension of the problem.
- (2)
subroutinearray_quantum_numbers_all_3HOBe dimens bus_3HOB.
Fills array of quantum numbers for all 3HOB brackets for given e (total HO energy). Other input parameters: dimens—dimension of the problem. The return value is bus_3HOB—array of quantum numbers.
- (3)
subroutineall_4HOB_dimensione dimens.
Outputs number of all 4HOB brackets for given e (total HO energy). The return value is dimens—dimension of the problem.
- (4)
subroutinearray_quantum_numbers_all_4HOBe dimens bus_4HOB.
Fills array of quantum numbers for all 4HOB brackets for given e (total HO energy). Other input parameters: dimens—dimension of the problem. The return value is bus_4HOB—array of quantum numbers.
- (5)
subroutineort_3HOB_dimensione dimens.
Calculates number of 3HOB coefficients for orthogonality test for given e (total HO energy). The return value is dimens—dimension of the problem.
- (6)
subroutinearray_quantum_numbers_ort_3HOBe dimens bus_3HOB.
Fills array of quantum numbers for 3HOB orthogonality test for given e (total HO energy). Other input parameters: dimens—dimension of the problem. The return value is bus_3HOB—array of quantum numbers.
- (7)
subroutineort_4HOB_dimensione dimens.
Calculates number of 4HOB coefficients for orthogonality test for given e (total HO energy). The return value is dimens—dimension of the problem.
- (8)
subroutinearray_quantum_numbers_ort_4HOBe dimens bus_4HOB.
Fills array of quantum numbers for 4HOB orthogonality test for given e (total HO energy). Other input parameters: dimens—dimension of the problem. The return value is bus_4HOB—array of quantum numbers.
- (9)
subroutinematrix_3HOB_dimensione l dimens.
Calculates dimension of 3HOB matrix for given e (total HO energy) and l (total angular momentum). The return value is dimens—dimension of the problem.
- (10)
subroutinearray_quantum_numbers_matrix_3HOBe l dimens bus_3HOB.
Fills array of quantum numbers for matrix 3HOB for given e (total HO energy) and l (total angular momentum). Other input parameters: dimens—dimension of the problem. The return value is bus_3HOB—array of quantum numbers.
- (11)
subroutinematrix_4HOB_dimensione l dimens.
Calculates dimension of 4HOB matrix for given e (total HO energy) and l (total angular momentum). The return value is dimens—dimension of the problem.
- (12)
subroutinearray_quantum_numbers_matrix_4HOBe l dimens bus_4HOB.
Fills array of quantum numbers for matrix 4HOB for given e (total HO energy) and l (total angular momentum). Other input parameters: dimens—dimension of the problem. The return value is bus_4HOB—array of quantum numbers.
- (13)
subroutinehob_output_to_filearray_xHOB dimens name bus_xHOB n e.
Writes HOB’s array array_xHOB to file. Other input parameters: dimens—dimension of the problem, bus_xHOB—array of quantum numbers, n—parameter, that equals 9 in case of 3HOB and equals 17 in case of 4HOB, e—harmonic oscillator quanta. The return value is text file that name is value of the variable name.
- (14)
subroutineort_output_to_filepaklaida dimens nk name n e.
Writes orthogonality test results to file. Input parameters: paklaida—error of the problem, dimens—dimension of the problem, nk—amount of coefficients, n—parameter, that equals 1 in case of 3HOB and equals 2 in case of 4HOB, e—harmonic oscillator quanta. The return value is text file that name is value of the variable name.
- (15)
subroutinematrix_output_to_filematrix dimens name bus_xHOB n e l.
Writes HOB’s matrix matrix to file. Other input parameters: dimens—dimension of the problem, bus_xHOB—array of quantum numbers, n—parameter, that equals 4 in case of 3HOB and equals 8 in case of 4HOB, e—harmonic oscillator quanta, l—total angular momentum. The return value is text file that name is value of the variable name.