Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1272 1506 (N26W30 L=315)   948    238        0 (1164/1484-1381/1524) -23.2 W22-W36 N22-N29
      2 1004 1454 (N31W12 L=297)   422    114        0 ( 952/1427-1057/1480)  -7.1 W07-W15 N30-N32
      3  918 1234 (N21E00 L=285)  1067    385        3 ( 777/1168-1072/1279)  -6.0 E10-W09 N18-N23
      4 1270 1186 (N09W18 L=303)   222     86        0 (1229/1154-1304/1214) -59.0 W16-W19 N06-N11
      5  194 1104 (N30E61 L=225)  1649    283        2 ( 135/ 995- 243/1173) -50.7 E70-E54 N23-N34
      6 1918 1116 (S16W68 L=353)  1144     94        0 (1874/1093-1958/1150)  -5.7 W60-W80 S17-S14
      7  783 1004 (N12E14 L=271)   968    234        2 ( 742/ 901- 828/1109)  85.6 E15-E12 N05-N18
      8 1649 1004 (S12W37 L=322)   246     70        1 (1621/ 972-1669/1036)  26.6 W34-W38 S13-S10
      9 1772  887 (S23W45 L=330)  1127    283        0 (1724/ 751-1826/1017)  45.0 W38-W52 S30-S16
     10 1649  905 (S18W34 L=320)   274     22        0 (1632/ 880-1667/ 928) -90.0 W33-W35 S19-S15
     11  521  820 (N08E35 L=250)   993    202        4 ( 455/ 765- 606/ 861)   0.0 E40-E29 N04-N10
     12  442  678 (N01E45 L=240)   742    198        3 ( 390/ 597- 471/ 768)  52.1 E51-E40 S03-N06
     13 1623  706 (S29W29 L=314)   315     58        0 (1598/ 681-1641/ 737)  26.6 W26-W30 S30-S26
     14 1307  656 (S21W06 L=292)   688    162        1 (1264/ 585-1348/ 708)  32.0 W01-W09 S24-S18
     15  841  577 (S14E23 L=262)   625    168        2 ( 774/ 537- 927/ 598) -11.3 E27-E17 S15-S11
     16  356  548 (S05E59 L=227)  1106    158        7 ( 298/ 505- 417/ 581) -29.1 E63-E52 S07-S02
     17  876  464 (S22E25 L=260)   598    198        1 ( 805/ 414- 939/ 525)   0.0 E29-E18 S24-S18
     18 1229  487 (S30E03 L=282)   291     36        1 (1202/ 465-1253/ 506) -33.7 E04-E01 S31-S28
     19  437  434 (S14E58 L=227)  4305    291       10 ( 347/ 357- 540/ 503)   0.0 E70-E47 S19-S08
     20  826  396 (S25E31 L=254)   272     57        2 ( 803/ 375- 853/ 424) -76.0 E32-E29 S26-S22
     21 1421  265 (S57W04 L=289)   479     40        0 (1394/ 250-1445/ 283) -38.7 W00-W06 S60-S55
     22 1043  220 (S45E29 L=256)  1255    143        3 ( 988/ 177-1092/ 275)  18.4 E37-E21 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