316       save_DATA )  argument
359     type(dictionary_t), intent(inout) :: save_DATA  local
400     if ( 'T-eig' .in. save_DATA ) then
401        call assign_int(N_eigen,save_DATA,'T-eig')
630     if ( 'DOS-Gf' .in. save_DATA ) then
670     sme = 'orb-current' .in. save_DATA
671     sme = sme .or. ('COOP-Gf' .in. save_DATA)
672     sme = sme .or. ('COOP-A' .in. save_DATA)
673     sme = sme .or. ('COHP-Gf' .in. save_DATA)
674     sme = sme .or. ('COHP-A' .in. save_DATA)
675     sme = sme .or. ('DM-Gf' .in. save_DATA)
676     sme = sme .or. ('DM-A' .in. save_DATA)
710     if ( 'DM-Gf' .in. save_DATA ) then
716     if ( 'COOP-Gf' .in. save_DATA ) then
722     if ( 'COHP-Gf' .in. save_DATA ) then
809        if ( ('DOS-Elecs' .in. save_DATA) .and. .not. Elecs(iEl)%out_of_core ) then
851          if ( ('DOS-A-all' .nin. save_DATA) .and. &
852              ('T-all'.nin. save_DATA) ) cycle
858        if ( 'DM-A' .in. save_DATA ) then
865        if ( 'DOS-A' .in. save_DATA ) then
872        if ( 'COOP-A' .in. save_DATA ) then
879        if ( 'COHP-A' .in. save_DATA ) then
889        if ( 'orb-current' .in. save_DATA ) then
898           if ( ('T-all' .nin. save_DATA ) .and. &
900           if ( ('T-sum-out' .nin. save_DATA ) .and. &
1207        N_eigen, Teig, save_DATA)  argument
1230     type(dictionary_t), intent(in) :: save_DATA  local
1286     if ( 'DOS-Gf' .in. save_DATA ) then
1294     if ( 'DOS-A' .in. save_DATA ) then
1301              if ( ('DOS-A-all' .nin. save_DATA) .and. &
1302                   ('T-all'.nin. save_DATA) ) cycle
1328        if ( iEl == N_Elec .and. ('T-all' .nin. save_DATA) ) cycle
1334           if ( ('T-all' .nin. save_DATA ) .and. &
1336           if ( ('T-sum-out' .nin. save_DATA ) .and. &
1396        save_DATA)  argument
1413     type(dictionary_t), intent(in) :: save_DATA  local
1428     if ( 'DOS-Elecs' .in. save_DATA ) then
1628   subroutine state_cdf2ascii(fname,nspin,ispin,N_Elec,Elecs,N_E,rW,save_DATA)  argument
1652     type(dictionary_t), intent(in) :: save_DATA  local
1719     if ( 'DOS-Gf' .in. save_DATA ) then
1751       if ( ('DOS-Elecs' .in. save_DATA) .and. .not. Elecs(iEl)%out_of_core ) then
1783         if ( ('DOS-A-all' .nin. save_DATA) .and. &
1784             ('T-all'.nin. save_DATA) ) cycle
1787       if ( 'DOS-A' .in. save_DATA ) then
1809         if ( ('T-all' .nin. save_DATA ) .and. &
1811         if ( ('T-sum-out' .nin. save_DATA ) .and. &
2208        N_eigen, save_DATA)  argument
2222     type(dictionary_t), intent(in) :: save_DATA  local
2237     if ( 'DOS-Gf' .in. save_DATA ) then
2259           if ( ('DOS-A-all' .nin. save_DATA) .and. &
2260                ('T-all'.nin. save_DATA) ) cycle
2263        if ( 'DOS-A' .in. save_DATA ) then
2285           if ( ('T-all' .nin. save_DATA ) .and. &
2287           if ( ('T-sum-out' .nin. save_DATA ) .and. &
2357   subroutine init_save_Elec(iounits,ispin,nspin,N_Elec,Elecs,save_DATA)  argument
2369     type(dictionary_t), intent(in) :: save_DATA  local
2384     if ( 'DOS-Elecs' .in. save_DATA ) then
2489        save_DATA )  argument
2506     type(dictionary_t), intent(in) :: save_DATA  local
2535     if ( 'DOS-Gf' .in. save_DATA ) then
2549           if ( ('DOS-A-all' .nin. save_DATA) .and. &
2550                ('T-all'.nin. save_DATA) ) cycle
2553        if ( 'DOS-A' .in. save_DATA ) then
2567           if ( ('T-all' .nin. save_DATA ) .and. &
2569           if ( ('T-sum-out' .nin. save_DATA ) .and. &
2614        save_DATA )  argument
2628     type(dictionary_t), intent(in) :: save_DATA  local
2653     if ( 'DOS-Elecs' .in. save_DATA ) then