Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1202 1699 (N48W26 L= 48)   545     60        0 (1172/1660-1225/1729) -80.5 W23-W28 N44-N50
      2 1593 1438 (N24W47 L= 69)   650    137        0 (1535/1394-1634/1478) -50.2 W43-W49 N21-N27
      3  264 1413 (N34E64 L=318)  1098     96        3 ( 233/1374- 309/1448) -10.0 E73-E56 N31-N36
      4  850 1393 (N30E09 L= 14)   216     97        1 ( 811/1370- 890/1418) -33.7 E11-E05 N27-N31
      5 1455 1345 (N20W32 L= 55)   292    105        0 (1415/1308-1500/1366)  14.0 W28-W36 N18-N21
      6 1104 1047 (N06W05 L= 27)   532    170        2 (1024/1009-1181/1079)   5.7 W00-W10 N04-N07
      7 1372 1025 (N02W21 L= 44)   340    103        0 (1334/ 986-1409/1065)  31.0 W18-W24 N00-N04
      8 1865  952 (S09W63 L= 85)  2823    225        5 (1815/ 848-1900/1034)  70.0 W56-W68 S15-S04
      9 1924  943 (S11W74 L= 96)   872     69        1 (1907/ 906-1937/ 975)  90.0 W69-W77 S13-S09
     10 1648  924 (S07W40 L= 63)   264     66        0 (1617/ 896-1672/ 953) -45.0 W38-W42 S09-S05
     11 1353  853 (S08W19 L= 41)   205    101        0 (1335/ 807-1367/ 900)  78.7 W17-W19 S11-S05
     12  329  835 (S02E50 L=332)   401    107        0 ( 292/ 797- 352/ 876) -45.0 E52-E48 S04-N00
     13 1572  756 (S17W34 L= 56)   245    100        0 (1550/ 719-1587/ 787)  90.0 W32-W35 S19-S14
     14  260  690 (S11E61 L=321)  1937    269        4 ( 217/ 566- 336/ 781) -85.9 E66-E56 S19-S05
     15  286  755 (S07E56 L=326)   360     59        0 ( 257/ 735- 320/ 777)  -9.5 E58-E52 S08-S05
     16  765  678 (S14E20 L=  3)   267    121        0 ( 738/ 651- 814/ 726) -59.0 E21-E16 S16-S10
     17  885  615 (S19E13 L=  9)   567    188        0 ( 813/ 572- 924/ 681)  35.5 E17-E09 S21-S14
     18  551  601 (S18E36 L=346)   313     67        1 ( 511/ 583- 577/ 619) -11.3 E39-E34 S19-S16
     19  620  531 (S23E33 L=349)   687    132        4 ( 603/ 466- 650/ 598)  56.3 E36-E29 S27-S18
     20 1037  502 (S28E04 L= 18)  1493    356        5 ( 918/ 400-1187/ 585)  26.6 E14-W06 S35-S23
     21 1698  533 (S35W51 L= 74)  1106    137        1 (1630/ 510-1760/ 562)  -6.3 W43-W61 S36-S32
     22  627  365 (S36E40 L=342)   937    219        2 ( 572/ 322- 691/ 444) -68.2 E43-E35 S39-S29
     23 1062  396 (S37E04 L= 18)   389     97        2 (1009/ 382-1109/ 420) -15.9 E07-W00 S37-S35
     24  788  293 (S43E30 L=353)  1420    194        1 ( 739/ 225- 854/ 356)  38.7 E38-E21 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