Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1547 1666 (N39W44 L= 77)   434     51        1 (1521/1645-1570/1695)  29.7 W40-W47 N37-N41
      2 1316 1599 (N33W21 L= 54)   323    103        0 (1264/1582-1366/1612)  -8.1 W17-W24 N31-N34
      3 1812 1464 (N25W64 L= 97)  1571    139        1 (1768/1417-1856/1530) -54.5 W60-W70 N22-N29
      4  229 1452 (N25E65 L=328)   955    133        4 ( 193/1410- 260/1503) -26.6 E73-E59 N21-N28
      5  492 1271 (N12E34 L=358)   720    165        0 ( 471/1211- 526/1360) -71.6 E36-E31 N08-N17
      6  317 1224 (N10E48 L=345)   488    130        0 ( 293/1168- 350/1287)  74.1 E49-E45 N06-N13
      7  386 1220 (N09E42 L=351)   246     32        0 ( 369/1200- 402/1242)  45.0 E43-E40 N07-N10
      8  707 1081 (N00E19 L= 13)   907    284        1 ( 581/1027- 821/1117)   7.6 E27-E12 S02-N02
      9 1004  809 (S16E01 L= 31)  2079    696        3 ( 852/ 553-1074/1100)  71.6 E12-W02 S32-N01
     10 1790  981 (S05W52 L= 85)   375     43        2 (1764/ 957-1812/1010)  45.0 W50-W54 S06-S02
     11  666  898 (S11E22 L= 10)   984    344        5 ( 572/ 855- 804/ 951)  -7.6 E28-E13 S13-S07
     12 1783  893 (S10W53 L= 85)   699     98        1 (1755/ 853-1814/ 945)  56.3 W50-W55 S12-S06
     13 1720  901 (S10W47 L= 79)   411     59        1 (1698/ 864-1743/ 932) -76.0 W44-W48 S11-S07
     14 1761  795 (S16W52 L= 85)  1689    341        2 (1672/ 713-1871/ 867)  27.9 W45-W63 S21-S11
     15 1570  761 (S19W36 L= 69)   786    237        0 (1514/ 668-1601/ 864)  80.5 W33-W38 S24-S12
     16 1183  835 (S15W10 L= 42)   226     34        0 (1159/ 812-1207/ 856)  45.0 W08-W11 S15-S13
     17  731  804 (S16E18 L= 14)   250     73        1 ( 688/ 786- 768/ 831)   0.0 E21-E15 S17-S14
     18  432  689 (S23E42 L=351)  1312    328        3 ( 320/ 596- 521/ 827)  36.4 E54-E32 S28-S14
     19  601  738 (S20E28 L=  5)   338    121        1 ( 561/ 705- 659/ 780) -26.6 E30-E23 S22-S17
     20 1426  666 (S25W27 L= 60)   411    134        2 (1361/ 651-1496/ 689) -11.3 W22-W32 S25-S23
     21  498  418 (S41E46 L=346)  3724    348        9 ( 328/ 368- 667/ 484)   5.5 E80-E28 S43-S36
     22 1530  353 (S46W49 L= 81)  3841    401        5 (1379/ 256-1700/ 449)  31.0 W37-W65 S55-S38
  

    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