c write out an xfig file to plot out a swath of rainbow colors
       print*,'#FIG 3.2'
       print*,'Portrait'
       print*,'Center'
       print*,'Inches'
       print*,'Letter'  
       print*,'100.00'
       print*,'Single'
       print*,'-2'
       print*,'1200 2'
       do 200 i=1,9
         number=i+30
         number2=i*1000
         print 100,number,number2
 200    continue
 100   format('0 ',i3,' #ff',i4)
       stop
       end
c2 2 0 1 32 32 100 0 20 0.000 0 0 -1 0 0 5
c	 825 3300 900 3300 900 4050 825 4050 825 3300
c2 2 0 1 33 33 100 0 20 0.000 0 0 -1 0 0 5
c	 900 3300 975 3300 975 4050 900 4050 900 3300
c2 2 0 1 34 34 100 0 20 0.000 0 0 -1 0 0 5
c	 975 3300 1050 3300 1050 4050 975 4050 975 3300
c2 2 0 1 35 35 100 0 20 0.000 0 0 -1 0 0 5
c	 1050 3300 1125 3300 1125 4050 1050 4050 1050 3300
c2 2 0 1 36 36 100 0 20 0.000 0 0 -1 0 0 5
c         1125 3300 1200 3300 1200 4050 1125 4050 1125 3300
c2 2 0 1 37 37 100 0 20 0.000 0 0 -1 0 0 5
c         1200 3300 1275 3300 1275 4050 1200 4050 1200 3300
c2 2 0 1 38 38 100 0 20 0.000 0 0 -1 0 0 5
c         1275 3300 1350 3300 1350 4050 1275 4050 1275 3300
c2 2 0 1 39 39 100 0 20 0.000 0 0 -1 0 0 5
c         1350 3300 1425 3300 1425 4050 1350 4050 1350 3300
c2 2 0 1 40 40 100 0 20 0.000 0 0 -1 0 0 5
c         1425 3300 1500 3300 1500 4050 1425 4050 1425 3300
c2 2 0 1 41 41 100 0 20 0.000 0 0 -1 0 0 5
c         1500 3300 1575 3300 1575 4050 1500 4050 1500 3300
c2 2 0 1 42 42 100 0 20 0.000 0 0 -1 0 0 5
c         1575 3300 1650 3300 1650 4050 1575 4050 1575 3300