require("iuplua")

local dlg = iup.dialog{
    size="QUARTERxQUARTER",
	shrink="YES",

}

dlg:show()

function dlg:close_cb()
	--iup.Close()
end

-- Main IUP events loop
if (iup.MainLoopLevel()==0) then
  iup.MainLoop()
  iup.Close()  
end