with Ada.Numerics.Generic_Elementary_Functions,
     X_Lib,
     X_Toolkit,
     Xm_Widgets;

package Image_Global is


   procedure Resize_Image (W: in X_Toolkit.Widget);

   procedure Expose_Image_CB (W         : in X_Toolkit.Widget;
                              Closure   : in X_Toolkit.Xt_Pointer;
                              Call_Data : in X_Toolkit.Xt_Pointer);
   pragma Convention (C, Expose_Image_CB);


   procedure Resize_Image_CB (W         : in X_Toolkit.Widget;
                              Closure   : in X_Toolkit.Xt_Pointer;
                              Call_Data : in X_Toolkit.Xt_Pointer);
   pragma Convention (C, Resize_Image_CB);


   procedure Timeout_CB (Client_Data : in     X_Toolkit.Xt_Pointer;
                         ID          : in out X_Toolkit.Interval_ID);
   pragma Convention (C, Timeout_CB);


end Image_Global;