Home > colormaps > stretch_seismic.m

stretch_seismic

PURPOSE

SYNOPSIS

function ns = stretch_seismic(map,stretch_factor)

DESCRIPTION

 Script not finished

CROSS-REFERENCE INFORMATION

This function calls:

This function is called by:

SOURCE CODE

0001 function ns = stretch_seismic(map,stretch_factor)
0002 %
0003 % Script not finished
0004 
0005 % Find index at which green goes to 1
0006 
0007 gidx = find(map(:,2) > 0 & map(:,2) < 1);
0008 
0009 grbrk(1) = gidx(find(diff(gidx))>1);
0010 grbrk(2) = gidx(find(diff(diff(gidx))<0)+1);
0011 
0012 ns = map;
0013 
0014