Bases for 1D states of Be

Text files contain bases for 1D states of Be start. Names of the files are the following: inout.txt_s_b[_inf], where s is the 1D state number, b is the number of basis functions and "_inf" indicates bases for infinite nuclear mass, wheres the other files contain bases for 9Be isotope. Actual basis info within inout.txt files starts below 4th line of the type "==============================". In each line there first integer denotes basis function ordering number. The second integer denotes "packed" indices of the angular factor of the basis function. In order to "unpack" these indices one has to use the following fortran code: !******************************* ! ! UNPACKING INTEGER i_k i_k AND j_k ! !******************************* i_kk=ZERO j_kk=ZERO goto (1,2,3,4,5,6,7,8,9,10,11,12,13,14,15), i_k 1 continue i_kk= 1 j_kk= 1 goto 40 2 continue i_kk= 1 j_kk= 2 goto 40 3 continue i_kk= 2 j_kk= 2 goto 40 4 continue i_kk= 1 j_kk= 3 goto 40 5 continue i_kk= 2 j_kk= 3 goto 40 6 continue i_kk= 3 j_kk= 3 goto 40 7 continue i_kk= 1 j_kk= 4 goto 40 8 continue i_kk= 2 j_kk= 4 goto 40 9 continue i_kk= 3 j_kk= 4 goto 40 10 continue i_kk= 4 j_kk= 4 goto 40 11 continue i_kk= 1 j_kk= 5 goto 40 12 continue i_kk= 2 j_kk= 5 goto 40 13 continue i_kk= 3 j_kk= 5 goto 40 14 continue i_kk= 4 j_kk= 5 goto 40 15 continue i_kk= 5 j_kk= 5 goto 40 40 continue End of the fortran code. Next ten real numbers represent lower-triangular matrix L, where the ordering of the nonzero matrix elements is the following (fortran code): (L_k(i,1), i=1,4),(L_k(i,2), i=2,4),(L_k(i,3),i=3,4),L_k(4,4)