Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1742 1402 (N05W58 L=267)   593     78        2 (1702/1376-1779/1428) -45.0 W55-W61 N03-N07
      2 1415 1372 (N13W32 L=241)   345     72        1 (1380/1347-1446/1401)  11.3 W29-W34 N12-N14
      3 1622 1276 (N02W42 L=251)   538    142        0 (1575/1217-1667/1331)  16.7 W37-W47 N00-N03
      4  808 1266 (N23E06 L=203)   261    134        0 ( 742/1251- 859/1288) -23.2 E09-E02 N21-N26
      5 1162 1152 (N08W11 L=220)  1041    231        3 (1096/1081-1257/1207)  -5.7 W06-W16 N04-N11
      6  135 1141 (N32E68 L=141)   744     71        2 ( 107/1107- 161/1169) -20.0 E74-E63 N29-N33
      7 1747 1113 (S10W47 L=256)   382    104        1 (1721/1069-1775/1162) -74.1 W45-W48 S13-S06
      8  503 1079 (N20E30 L=179)   256     88        1 ( 458/1067- 553/1093) -15.9 E33-E26 N19-N21
      9  382  997 (N18E41 L=168)   431    116        0 ( 353/ 941- 406/1047)  39.8 E44-E37 N15-N20
     10  229  896 (N16E57 L=152)   332     69        1 ( 194/ 878- 258/ 913) -26.6 E60-E54 N14-N17
     11  776  855 (N02E18 L=191)   470    138        2 ( 728/ 791- 816/ 908) -81.9 E19-E16 S02-N05
     12 1449  725 (S23W17 L=226)  1719    385        2 (1336/ 576-1531/ 875)  35.8 W06-W25 S29-S16
     13 1056  813 (S08E04 L=205)   365     99        0 (1006/ 783-1087/ 848)  11.3 E06-E01 S08-S06
     14 1849  722 (S38W55 L=264)  1621    147        4 (1783/ 681-1905/ 770)   0.0 W45-W65 S40-S34
     15  738  735 (S04E23 L=185)   273    100        2 ( 688/ 710- 791/ 756) -33.7 E26-E20 S06-S02
     16  677  671 (S06E29 L=180)   373    150        0 ( 657/ 598- 713/ 731)  77.5 E30-E26 S11-S02
     17  915  614 (S15E17 L=192)   975    360        2 ( 789/ 537-1024/ 697)   6.3 E26-E08 S19-S12
     18  284  594 (S03E63 L=146)  3807    244       10 ( 199/ 498- 360/ 692) -67.4 E69-E55 S09-N03
     19 1131  665 (S18E03 L=205)   246     80        1 (1099/ 646-1175/ 684) -45.0 E05-E01 S19-S16
     20  862  653 (S12E19 L=190)   201     34        1 ( 837/ 634- 880/ 675)   0.0 E20-E17 S13-S10
     21 1051  640 (S17E09 L=200)   228     59        2 (1030/ 618-1070/ 668)  18.4 E10-E07 S18-S15
     22  628  386 (S22E45 L=164)  2584    443        6 ( 460/ 283- 807/ 521)   5.6 E69-E28 S26-S16
     23 1262  435 (S37E02 L=207)   374     68        1 (1235/ 404-1294/ 471)  26.6 E04-W00 S38-S34
     24  347  415 (S15E70 L=139)  1537     93        2 ( 313/ 378- 375/ 465)  21.8 E82-E63 S17-S11
  

    OPENR, u, binfile, /COMP, /GET_LUN
    head = FLTARR(6) ;[xsize,ysize,radius,hh,mm,ss]
    READU, u, head
    data = INTARR(FIX(head[0]),FIX(head[1]))
    READU, u, data
    FREE_LUN, u
    

• each filament has the value of Fil_ID
• all values are in pixel

  c = WHERE(data EQ Fil_ID, area)
  f = '(2(A,I6))'
  PRINT, FORM=f, "Area of Fil_ID", Fil_ID," =", area 

  data = ROTATE(data,7)
  Solar_y = 2048-Solar_y