;+
;NAME: T.Yoshida - Upper (red temperature) color table - TVscl
pro tyutv,image,xpos,ypos,xsize=xsize,ysize=ysize, $
	range=range,validregion=validregion,nullvalue=nullvalue
;KEYWORDS:	Tool, Image Processing
;PURPOSE:
;	Extended TVSCL for the T.Yoshida color table.
;	This calls TYTV with 'crange=[101,!d.table_size-2]'.
;	See TYTV for the details.
;	See also XTYOSHIDACT.
;CALLING SEQUENCE:
;	xtyoshidact,/nox
;	tyutv,findgen(10,10),xsize=100
;HISTORY:
;	ver. 1.0 95-11-30 T.Yoshida
;-
	cr=[101,!d.table_size-2]
	tytv,image,xpos,ypos,xsize=xsize,ysize=ysize,crange=cr, $
		range=range,validregion=validregion,nullvalue=nullvalue
end