Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1197 1696 (N48W25 L= 48)   528     67        1 (1168/1659-1223/1724) -90.0 W22-W27 N44-N50
      2 1593 1431 (N24W46 L= 69)   737    139        0 (1540/1382-1645/1476) -49.4 W43-W49 N20-N27
      3  262 1412 (N34E65 L=318)  1139    100        2 ( 232/1377- 307/1449) -10.6 E73-E57 N31-N36
      4  844 1392 (N30E09 L= 14)   213     84        1 ( 811/1370- 881/1415) -31.0 E11-E06 N28-N31
      5 1449 1345 (N20W32 L= 55)   306     99        0 (1408/1309-1495/1364)  15.9 W28-W35 N18-N21
      6 1139 1059 (N06W07 L= 30)   294     87        1 (1087/1043-1172/1082)  11.3 W04-W09 N05-N07
      7 1365 1024 (N02W21 L= 44)   362    100        0 (1327/ 983-1400/1070)  38.7 W18-W23 N00-N04
      8 1881  958 (S09W65 L= 88)  4486    246        9 (1812/ 856-1937/1044)  42.3 W56-W77 S15-S04
      9 1641  923 (S07W40 L= 63)   285     59        0 (1614/ 895-1667/ 951) -53.1 W37-W42 S09-S05
     10  323  838 (S02E50 L=332)   434     95        0 ( 290/ 799- 346/ 879) -45.0 E53-E48 S04-N00
     11  252  698 (S11E62 L=321)  2238    299        4 ( 201/ 566- 334/ 802) -78.7 E66-E56 S19-S04
     12 1566  755 (S17W34 L= 56)   265     94        0 (1545/ 717-1582/ 787)  76.0 W32-W35 S19-S14
     13  424  712 (S10E44 L=339)   454    112        3 ( 390/ 670- 451/ 770)  45.0 E47-E40 S12-S06
     14 1510  744 (S17W29 L= 52)   233     55        0 (1493/ 715-1534/ 770)  45.0 W28-W31 S18-S15
     15  784  670 (S15E18 L=  4)   482    175        2 ( 730/ 633- 838/ 722) -45.0 E21-E15 S17-S11
     16  878  615 (S19E13 L=  9)   589    171        0 ( 804/ 572- 919/ 677)  32.0 E18-E10 S21-S15
     17  337  639 (S15E54 L=328)   414    103        0 ( 297/ 619- 381/ 668) -23.2 E57-E50 S16-S12
     18 1611  610 (S28W39 L= 62)   303     74        1 (1577/ 588-1646/ 632)   9.5 W36-W42 S28-S26
     19  614  533 (S23E33 L=349)   716    130        2 ( 595/ 466- 635/ 603)  60.9 E36-E30 S27-S18
     20  936  420 (S34E13 L= 10)  3409    716        2 ( 734/ 208-1195/ 592)  28.1 E38-W07 S51-S23
     21 1695  532 (S35W51 L= 74)  1115    125        1 (1628/ 507-1753/ 561)  -7.1 W43-W60 S36-S32
     22  589  409 (S32E41 L=342)  1609    372        1 ( 484/ 325- 708/ 536) -59.5 E44-E34 S39-S22
     23  829  396 (S34E21 L=  1)   299     58        1 ( 797/ 375- 857/ 414) -26.6 E23-E19 S36-S32
     24 1058  394 (S37E04 L= 18)   442    103        1 (1004/ 380-1107/ 414)  -7.1 E08-W00 S38-S35
  

    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