Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1077 1702 (N49W21 L=180)  2144    407        3 ( 887/1660-1262/1736) -13.6 W03-W36 N43-N52
      2 1560 1679 (N35W63 L=222)  2341    254        4 (1445/1626-1657/1718)  -7.6 W47-W79 N31-N37
      3 1085 1563 (N39W15 L=174)   920    254        1 ( 977/1529-1208/1591) -19.4 W07-W24 N35-N42
      4 1769 1456 (N17W68 L=226)   806    122        0 (1731/1412-1808/1508) -66.8 W65-W70 N13-N20
      5 1004 1334 (N25W04 L=162)   390    165        0 ( 929/1320-1083/1346)  -5.7 E01-W09 N23-N26
      6 1466 1314 (N16W34 L=192)   744    305        1 (1349/1263-1595/1345) -31.0 W26-W41 N10-N19
      7  192 1083 (N20E63 L= 95)  1297    273        0 ( 175/ 966- 220/1222) -72.6 E68-E59 N12-N28
      8 1357 1178 (N10W23 L=181)   267     83        0 (1317/1157-1398/1195)   0.0 W20-W25 N09-N10
      9 1191 1149 (N11W12 L=170)   246    103        1 (1149/1108-1230/1179)  31.0 W08-W14 N09-N12
     10 1074 1116 (N11W04 L=163)   406    137        0 (1023/1084-1130/1165) -45.0 W02-W07 N08-N14
     11  516 1015 (N13E33 L=126)   636    176        1 ( 479/ 938- 542/1089) -90.0 E34-E30 N08-N17
     12 1879  997 (S12W64 L=222)  1850    169        9 (1845/ 926-1912/1082)  45.0 W58-W69 S15-S07
     13 1812 1012 (S09W55 L=213)  1200    202        6 (1764/ 931-1848/1073) -90.0 W50-W59 S14-S05
     14 1620 1035 (S04W38 L=197)   395     82        3 (1585/ 997-1651/1065) -90.0 W35-W40 S05-S01
     15 1183  962 (N00W08 L=167)   527    279        1 (1044/ 944-1293/ 989)  -7.6 W00-W15 S01-N02
     16 1769  911 (S14W49 L=208)   522     95        1 (1735/ 882-1811/ 939)   8.1 W46-W54 S15-S12
     17  637  901 (N04E26 L=133)   256     69        0 ( 612/ 876- 663/ 931) -56.3 E26-E24 N02-N06
     18 1371  858 (S09W18 L=177)   649    168        5 (1314/ 832-1431/ 897)   0.0 W14-W22 S11-S06
     19 1210  796 (S10W08 L=166)   759    156        6 (1168/ 746-1271/ 860)  71.6 W05-W11 S12-S06
     20 1862  780 (S26W62 L=221)  1464    139        3 (1814/ 739-1902/ 843)  13.0 W55-W69 S28-S22
     21 1327  754 (S15W14 L=173)   525    147        4 (1287/ 690-1363/ 803)  50.2 W11-W17 S18-S12
     22  347  606 (S11E56 L=103)  3510    428        4 ( 238/ 479- 467/ 774) -67.2 E62-E47 S20-N00
     23  494  634 (S10E42 L=117)   780    175        1 ( 447/ 594- 551/ 712) -63.4 E43-E37 S13-S04
     24  400  638 (S09E49 L=109)   876    165        0 ( 354/ 579- 444/ 704) -66.0 E51-E46 S13-S04
     25  233  642 (S08E68 L= 90)   807     68        1 ( 216/ 598- 251/ 677)  40.6 E73-E64 S11-S05
     26 1408  550 (S30W18 L=176)   760    134        0 (1362/ 493-1457/ 604)  40.6 W14-W21 S33-S27
     27  581  508 (S19E39 L=119)   381     78        2 ( 557/ 467- 599/ 543)  68.2 E40-E36 S22-S17
     28  451  433 (S23E55 L=104)   450     59        0 ( 434/ 403- 473/ 461)  29.7 E58-E50 S25-S21
     29  560  338 (S32E51 L=107)   734     90        2 ( 528/ 303- 599/ 365)  18.4 E58-E46 S34-S29
     30  982  235 (S48E22 L=136)  1357    250        1 ( 889/ 167-1075/ 315)  24.8 E37-E11 S53-S41
  

    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