Tcl with Simulation (Vector Wave Form Files)

I think you have some confusion. Reading this code, I can see some problems:

while(not endfile(file1)) loop
  readline(file1,line1);
  I(j) <= to_signed(input_tmp,10);
  j := j + 1;
end loop;

Once you have read the text into the variable line1, you do nothing with it.

input_tmp is never written to.

Y <= NOT I;

I is not in scope, so will throw an error, unless this is inside a process with an internal variable or signal called I.

Another point to note is you can remove the "assert false" statement from before the report, you can use report without an assert if you always want it to report. So you can do things like this:

if something_happaned then report "Something Happened" severity WARNING;
end if;