Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1103 1669 (N47W15 L= 49)   623     99        1 (1065/1621-1136/1698) -80.5 W11-W17 N43-N49
      2 1453 1410 (N25W34 L= 68)   430     82        0 (1419/1376-1482/1452) -59.0 W32-W35 N22-N27
      3  511 1302 (N26E34 L=  0)   307    120        0 ( 473/1259- 551/1347) -40.6 E37-E30 N22-N28
      4  545 1161 (N17E31 L=  4)   239     59        1 ( 528/1131- 564/1186)  76.0 E31-E29 N14-N18
      5  918 1022 (N06E06 L= 28)   487    158        1 ( 847/ 990- 989/1055)  16.7 E11-E01 N04-N07
      6 1166  943 (S01W08 L= 42)   754    294        1 (1135/ 802-1222/1050)  63.4 W05-W12 S09-N05
      7 1881  986 (S07W65 L=100)   509     99        1 (1865/ 943-1898/1032)  80.5 W63-W68 S10-S04
      8 1768  913 (S10W51 L= 86)  1276    170        5 (1732/ 839-1799/ 983)  71.6 W47-W54 S14-S05
      9 1843  906 (S11W60 L= 94)   646     74        1 (1820/ 868-1861/ 945) -59.0 W57-W62 S13-S08
     10  220  723 (S10E65 L=329)  3857    524       10 ( 158/ 579- 294/ 928) -74.7 E74-E59 S19-N03
     11  305  771 (S06E53 L=341)  1331    233        8 ( 272/ 675- 343/ 863)  47.5 E60-E48 S12-N00
     12  703  783 (S07E22 L= 12)   288     85        1 ( 661/ 758- 743/ 801) -21.8 E24-E19 S09-S05
     13 1377  731 (S16W20 L= 55)   521    207        0 (1330/ 685-1421/ 765)  31.0 W16-W23 S19-S14
     14  592  665 (S14E32 L=  3)   286    155        0 ( 566/ 633- 636/ 720) -63.4 E33-E28 S16-S10
     15  719  619 (S18E24 L= 11)   463    127        0 ( 689/ 571- 745/ 678)  66.8 E26-E21 S20-S13
     16  449  526 (S23E48 L=347)  2480    380        6 ( 354/ 370- 521/ 627)  78.7 E58-E41 S35-S15
     17 1409  566 (S28W23 L= 57)   660    192        2 (1329/ 526-1500/ 602)   4.4 W16-W29 S30-S26
     18  851  477 (S29E17 L= 17)  1213    349        3 ( 727/ 401- 990/ 565)  22.2 E28-E06 S33-S23
     19  403  503 (S25E54 L=341)   632     99        2 ( 370/ 464- 439/ 541) -45.0 E56-E50 S27-S21
     20 1569  505 (S35W38 L= 72)  1166    203        1 (1472/ 466-1660/ 535)   6.3 W29-W47 S36-S32
     21  956  384 (S37E12 L= 23)   732    255        2 ( 849/ 359-1079/ 413)  -3.4 E19-E02 S38-S35
     22  664  288 (S43E42 L=353)  1429    158        4 ( 614/ 228- 716/ 350)  36.3 E50-E33 S49-S37
  

    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