Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1469 1761 (N37W64 L=291)  1275    158        1 (1399/1739-1542/1783) -17.4 W56-W74 N33-N39
      2 1564 1402 (N15W44 L=271)   935    180        2 (1537/1314-1593/1482)  59.0 W40-W48 N09-N19
      3 1279 1165 (N09W18 L=245)   355    104        0 (1257/1118-1310/1217) -90.0 W17-W18 N05-N12
      4  165 1128 (N29E67 L=160)   966     99        2 ( 117/1107- 214/1148)  -3.4 E76-E59 N27-N29
      5 1085 1085 (N09W05 L=232)   206     93        0 (1062/1037-1102/1127) -90.0 W04-W05 N06-N12
      6 1394 1095 (N03W23 L=250)   269     32        1 (1372/1069-1410/1127)  76.0 W21-W24 N00-N04
      7 1232  984 (N00W11 L=238)   974    328        0 (1159/ 850-1341/1045)  18.4 W03-W18 S05-N03
      8  235  925 (N16E58 L=169)   627     93        1 ( 194/ 888- 267/ 957) -38.7 E62-E54 N13-N17
      9 1597  899 (S14W32 L=259)   628    176        0 (1558/ 843-1642/ 934)  15.9 W28-W35 S16-S11
     10  211  836 (N11E63 L=164)   645     68        0 ( 186/ 802- 235/ 870) -90.0 E65-E59 N08-N12
     11 1603  824 (S19W31 L=258)   360     12        0 (1584/ 796-1622/ 853)  56.3 W29-W32 S20-S16
     12 1083  799 (S07E02 L=225)   295    112        1 (1033/ 779-1135/ 826) -31.0 E04-W01 S08-S04
     13  244  725 (N04E62 L=165)   725    145        0 ( 185/ 712- 310/ 751)  -7.1 E70-E54 N02-N05
     14  719  643 (S09E27 L=200)   533    130        1 ( 692/ 605- 766/ 688) -80.5 E28-E24 S11-S05
     15  411  570 (S08E52 L=175)  2225    304        5 ( 335/ 456- 485/ 666) -90.0 E56-E45 S15-N00
     16  512  647 (S05E41 L=187)   251     82        2 ( 473/ 627- 553/ 666) -18.4 E43-E37 S06-S03
     17 1832  631 (S41W58 L=285)   596     70        0 (1809/ 611-1858/ 657) -31.0 W52-W65 S43-S37
     18  916  630 (S13E15 L=212)   262     86        1 ( 883/ 613- 955/ 650) -11.3 E17-E12 S14-S12
     19 1486  610 (S29W20 L=247)   265     48        1 (1467/ 579-1503/ 632)  45.0 W18-W21 S30-S27
     20  465  437 (S17E54 L=173)  3363    307        9 ( 389/ 331- 535/ 567)  31.0 E70-E43 S24-S09
     21  381  515 (S11E57 L=170)  1329    137        1 ( 338/ 459- 416/ 563) -76.0 E61-E53 S15-S07
     22 1280  479 (S32W03 L=230)   287     70        0 (1263/ 449-1307/ 512) -90.0 W01-W04 S34-S29
     23  653  364 (S25E43 L=184)  1844    386        5 ( 543/ 247- 776/ 499)  20.7 E65-E28 S33-S18
     24  371  433 (S16E65 L=162)   780     54        2 ( 343/ 413- 398/ 458)  -9.5 E70-E61 S17-S14
  

    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