Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1191 1741 (N49W34 L=178)  1847    382        4 (1023/1706-1355/1776) -11.0 W17-W48 N43-N52
      2 1156 1621 (N41W24 L=167)   348     72        1 (1119/1603-1196/1637) -18.4 W20-W26 N39-N42
      3 1327 1609 (N37W36 L=180)   352     62        2 (1293/1586-1364/1624)  -9.5 W33-W39 N35-N38
      4 1624 1390 (N17W48 L=192)   748    247        0 (1531/1339-1717/1416) -28.3 W41-W54 N11-N19
      5 1340 1190 (N11W22 L=166)   738    265        1 (1241/1151-1440/1235) -17.1 W16-W29 N07-N15
      6 1895 1103 (S07W68 L=211)  4190    243        5 (1847/1020-1935/1184) -70.0 W60-W76 S13-S02
      7  322 1078 (N19E48 L= 95)   845    179        1 ( 300/1001- 355/1175) -70.0 E50-E45 N13-N24
      8  737 1032 (N11E17 L=126)   394    109        1 ( 710/ 985- 763/1092)  63.4 E19-E15 N08-N14
      9 1342 1019 (N01W19 L=163)   704    268        0 (1229/ 987-1467/1037)  -3.6 W11-W27 S01-N02
     10 1543  907 (S10W30 L=174)  1653    328        5 (1437/ 827-1638/1019)  29.7 W22-W37 S12-S04
     11 1791  972 (S11W52 L=196)   475     80        0 (1772/ 935-1808/1009)  76.0 W50-W53 S13-S09
     12  865  943 (N04E11 L=133)   215     51        1 ( 843/ 922- 893/ 970) -56.3 E12-E09 N02-N05
     13 1378  846 (S10W19 L=162)   356     47        1 (1358/ 811-1398/ 881) -90.0 W17-W19 S12-S07
     14 1544  819 (S15W30 L=173)   601    148        1 (1513/ 738-1570/ 874)  60.3 W26-W32 S19-S11
     15  351  834 (N04E48 L= 95)   325     75        0 ( 326/ 808- 377/ 864) -45.0 E50-E46 N02-N05
     16  756  674 (S11E22 L=121)   499    175        0 ( 697/ 624- 802/ 747)  36.9 E27-E18 S13-S06
     17  356  682 (S06E52 L= 92)   818    110        2 ( 316/ 633- 394/ 729) -71.6 E54-E49 S08-S02
     18  529  557 (S15E42 L=102)  2219    437        9 ( 427/ 392- 623/ 712) -87.5 E45-E37 S27-S04
     19 1611  614 (S30W35 L=178)  1169    199        2 (1548/ 554-1678/ 701)  32.5 W29-W40 S33-S25
     20  605  625 (S12E34 L=110)   418     78        2 ( 571/ 599- 652/ 656) -45.0 E35-E30 S13-S09
     21  352  597 (S11E56 L= 88)   463     68        1 ( 325/ 566- 375/ 631)  78.7 E58-E53 S13-S08
     22  765  515 (S21E26 L=118)   262     61        3 ( 734/ 493- 792/ 531) -45.0 E27-E23 S22-S19
     23  404  380 (S27E67 L= 77)   972     54        3 ( 377/ 355- 429/ 405) -71.6 E72-E61 S29-S24
     24  728  368 (S31E35 L=109)   460    108        0 ( 692/ 343- 783/ 393)  18.4 E38-E29 S32-S29
     25 1115  225 (S52E12 L=132)   772    108        2 (1079/ 199-1167/ 253) -14.0 E15-E06 S54-S47
  

    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