Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1346 1680 (N46W34 L=188)   373     32        1 (1324/1658-1374/1697) -11.3 W32-W37 N44-N47
      2 1614 1663 (N42W65 L=218)   699     78        1 (1572/1641-1648/1686) -11.3 W59-W70 N40-N43
      3 1526 1528 (N33W43 L=196)   300     35        2 (1500/1505-1550/1547) -26.6 W41-W45 N31-N34
      4  575 1424 (N31E32 L=122)   434    101        2 ( 550/1373- 599/1476) -54.5 E34-E29 N27-N34
      5  198 1363 (N26E73 L= 80)  1081    132        2 ( 162/1311- 225/1421)  69.4 E77-E69 N22-N30
      6  905 1294 (N22E07 L=147)   960    285        2 ( 824/1235- 985/1342)  11.3 E12-E01 N17-N24
      7  476 1300 (N23E38 L=116)   595    173        2 ( 416/1269- 546/1336)   0.0 E43-E32 N20-N25
      8 1543 1277 (N17W37 L=190)   385     67        0 (1525/1238-1569/1309)  45.0 W34-W39 N14-N18
      9 1532  903 (S06W32 L=186)   646    167        1 (1479/ 845-1581/ 952) -41.2 W28-W36 S09-S02
     10 1072  861 (S06W02 L=156)   498    209        0 (1009/ 794-1130/ 892) -39.8 E01-W05 S10-S03
     11 1833  801 (S15W61 L=215)   536     67        1 (1811/ 771-1855/ 837)  53.1 W58-W63 S16-S12
     12  966  775 (S11E05 L=149)   368    133        0 ( 939/ 716-1001/ 822)  56.3 E06-E02 S14-S07
     13 1233  721 (S15W12 L=165)   979    334        3 (1116/ 620-1326/ 812)  37.6 W04-W18 S21-S09
     14  565  724 (S13E32 L=122)   545    199        0 ( 526/ 640- 612/ 796)  51.3 E35-E27 S18-S08
     15  241  748 (S12E61 L= 92)  1027     91        3 ( 209/ 706- 272/ 793) -80.5 E64-E57 S14-S08
     16 1103  726 (S14W04 L=157)   375    168        0 (1025/ 706-1176/ 741) -12.5 E01-W08 S16-S13
     17  395  672 (S16E47 L=107)   778    191        3 ( 343/ 629- 458/ 707) -12.5 E51-E41 S19-S13
     18 1517  622 (S24W33 L=186)  1426    275        2 (1423/ 518-1604/ 703)  42.5 W26-W39 S30-S19
     19  331  540 (S26E59 L= 94)   901     85        2 ( 301/ 510- 358/ 590)  31.0 E64-E54 S27-S21
     20  589  502 (S28E35 L=119)   441    148        0 ( 569/ 440- 603/ 556)  53.1 E37-E31 S32-S24
     21 1485  464 (S35W34 L=187)   525    156        1 (1395/ 419-1535/ 491)  20.0 W26-W38 S38-S33
     22  635  294 (S45E42 L=112)   502     26        1 ( 612/ 272- 656/ 313) -71.6 E44-E38 S47-S43
     23 1373  214 (S60W38 L=191)  1595    135        1 (1330/ 173-1416/ 251) -21.3 W27-W63 S67-S53
  

    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