Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  625 1822 (N42E54 L= 92)  1181     79        2 ( 592/1779- 655/1858) -20.2 E66-E47 N38-N45
      2  841 1717 (N36E26 L=121)   301     38        1 ( 818/1691- 863/1738) -38.7 E28-E23 N33-N37
      3  986 1678 (N35E14 L=132)   385     59        1 ( 955/1646-1014/1703)  80.5 E15-E12 N31-N37
      4  384 1642 (N25E63 L= 84)   823     85        2 ( 364/1601- 406/1679) -26.6 E69-E56 N22-N28
      5 1230 1455 (N23W06 L=153)   217     77        0 (1216/1420-1254/1490)  78.7 W05-W07 N20-N25
      6  930 1375 (N13E11 L=136)   367     74        2 ( 897/1352- 975/1395)  26.6 E12-E07 N11-N14
      7 1815 1264 (N22W53 L=200)  2721    311        4 (1742/1133-1886/1383) -47.1 W46-W62 N15-N29
      8 1535 1308 (N19W28 L=175)   306     35        0 (1517/1280-1552/1339)  76.0 W26-W29 N17-N21
      9 1117 1229 (N07W02 L=149)   510    123        0 (1078/1169-1149/1281) -56.3 W00-W04 N03-N09
     10  321 1242 (S01E50 L= 97)   286     49        0 ( 308/1216- 336/1272) -33.7 E51-E48 S02-N00
     11  161 1116 (S10E66 L= 81)  1112    135        4 ( 139/1054- 186/1177) -48.8 E70-E61 S13-S05
     12 1296 1099 (N02W15 L=161)   270     79        1 (1259/1070-1324/1125)   0.0 W12-W16 N00-N04
     13  429 1089 (S10E39 L=108)   267     47        0 ( 407/1064- 451/1109)  45.0 E40-E37 S11-S08
     14 1385 1056 (N01W21 L=168)   283     99        0 (1345/1032-1421/1099)  45.0 W18-W22 N00-N04
     15 1712 1022 (N05W45 L=191)   260     79        0 (1684/ 993-1739/1055) -18.4 W41-W47 N04-N06
     16 1345  952 (S05W20 L=167)   422    210        0 (1248/ 907-1431/ 981)  -4.4 W13-W26 S06-S04
     17  251  906 (S22E54 L= 92)   440     87        2 ( 228/ 863- 275/ 944) -78.7 E56-E51 S24-S19
     18  657  910 (S18E21 L=125)   193     45        1 ( 628/ 898- 685/ 931)  14.0 E23-E19 S18-S16
     19 1361  779 (S15W25 L=171)   793    254        2 (1304/ 675-1427/ 870)  77.0 W22-W26 S21-S08
     20 1602  698 (S15W44 L=190)   303     71        1 (1582/ 679-1634/ 730) -11.3 W41-W46 S16-S13
     21 1403  632 (S23W32 L=178)   408     90        2 (1360/ 603-1450/ 657)   0.0 W27-W35 S24-S21
     22 1811  573 (S17W72 L=219)   926     93        0 (1762/ 553-1854/ 592)  14.0 W66-W82 S19-S15
     23  457  469 (S49E42 L=104)   782    117        2 ( 411/ 419- 496/ 513) -66.8 E46-E37 S53-S46
     24  980  445 (S43W08 L=154)   261     57        0 ( 953/ 420-1005/ 475) -26.6 W04-W10 S44-S41
     25 1615  439 (S30W59 L=206)   455     67        0 (1589/ 420-1641/ 464)  45.0 W55-W62 S31-S27
  

    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