pscoast -R13/92/-62/-28 -JB52.5/-45/-40/-50/80 \
        -P -X1 -Y1 -B5g5f1 -G -Dh -K > temp.ps

swreadl3b A20062642006354.L3b_SNAU.main chlor_a -30 -60 15 90 \
| perl -an -e 'BEGIN{<>;<>;<>;}' \
           -e '($n,$s,$w,$e)=@F[3..6];' \
           -e 'print ">\n$e $n\n$w $n\n$w $s\n$e $s\n"' \
| psxy -R -JB -O -M -L -W1,255/0/0 >> temp.ps

gs -sDEVICE=pngalpha -sOutputFile=- -q -r100 \
   -dGraphicsAlphaBits=4 -dTextAlphaBits=4 \
   -g8200x5000 - <temp.ps \
> A20062642006354.L3b_SNAU.bin_bounds.png

swreadl3b A20062642006354.L3b_SNAU.main chlor_a -30 -60 15 90 \
| perl -an -e 'BEGIN{<>;<>;<>;}' \
           -e '($n,$s,$w,$e)=@F[3..6];' \
           -e '$c=$F[9]/$F[11];' \
           -e 'if($c<0.04){ $p=0 }' \
           -e 'else{' \
           -e '$p=int(255*log($c/0.04)/log(40/0.04) +0.5);' \
           -e '$p=255 if $p>255;' \
           -e '}' \
           -e 'print "> -G$p\n$e $n\n$w $n\n$w $s\n$e $s\n"' \
| psxy -R13/92/-62/-28 -JB52.5/-45/-40/-50/80 -M -P -X1 -Y1 \
| gs -sDEVICE=pgmraw -sOutputFile=- -q -r100 -g8200x5000 - \
| pgmtoppm -map lut.ppm \
| pnmtopng \
> A20062642006354.L3b_SNAU.chl.png

composite A20062642006354.L3b_SNAU.bin_bounds.png \
          A20062642006354.L3b_SNAU.chl.png - \
> A20062642006354.L3b_SNAU.bins_over_chl.png

pscoast -R13/92/-62/-28 -JB52.5/-45/-40/-50/80 \
        -P -X1 -Y1 -B5g5f1 -G -Dh \
| gs -sDEVICE=pngalpha -sOutputFile=- -q -r100 \
     -dGraphicsAlphaBits=4 -dTextAlphaBits=4 \
     -g8200x5000 - \
| composite - A20062642006354.L3b_SNAU.chl.png - \
> A20062642006354.L3b_SNAU.graticule_over_chl.png