Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  441 1634 (N15E59 L=168)  1664    308        3 ( 328/1538- 538/1704)  52.4 E65-E54 N07-N21
      2  940 1577 (N24E22 L=206)   315     83        1 ( 912/1541- 970/1612)  90.0 E22-E20 N21-N27
      3  650 1566 (N16E39 L=188)   276     98        0 ( 617/1528- 672/1594) -26.6 E42-E35 N13-N16
      4  591 1434 (N06E37 L=190)   521    101        1 ( 543/1412- 637/1463)  38.7 E40-E34 N04-N09
      5 1507 1282 (N23W21 L=249)   966    181        1 (1451/1204-1544/1376) -38.7 W15-W25 N19-N27
      6 1204 1309 (N15W02 L=230)   447    104        2 (1163/1256-1235/1365)  82.9 W00-W03 N11-N19
      7  473 1210 (S09E38 L=189)   700    209        1 ( 439/1114- 495/1322) -72.9 E41-E36 S15-S02
      8  340 1078 (S20E45 L=182)   716    211        1 ( 268/1045- 421/1115)  32.5 E51-E39 S22-S15
      9 1095 1077 (S01W02 L=230)   222     57        1 (1076/1042-1121/1106) -14.0 W00-W04 S02-N00
     10  733 1065 (S11E17 L=210)   218    131        0 ( 667/1055- 793/1077)  20.6 E21-E13 S12-S09
     11  761 1030 (S12E15 L=212)   264    107        0 ( 709/1004- 809/1045)   9.5 E17-E11 S13-S10
     12  863  840 (S20E04 L=223)   215     67        1 ( 833/ 811- 894/ 873) -21.8 E06-E01 S20-S18
     13 1253  793 (S12W19 L=247)   196     52        1 (1224/ 776-1280/ 808)  18.4 W17-W20 S12-S10
     14  910  631 (S31W05 L=232)  1327    421        1 ( 801/ 524-1067/ 802) -24.4 E04-W18 S33-S22
     15  259  763 (S41E49 L=178)   612    159        1 ( 219/ 743- 309/ 792)  11.3 E53-E43 S42-S39
     16 1141  738 (S18W15 L=242)   200     67        0 (1125/ 714-1162/ 782) -63.4 W13-W16 S19-S15
     17 1072  688 (S23W13 L=240)   434    164        2 (1004/ 653-1120/ 735)  50.2 W08-W15 S24-S18
     18 1148  590 (S26W21 L=248)   258     68        0 (1126/ 568-1176/ 624) -26.6 W18-W22 S27-S24
     19 1559  584 (S13W47 L=274)   667    104        1 (1525/ 544-1608/ 613)  63.4 W44-W49 S16-S10
     20 1059  244 (S51W37 L=265)  3102    491        5 ( 980/ 152-1152/ 343) -11.7 W24-W53 S56-S45
     21 1430  314 (S32W54 L=282)   394     42        0 (1411/ 293-1459/ 329)  71.6 W52-W55 S33-S30
     22 1350  276 (S37W52 L=279)   798    118        1 (1322/ 241-1382/ 314) -45.0 W47-W55 S40-S35
     23 1202  245 (S45W46 L=273)   942    130        1 (1163/ 211-1252/ 286) -11.3 W40-W50 S46-S42
  

    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