Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1524 1541 (N19W47 L=240)   385    110        1 (1472/1522-1580/1558) -39.8 W44-W50 N16-N21
      2 1618 1472 (N12W51 L=243)   747    152        1 (1557/1434-1671/1519)   4.4 W44-W57 N11-N13
      3 1014 1375 (N24W09 L=201)   374    200        0 ( 937/1355-1077/1421) -45.0 W05-W13 N21-N28
      4 1404 1262 (N08W28 L=220)   913    155        3 (1358/1207-1469/1326)  56.3 W24-W32 N05-N11
      5 1888 1196 (S10W65 L=257)  1231    141        2 (1862/1148-1919/1265) -76.0 W61-W69 S13-S05
      6  759 1186 (N20E11 L=181)   582    287        1 ( 631/1141- 868/1236)  -3.6 E19-E03 N18-N21
      7  584 1079 (N18E24 L=168)   375    113        1 ( 566/1024- 611/1132)  51.3 E26-E22 N15-N20
      8  387 1077 (N23E39 L=154)   426    110        1 ( 349/1023- 418/1124) -66.8 E41-E36 N18-N25
      9 1540 1083 (S06W31 L=223)   397    107        0 (1492/1065-1595/1111) -33.7 W28-W34 S08-S02
     10 1033  969 (N01E01 L=191)   527    115        2 ( 990/ 908-1069/1016) -71.6 E02-W00 S02-N04
     11 1251  931 (S06W10 L=202)   876    288        1 (1171/ 876-1342/1014) -45.0 W06-W15 S09-N00
     12 1263  952 (S05W11 L=204)   187     50        2 (1246/ 922-1277/ 980)  76.0 W09-W12 S07-S03
     13 1600  723 (S28W28 L=220)  3163    598        4 (1422/ 488-1729/ 958)  32.8 W10-W42 S38-S18
     14  131  859 (N15E71 L=121)  2573    190        7 (  90/ 797- 168/ 941)  58.0 E81-E64 N11-N19
     15  914  770 (S07E12 L=180)   354    110        0 ( 894/ 720- 941/ 822)  80.5 E13-E10 S09-S03
     16  192  792 (N10E64 L=128)   721    102        3 ( 161/ 759- 225/ 821) -36.9 E69-E60 N08-N11
     17 1209  776 (S14W04 L=196)   534    144        1 (1173/ 716-1264/ 808)  23.2 W00-W07 S16-S12
     18 1282  754 (S17W08 L=200)   247     52        0 (1266/ 723-1298/ 788)  63.4 W06-W08 S18-S14
     19  455  664 (S02E44 L=148)  1434    233        2 ( 385/ 566- 516/ 758) -76.0 E46-E41 S08-N04
     20 1092  657 (S17E06 L=187)   242     88        0 (1075/ 616-1112/ 692)  68.2 E06-E04 S20-S15
     21  649  551 (S13E35 L=157)   310     47        1 ( 620/ 524- 674/ 572) -90.0 E36-E33 S14-S11
     22  446  426 (S16E57 L=135)  2616    271        7 ( 363/ 345- 536/ 527)  14.5 E75-E44 S20-S11
     23  734  394 (S24E37 L=155)  1819    407        2 ( 586/ 317- 928/ 467)   0.0 E52-E21 S26-S22
  

    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