interface assignment(=)
   module procedure rgbtosc, sctorgb
end interface