Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1091 1784 (N44E16 L= 43)   413     70        1 (1068/1746-1111/1814) -63.4 E18-E14 N40-N46
      2 1181 1620 (N33E04 L= 56)   407     95        1 (1131/1595-1231/1651)   0.0 E07-W00 N31-N34
      3 1374 1520 (N31W11 L= 71)   993    166        2 (1315/1457-1435/1580) -26.6 W06-W16 N27-N34
      4 1648 1500 (N38W34 L= 94)  1580    183        1 (1611/1399-1669/1579)  85.9 W30-W37 N30-N44
      5 1594 1295 (N22W30 L= 90)   274     61        1 (1566/1260-1610/1330)  90.0 W27-W31 N19-N24
      6  495 1297 (S01E38 L= 22)   317     63        0 ( 473/1268- 524/1321)  45.0 E39-E36 S02-N00
      7 1692 1086 (N12W40 L=100)  1923    526        4 (1642/ 854-1732/1281) -64.4 W33-W46 S01-N22
      8  439 1222 (S06E41 L= 19)   304     78        0 ( 407/1204- 480/1243)   0.0 E43-E37 S07-S04
      9  660 1204 (S04E25 L= 35)   278     76        0 ( 621/1173- 684/1223) -14.0 E27-E23 S05-S02
     10 1869 1061 (N16W58 L=118)  2567    333        5 (1810/ 912-1911/1190) -56.3 W50-W65 N07-N22
     11 1814 1079 (N15W52 L=111)   413     70        2 (1783/1047-1836/1115) -31.0 W48-W54 N13-N16
     12  278  958 (S24E51 L=  9)   536    133        2 ( 260/ 899- 294/1019) -66.8 E52-E49 S27-S20
     13  396  653 (S41E41 L= 19)   360     90        1 ( 360/ 621- 438/ 680)  29.1 E45-E35 S44-S39
     14 1725  644 (S11W57 L=117)   633     91        1 (1695/ 597-1749/ 677)  80.5 W53-W60 S14-S08
     15 1214  611 (S26W22 L= 82)   338    101        0 (1167/ 574-1253/ 643) -14.0 W17-W25 S27-S25
     16 1430  532 (S25W39 L= 99)   983    178        4 (1359/ 472-1493/ 588) -12.1 W33-W47 S27-S23
     17 1757  565 (S14W66 L=126)   449     72        0 (1722/ 547-1786/ 583)  15.9 W61-W69 S15-S12
     18 1618  473 (S23W58 L=118)   355     64        1 (1584/ 451-1648/ 497)  36.9 W55-W60 S25-S21
     19 1354  398 (S35W42 L=102)   844    159        1 (1286/ 372-1430/ 438)   8.1 W34-W48 S36-S33
     20 1274  332 (S42W41 L=101)   466     85        0 (1250/ 290-1292/ 366) -21.8 W36-W46 S44-S39
     21 1554  306 (S34W70 L=129)   765    108        1 (1502/ 286-1608/ 329)  36.9 W64-W74 S36-S30
     22 1361  242 (S45W59 L=118)   803     86        1 (1332/ 201-1386/ 280) -24.4 W53-W65 S47-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