Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1382 1730 (N44W50 L=236)   891    119        2 (1319/1705-1437/1750) -26.6 W44-W55 N41-N46
      2  867 1632 (N48E01 L=185)  1792    413        3 ( 690/1568-1055/1672) -21.8 E17-W13 N40-N53
      3 1389 1589 (N34W39 L=225)  1672    289        2 (1258/1554-1522/1613) -12.8 W27-W49 N30-N36
      4  638 1512 (N43E22 L=163)   322     75        1 ( 607/1492- 687/1535) -26.6 E25-E17 N40-N45
      5 1531 1405 (N20W41 L=227)   886    315        2 (1497/1314-1577/1507)  47.7 W38-W49 N14-N25
      6  831 1456 (N36E06 L=179)   353     94        1 ( 794/1438- 882/1470) -15.9 E09-E02 N34-N37
      7 1062 1324 (N24W07 L=193)   197    113        0 (1021/1307-1116/1352) -38.7 W05-W10 N21-N26
      8  747 1255 (N24E14 L=171)   683    336        1 ( 591/1235- 895/1271) -10.8 E25-E04 N21-N26
      9  813 1045 (N10E13 L=173)   955    451        2 ( 634/ 990- 983/1096)   0.0 E24-E01 N08-N12
     10 1077 1068 (N08W04 L=189)   191     53        0 (1056/1046-1103/1084)  18.4 W02-W05 N07-N09
     11  211 1000 (N14E61 L=125)  1041    177        2 ( 191/ 905- 228/1075)  84.8 E63-E58 N07-N18
     12 1500  966 (S05W29 L=214)   241     81        0 (1467/ 940-1540/ 987) -11.3 W26-W31 S06-S03
     13 1602  791 (S18W34 L=220)  2627    433        7 (1496/ 639-1660/ 979)  65.8 W26-W39 S26-S06
     14 1214  936 (S02W10 L=195)   234     75        1 (1183/ 918-1244/ 953) -18.4 W08-W11 S02-N00
     15  356  868 (N05E47 L=138)   537    108        1 ( 328/ 832- 389/ 928) -63.4 E49-E44 N02-N08
     16  777  850 (S01E18 L=168)   629    268        2 ( 638/ 827- 879/ 868) -14.9 E26-E11 S03-N01
     17 1814  816 (S21W55 L=241)   445     51        0 (1792/ 795-1833/ 844)  45.0 W52-W57 S22-S19
     18  998  777 (S08E05 L=180)   440    132        4 ( 960/ 732-1039/ 810)  38.7 E07-E02 S10-S06
     19 1830  739 (S27W59 L=244)   622    105        1 (1803/ 695-1856/ 783)  39.8 W55-W61 S29-S24
     20  797  687 (S11E19 L=166)   400    112        3 ( 748/ 661- 852/ 712)   0.0 E22-E15 S12-S09
     21  277  651 (S08E61 L=124)   597     98        0 ( 261/ 607- 292/ 700)  45.0 E65-E58 S11-S05
     22  213  643 (S09E72 L=114)   953    106        2 ( 193/ 592- 237/ 697)  66.8 E74-E69 S12-S05
     23  887  588 (S18E16 L=170)   283    139        0 ( 824/ 564- 931/ 628)  15.9 E19-E12 S19-S16
     24 1040  456 (S30E09 L=177)   684    134        1 (1002/ 391-1084/ 502)  36.9 E12-E04 S34-S26
  

    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