描画中に窓を動かしたりすると動作がおかしくなるのを修正。描画しつつ移動できる。 ソース・コード module m_oop implicit none type :: t_rgb integer :: ir, ig, ib end type t_rgb type, abstract :: t_device character(len = 80) :: title = 'Plotter'…