read_pseudo.f90:61.25:

        IMPORT pseudo_upf, radial_grid_type 
                         1
Error: Cannot IMPORT 'pseudo_upf' from host scoping unit at (1) - does not exist.
read_pseudo.f90:65.45:

        TYPE(pseudo_upf),INTENT(INOUT) :: upf       
                                             1
Error: the type of 'upf' at (1) has not been declared within the interface
read_pseudo.f90:66.68:

        TYPE(radial_grid_type),OPTIONAL,INTENT(INOUT),TARGET :: grid
                                                                    1
Error: the type of 'grid' at (1) has not been declared within the interface
read_pseudo.f90:60.28:

     SUBROUTINE read_upf(upf, grid, ierr, unit,  filename)          
                            1
Error: Symbol 'upf' at (1) has no IMPLICIT type
read_pseudo.f90:60.34:

     SUBROUTINE read_upf(upf, grid, ierr, unit,  filename)          
                                  1
Error: Symbol 'grid' at (1) has no IMPLICIT type
read_pseudo.f90:169.20:

     CALL  read_upf(upf(nt), rgrid(nt), isupf, filename = file_pseudo )
                    1
Error: Type mismatch in argument 'upf' at (1); passed TYPE(pseudo_upf) to UNKNOWN
read_pseudo.f90:186.26:

           CALL  read_upf(upf(nt), rgrid(nt), isupf, filename = TRIM(file_fixed
                          1
Error: Type mismatch in argument 'upf' at (1); passed TYPE(pseudo_upf) to UNKNOWN
read_pseudo.f90:196.26:

           CALL  read_upf(upf(nt), rgrid(nt), isupf, UNIT = iunps )
                          1
Error: Type mismatch in argument 'upf' at (1); passed TYPE(pseudo_upf) to UNKNOWN
make[1]: *** [read_pseudo.o] Error 1
make[1]: Leaving directory `/export/apps/q-e-qe-6.4.1/Modules'