Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1263 1565 (N30W19 L=168)   761    186        0 (1186/1510-1327/1628) -52.1 W15-W23 N26-N35
      2  678 1493 (N28E21 L=127)  1082    283        2 ( 578/1436- 820/1562) -29.1 E29-E11 N23-N33
      3  468 1366 (N21E36 L=113)   714    226        0 ( 437/1280- 517/1474) -58.4 E40-E31 N15-N28
      4  400 1378 (N23E42 L=107)   658    150        1 ( 370/1320- 422/1448)  82.9 E43-E39 N19-N27
      5 1749 1328 (N13W52 L=201)   464    109        0 (1707/1303-1805/1358) -26.6 W48-W57 N11-N15
      6  426 1281 (N16E38 L=110)   688    135        2 ( 401/1228- 449/1340)  80.5 E40-E36 N12-N19
      7 1448 1122 (N02W26 L=175)   677    234        2 (1362/1075-1563/1157)   4.1 W20-W34 N00-N03
      8 1605 1083 (S01W37 L=185)   224     46        1 (1586/1058-1622/1111) -33.7 W35-W38 S02-N00
      9 1473  997 (S06W27 L=176)   216     52        0 (1444/ 974-1500/1021) -26.6 W25-W29 S07-S04
     10  226  925 (S04E56 L= 92)   616    107        2 ( 198/ 885- 260/ 971)  29.7 E59-E52 S05-N00
     11  154  894 (S05E65 L= 83)  1389    150        4 ( 119/ 827- 181/ 970)  69.4 E69-E62 S08-N00
     12 1709  925 (S11W45 L=193)   252     27        0 (1693/ 902-1726/ 950)  45.0 W43-W46 S11-S09
     13 1429  892 (S12W24 L=173)   538     85        5 (1391/ 854-1458/ 938) -90.0 W21-W26 S14-S09
     14 1250  833 (S15W13 L=161)  1270    450        4 (1093/ 723-1377/ 904)  26.6 W02-W21 S20-S10
     15  232  805 (S11E58 L= 91)  2036    230        9 ( 159/ 711- 294/ 881) -70.0 E67-E51 S16-S05
     16  230  681 (S18E62 L= 86)  1832    253        3 ( 178/ 556- 284/ 743) -77.0 E67-E58 S26-S13
     17 1406  658 (S26W24 L=172)   211     26        1 (1383/ 640-1427/ 676)  26.6 W22-W25 S27-S24
     18  539  516 (S31E39 L=110)   361     65        1 ( 510/ 497- 574/ 541) -11.3 E41-E36 S32-S29
     19 1593  513 (S36W42 L=191)   359     61        0 (1563/ 495-1626/ 534)  21.8 W39-W45 S37-S35
     20  430  405 (S37E56 L= 92)  1548    203        4 ( 407/ 301- 471/ 497)  24.1 E75-E46 S44-S31
     21 1701  453 (S41W60 L=208)  1243    166        2 (1614/ 427-1777/ 477)   0.0 W47-W74 S42-S39
  

    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