Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1566 1626 (N44W49 L= 45)   807     88        0 (1525/1591-1608/1660) -45.0 W45-W53 N41-N46
      2  719 1538 (N35E26 L=330)   413     83        1 ( 696/1498- 740/1574) -56.3 E28-E23 N31-N37
      3 1025 1465 (N31E02 L=354)   491    235        0 ( 937/1398-1114/1498) -24.4 E07-W04 N26-N33
      4 1708 1468 (N32W56 L= 52)   648     67        2 (1678/1439-1734/1491) -36.9 W53-W59 N30-N34
      5 1467 1422 (N29W31 L= 26)   466    217        2 (1380/1357-1527/1468) -21.8 W24-W35 N24-N32
      6 1007 1389 (N26E03 L=353)   371    211        0 ( 929/1320-1076/1437) -35.0 E08-W02 N21-N28
      7  210 1269 (N14E65 L=290)  1509    119        3 ( 183/1213- 240/1335) -74.1 E69-E61 N10-N17
      8  580 1297 (N18E31 L=325)   259     49        1 ( 557/1270- 601/1321) -33.7 E32-E28 N16-N19
      9 1298 1197 (N14W17 L= 12)   235     87        0 (1258/1168-1325/1229) -45.0 W14-W18 N12-N16
     10 1799  921 (S02W56 L= 52)  1000    139        2 (1766/ 869-1839/ 982) -45.0 W52-W61 S05-N01
     11  757  898 (S06E16 L=339)   222     95        2 ( 740/ 854- 778/ 947)  90.0 E17-E14 S08-S02
     12  632  879 (S08E24 L=331)   496    170        4 ( 589/ 800- 674/ 935)  53.1 E27-E21 S12-S04
     13 1215  816 (S09W13 L=  8)   475    203        0 (1164/ 746-1279/ 900) -48.4 W09-W17 S13-S04
     14 1045  650 (S21W03 L=358)   656    168        3 ( 989/ 587-1085/ 730) -77.5 W00-W05 S24-S15
     15  540  688 (S20E32 L=323)   247    103        1 ( 503/ 660- 593/ 718) -18.4 E34-E28 S21-S18
     16 1156  670 (S19W10 L=  5)   555    148        4 (1109/ 599-1183/ 717) -76.0 W06-W11 S23-S15
     17  546  535 (S31E34 L=321)  1324    269        4 ( 492/ 480- 663/ 623) -26.6 E37-E24 S35-S24
     18  261  581 (S30E66 L=289)  1439     99        1 ( 214/ 560- 312/ 601)   8.4 E83-E56 S32-S28
     19  918  555 (S28E06 L=350)   660    151        3 ( 842/ 513- 975/ 599)  26.6 E11-E01 S30-S24
     20 1667  516 (S29W55 L= 50)   740     69        1 (1633/ 487-1701/ 538)  36.9 W49-W58 S30-S27
     21 1550  460 (S33W45 L= 40)   471     66        3 (1523/ 442-1587/ 481) -14.0 W41-W49 S34-S31
  

    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