unit revgif;
interface

procedure DisplayGIF(GIFname:string);

implementation
uses gifutil9,revgfx;
procedure DisplayGIF(GIFname:string);
begin
 general(gifname);
 FadedownRGBScreen;
end;
end.