function [c]=redblue4
c=[      0         0    0.6000
         0         0    0.6364
         0         0    0.6727
         0         0    0.7091
         0         0    0.7455
         0         0    0.7818
         0         0    0.8182
         0         0    0.8545
         0         0    0.8909
         0         0    0.9273
         0         0    0.9636
         0         0    1.0000
         0         0    1.0000
    0.0526    0.0526    1.0000
    0.1053    0.1053    1.0000
    0.1579    0.1579    1.0000
    0.2105    0.2105    1.0000
    0.2632    0.2632    1.0000
    0.3158    0.3158    1.0000
    0.3684    0.3684    1.0000
    0.4211    0.4211    1.0000
    0.4737    0.4737    1.0000
    0.5263    0.5263    1.0000
    0.5789    0.5789    1.0000
    0.6316    0.6316    1.0000
    0.6842    0.6842    1.0000
    0.7368    0.7368    1.0000
    0.7895    0.7895    1.0000
    0.8421    0.8421    1.0000
    0.8947    0.8947    1.0000
    0.9474    0.9474    1.0000
    1.0000    1.0000    1.0000
    1.0000    1.0000    1.0000
    1.0000    0.9474    0.9474
    1.0000    0.8947    0.8947
    1.0000    0.8421    0.8421
    1.0000    0.7895    0.7895
    1.0000    0.7368    0.7368
    1.0000    0.6842    0.6842
    1.0000    0.6316    0.6316
    1.0000    0.5789    0.5789
    1.0000    0.5263    0.5263
    1.0000    0.4737    0.4737
    1.0000    0.4211    0.4211
    1.0000    0.3684    0.3684
    1.0000    0.3158    0.3158
    1.0000    0.2632    0.2632
    1.0000    0.2105    0.2105
    1.0000    0.1579    0.1579
    1.0000    0.1053    0.1053
    1.0000    0.0526    0.0526
    1.0000         0         0
    1.0000         0         0
    0.9636         0         0
    0.9273         0         0
    0.8909         0         0
    0.8545         0         0
    0.8182         0         0
    0.7818         0         0
    0.7455         0         0
    0.7091         0         0
    0.6727         0         0
    0.6364         0         0
    0.6000         0         0];
return

