Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1525 1612 (N23W52 L=234)   341     93        0 (1505/1574-1556/1635)  53.1 W49-W55 N20-N24
      2 1607 1593 (N19W57 L=239)   441    114        0 (1560/1573-1661/1624) -45.0 W54-W61 N16-N22
      3 1126 1541 (N31W22 L=204)   244    117        0 (1075/1499-1162/1568) -63.4 W19-W22 N27-N33
      4 1681 1510 (N13W58 L=240)   591     64        5 (1643/1487-1719/1536)  -6.3 W54-W63 N11-N13
      5 1143 1442 (N24W19 L=201)   260    153        0 (1070/1430-1209/1479) -40.6 W15-W22 N22-N28
      6 1528 1374 (N10W40 L=222)   232     22        1 (1506/1353-1547/1394) -45.0 W38-W40 N08-N11
      7 1785 1325 (S00W58 L=240)   343     50        1 (1766/1294-1804/1346)  18.4 W56-W60 S01-N01
      8  915 1260 (N20E00 L=182)   515    243        1 ( 803/1216-1014/1299)  -4.4 E07-W06 N17-N22
      9 1665 1152 (S06W42 L=224)   469    133        0 (1597/1124-1721/1179) -36.9 W37-W45 S08-S02
     10  724 1126 (N17E15 L=167)   216     96        0 ( 710/1090- 745/1175)  53.1 E15-E12 N15-N19
     11 1390 1007 (S06W20 L=202)  1035    338        1 (1318/ 912-1488/1111) -90.0 W16-W26 S11-N01
     12 1196 1038 (N01W10 L=192)   402    130        1 (1153/ 977-1228/1079) -81.9 W07-W10 S03-N04
     13  164  902 (N17E65 L=117)  4214    303       11 ( 114/ 779- 211/1053)  82.9 E75-E59 N09-N25
     14 1597  982 (S13W32 L=214)   313     52        1 (1566/ 964-1625/1006) -11.3 W29-W34 S14-S11
     15 1679  728 (S30W35 L=217)  3657    636        4 (1497/ 512-1819/ 984)  29.9 W17-W51 S40-S18
     16  220  930 (N17E57 L=125)   726     83        0 ( 192/ 891- 246/ 970) -59.0 E60-E54 N14-N19
     17  430  907 (N12E39 L=143)   242     66        1 ( 402/ 883- 454/ 939)  26.6 E41-E36 N10-N13
     18 1363  841 (S14W14 L=196)   533    163        2 (1317/ 773-1422/ 877)  23.2 W10-W18 S17-S12
     19  584  730 (S01E33 L=149)   989    250        2 ( 493/ 635- 655/ 820) -71.6 E36-E30 S07-N05
     20 1340  578 (S29W07 L=189)   256    114        0 (1326/ 540-1364/ 641)  74.1 W05-W08 S32-S25
     21 1059  593 (S21E09 L=173)   215     35        0 (1032/ 574-1080/ 614) -18.4 E10-E07 S21-S19
     22  309  551 (S06E62 L=120)  1057    136        3 ( 244/ 530- 390/ 579)  -6.7 E70-E53 S07-S04
     23  532  454 (S16E48 L=134)  1601    350        3 ( 435/ 349- 643/ 573)  17.8 E63-E35 S21-S11
     24  797  409 (S25E32 L=150)  2033    479        5 ( 600/ 287- 964/ 512)   6.3 E53-E17 S28-S22
     25  318  435 (S13E72 L=110)  1242     73        4 ( 292/ 396- 341/ 471)  24.4 E80-E65 S16-S10
  

    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