Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  937 1832 (N56E02 L=312)   649    110        1 ( 887/1805- 989/1850) -16.7 E07-W03 N52-N58
      2  689 1671 (N42E23 L=290)   672    161        2 ( 626/1631- 769/1713) -25.0 E30-E15 N38-N46
      3 1042 1618 (N36W05 L=319)   734    282        2 ( 906/1603-1167/1634)  -9.5 E05-W14 N34-N37
      4 1758 1558 (N29W67 L= 21)  1472    162        0 (1693/1501-1824/1610) -33.7 W60-W75 N24-N32
      5  726 1469 (N27E18 L=296)  2189    629        3 ( 451/1347- 976/1538) -19.3 E41-E01 N17-N33
      6 1542 1472 (N23W39 L=353)   996    247        2 (1448/1422-1626/1527) -30.3 W32-W44 N19-N27
      7 1446 1328 (N14W29 L=342)  1095    419        5 (1296/1246-1600/1437) -35.8 W19-W38 N08-N21
      8 1078 1319 (N15W05 L=319)   724    265        2 (1020/1241-1146/1420) -79.7 W01-W08 N10-N21
      9  407 1336 (N21E41 L=273)   515    141        0 ( 385/1288- 445/1403) -60.3 E43-E37 N17-N24
     10 1689 1324 (N13W47 L=  1)   527    106        1 (1655/1279-1709/1374)  56.3 W44-W49 N10-N16
     11  695 1322 (N18E19 L=294)   360    164        0 ( 669/1257- 753/1369)  60.3 E21-E15 N13-N20
     12 1892 1247 (N08W69 L= 22)  1772    124        2 (1865/1188-1930/1305)  45.0 W63-W76 N04-N11
     13  175 1170 (N12E63 L=251)  2473    233        4 ( 134/1076- 246/1274) -33.7 E71-E53 N05-N18
     14 1807 1054 (S03W55 L=  9)   610     72        1 (1779/1007-1835/1079)  51.3 W51-W57 S06-S01
     15 1194  899 (S10W10 L=323)  1158    338        3 (1111/ 766-1291/1036)  58.0 W04-W16 S18-S02
     16 1754  985 (S07W49 L=  3)   422     61        1 (1732/ 955-1776/1031)  78.7 W47-W51 S09-S04
     17  819  805 (S14E14 L=300)   285    141        0 ( 769/ 748- 846/ 863)  49.4 E17-E11 S17-S10
     18 1815  789 (S19W58 L= 12)   439    112        1 (1782/ 733-1839/ 835)  63.4 W55-W60 S22-S16
     19 1266  578 (S31W14 L=328)   875    243        3 (1193/ 491-1335/ 690)  58.4 W09-W18 S36-S23
     20  570  582 (S27E35 L=279)   468    148        0 ( 539/ 521- 603/ 653)  41.6 E39-E30 S30-S22
     21  833  430 (S39E19 L=295)   725    163        2 ( 773/ 410- 925/ 464) -20.0 E23-E11 S40-S36
     22  541  375 (S41E47 L=266)   628     68        0 ( 505/ 358- 583/ 395) -14.0 E51-E42 S42-S39
  

    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