Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1317 1671 (N38W42 L=146)   369     71        0 (1285/1652-1356/1689)   0.0 W38-W45 N36-N38
      2 1536 1652 (N30W58 L=162)   759     96        2 (1491/1625-1587/1675)  -5.2 W51-W63 N28-N31
      3 1113 1602 (N39W23 L=127)   752    109        2 (1071/1559-1159/1650)  81.9 W19-W25 N35-N42
      4 1695 1541 (N19W64 L=168)   686    115        2 (1638/1514-1748/1568) -26.6 W60-W70 N16-N21
      5 1176 1404 (N26W19 L=123)  1052    243        2 (1094/1340-1263/1498) -71.6 W15-W22 N20-N32
      6 1801 1467 (N11W72 L=176)   551     44        1 (1775/1441-1819/1485) -14.0 W67-W76 N09-N12
      7 1735 1442 (N12W61 L=165)   856    102        0 (1701/1383-1758/1484)  74.1 W58-W64 N08-N15
      8  945 1290 (N24W01 L=105)   244     70        1 ( 912/1266- 980/1312) -56.3 W00-W02 N22-N25
      9  595 1208 (N26E24 L= 80)   603    242        1 ( 525/1118- 672/1289) -55.3 E28-E19 N19-N32
     10  229 1136 (N28E57 L= 46)   944    160        3 ( 197/1062- 267/1214) -66.0 E62-E52 N23-N32
     11  883 1069 (N13E07 L= 97)   227    120        0 ( 869/1026- 909/1122)  59.0 E08-E04 N09-N15
     12 1127 1058 (N07W07 L=110)   571    253        1 (1025/1001-1198/1099) -37.9 W00-W10 N02-N09
     13 1307  994 (S01W16 L=119)   264     96        0 (1259/ 979-1352/1018)   0.0 W12-W18 S01-N00
     14 1894  881 (S24W63 L=166)  2559    258        4 (1839/ 764-1940/ 982)  37.6 W54-W72 S30-S19
     15  385  921 (N13E43 L= 60)   775    270        1 ( 325/ 853- 435/ 974) -54.5 E48-E40 N08-N15
     16  163  857 (N11E69 L= 35)  1497    169        3 ( 125/ 783- 196/ 929) -56.3 E74-E64 N06-N15
     17  326  867 (N10E50 L= 54)   339     78        2 ( 309/ 838- 349/ 914) -78.7 E50-E47 N08-N13
     18 1530  881 (S13W27 L=131)   254     63        1 (1502/ 859-1562/ 897)   0.0 W25-W29 S13-S11
     19  867  817 (S01E13 L= 91)   292     65        1 ( 853/ 775- 890/ 852)  63.4 E14-E11 S04-N00
     20 1683  808 (S21W38 L=142)   439    172        0 (1616/ 765-1714/ 838)   7.1 W32-W40 S23-S19
     21 1331  771 (S14W13 L=116)   313     74        2 (1309/ 740-1353/ 815)  76.0 W10-W14 S15-S11
     22 1249  674 (S18W06 L=110)   419    183        0 (1213/ 614-1296/ 762) -90.0 W04-W07 S23-S12
     23 1670  718 (S27W36 L=140)   466     94        0 (1636/ 680-1704/ 751)  26.6 W33-W39 S28-S25
     24 1402  736 (S18W16 L=120)   252     38        1 (1373/ 715-1425/ 750) -26.6 W14-W18 S19-S16
     25 1495  560 (S32W21 L=125)   413     44        2 (1465/ 538-1524/ 581) -11.3 W18-W23 S34-S30
     26  666  499 (S17E35 L= 69)   729    167        2 ( 605/ 441- 719/ 569)  28.6 E41-E29 S19-S13
     27 1381  442 (S38W10 L=114)  1227    174        3 (1334/ 380-1429/ 520)  37.9 W05-W14 S41-S32
     28  534  456 (S18E47 L= 57)   601     82        1 ( 493/ 428- 572/ 488) -45.0 E48-E43 S20-S15
     29 1111  340 (S38E12 L= 92)  2979    496        5 ( 931/ 242-1326/ 432)   5.0 E29-W05 S42-S33
     30 1264  162 (S64E10 L= 94)   635     68        0 (1229/ 147-1306/ 179)  -5.2 E14-E03 S66-S61
  

    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