;+
;NAME: T.Yoshida - Lower (rainbow) color table - TVscl
pro tyltv,image,xpos,ypos,xsize=xsize,ysize=ysize, $
	range=range,validregion=validregion,nullvalue=nullvalue
;PURPOSE:
;	Extended TVSCL for the T.Yoshida color table.
;	This calls TYTV with 'crange=[1,100]'.
;	See TYTV for the details.
;	See also XTYOSHIDACT.
;CALLING SEQUENCE:
;	xtyoshidact,/nox
;	tyltv,findgen(10,10),xsize=100
;HISTORY:
;	ver. 1.0 95-11-30 T.Yoshida
;-
	cr=[1,100]
	tytv,image,xpos,ypos,xsize=xsize,ysize=ysize,crange=cr, $
		range=range,validregion=validregion,nullvalue=nullvalue
end