Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  759 1708 (N31E34 L=133)   381     35        1 ( 737/1685- 781/1730) -21.8 E36-E31 N29-N33
      2  408 1653 (N23E62 L=105)  1802    152        2 ( 371/1591- 476/1720) -48.0 E70-E52 N18-N28
      3  910 1600 (N26E19 L=148)   388     80        0 ( 891/1557- 937/1643)  90.0 E20-E17 N23-N29
      4  470 1567 (N17E49 L=117)   588     61        2 ( 441/1541- 508/1598)  18.4 E52-E45 N15-N19
      5 1802 1275 (N25W51 L=217)  2644    311        6 (1756/1149-1864/1363)  85.9 W45-W59 N17-N31
      6  251 1299 (S01E59 L=107)   777     72        2 ( 222/1260- 285/1338) -53.1 E63-E55 S03-N01
      7 1536 1261 (N17W27 L=194)   561    138        1 (1512/1192-1572/1318)  77.5 W25-W29 N12-N21
      8 1607 1138 (N11W34 L=201)   338     95        1 (1584/1070-1623/1175) -71.6 W32-W35 N07-N13
      9  442 1089 (S12E38 L=129)   375     81        2 ( 418/1060- 469/1120) -56.3 E39-E36 S13-S09
     10  316 1098 (S13E49 L=118)   333     78        1 ( 278/1071- 352/1118)   9.5 E51-E45 S14-S11
     11  711  960 (S16E18 L=149)   339     89        0 ( 672/ 924- 739/ 996)  59.0 E19-E15 S18-S13
     12  174  729 (S36E71 L= 96)   693     43        0 ( 147/ 711- 209/ 745)   4.1 E77-E63 S37-S35
     13  831  698 (S29E06 L=160)  1144    331        4 ( 672/ 652- 982/ 735)   5.4 E17-W04 S31-S26
     14 1460  651 (S19W36 L=202)   376    141        0 (1412/ 607-1487/ 706)  74.1 W33-W37 S22-S15
     15 1711  577 (S17W60 L=226)  1212    238        2 (1625/ 512-1786/ 666)  56.3 W54-W63 S22-S10
     16  371  590 (S44E46 L=120)   949    160        0 ( 307/ 561- 434/ 645)  21.3 E55-E37 S46-S39
     17  957  564 (S35W05 L=172)   247     62        0 ( 933/ 528- 985/ 591)  68.2 W04-W06 S38-S33
     18 1547  479 (S27W51 L=217)   384     66        0 (1513/ 464-1582/ 494)   9.5 W47-W53 S27-S25
     19  552  419 (S55E29 L=137)  1308    204        2 ( 463/ 378- 648/ 457)  15.9 E46-E18 S59-S49
     20 1593  315 (S35W73 L=239)   824     88        0 (1557/ 300-1640/ 332)   7.6 W65-W80 S36-S32
     21  508  283 (S69E53 L=114)   706    110        0 ( 463/ 272- 570/ 299)   0.0 E68-E36 S69-S67
  

    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