“…3.36). see eqs (7) and (8) relative error (6) Den8ity(ca-3)»,/,30X, '3 Energy (eV)',/,30X, '4 Degeneracy ' ,/,30X, 'B Replace entry' ,/,30X, '6 Delete entry',/) CALL PROMPTC Enter number (8) DN(SELECT) (7),B(7),C(7),D(7) REAL A1(7),B1(7),C1(7),D1(7) REAL A2(7),B2(7).D2(7) REAL A3(7),B3(7),D3(7) REAL A4(7),B4(7),D4 (7) (6) (1)). QR.…”