Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  883 1748 (N46E10 L= 76)   300     36        0 ( 861/1727- 908/1768)  14.0 E11-E07 N43-N47
      2  907 1669 (N39E07 L= 78)   242     36        0 ( 887/1653- 934/1690) -45.0 E08-E05 N37-N40
      3 1534 1555 (N30W39 L=124)  2586    425        3 (1372/1474-1714/1646) -25.6 W27-W53 N24-N36
      4  593 1553 (N32E30 L= 55)   543     96        2 ( 538/1521- 638/1578) -24.0 E35-E26 N29-N33
      5 1276 1470 (N24W18 L=103)   288    104        0 (1223/1449-1318/1483)  -9.5 W13-W20 N22-N24
      6 1498 1291 (N12W31 L=116)   753    224        1 (1468/1181-1515/1383)  85.6 W28-W32 N05-N18
      7 1818 1255 (N10W57 L=142)  2138    287        5 (1768/1165-1894/1374) -80.5 W53-W65 N05-N17
      8 1315 1286 (N12W18 L=104)   205     97        0 (1304/1246-1335/1337) -80.5 W17-W19 N09-N15
      9 1881 1274 (N12W66 L=151)   671     88        2 (1857/1235-1899/1315)  68.2 W62-W70 N09-N14
     10  283  794 (S14E53 L= 33)  3464    657        9 ( 188/ 513- 334/1071)  83.3 E64-E49 S31-N03
     11 1008  889 (S11E01 L= 84)   596    190        4 ( 965/ 818-1037/ 960) -90.0 E03-W00 S15-S06
     12  903  929 (S08E07 L= 78)   217     94        1 ( 869/ 910- 948/ 947) -11.3 E09-E04 S09-S07
     13  157  791 (S13E68 L= 17)  3978    263        7 (  89/ 697- 228/ 923) -68.2 E78-E60 S19-S04
     14  444  871 (S10E38 L= 47)   298     74        0 ( 414/ 850- 481/ 891)   0.0 E40-E35 S11-S08
     15  773  760 (S18E16 L= 69)   983    312        2 ( 706/ 656- 815/ 884)  85.9 E20-E13 S24-S10
     16  222  839 (S11E58 L= 27)   353     60        0 ( 207/ 803- 237/ 874) -90.0 E59-E56 S13-S08
     17  574  687 (S22E31 L= 54)  1066    286        3 ( 493/ 644- 688/ 791) -36.9 E35-E23 S24-S15
     18 1836  734 (S21W62 L=147)   663     75        3 (1807/ 707-1875/ 759)  14.0 W58-W67 S22-S19
     19 1533  622 (S28W35 L=121)   340     87        2 (1495/ 589-1570/ 659)  51.3 W32-W37 S30-S25
     20 1686  597 (S30W50 L=135)   340     69        1 (1668/ 573-1716/ 627) -18.4 W47-W53 S31-S27
     21 1399  552 (S33W26 L=111)   384    108        0 (1352/ 535-1450/ 568)   0.0 W22-W29 S33-S31
     22 1015  411 (S42E02 L= 83)  1746    482        6 ( 822/ 306-1210/ 532)  22.1 E20-W12 S49-S33
  

    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