Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  925 1757 (N48E05 L=283)  1083    150        2 ( 881/1709- 972/1827) -61.4 E08-W00 N43-N55
      2 1403 1644 (N36W33 L=320)  1128    303        0 (1249/1612-1534/1667)  -7.4 W20-W43 N33-N37
      3  853 1565 (N33E10 L=278)   946    203        0 ( 753/1544- 949/1584)  -4.1 E16-E02 N31-N34
      4 1233 1479 (N25W16 L=303)  1700    455        1 (1044/1353-1390/1543) -27.6 W03-W25 N16-N29
      5 1763 1494 (N25W62 L=350)   818    115        4 (1718/1455-1806/1529) -33.7 W56-W66 N22-N27
      6 1613 1454 (N22W44 L=331)   274     38        1 (1592/1432-1638/1472)  31.0 W41-W46 N20-N23
      7  793 1357 (N19E13 L=274)   649    189        1 ( 739/1282- 842/1449) -57.5 E17-E10 N13-N25
      8 1755 1343 (N15W54 L=342)  1747    326        5 (1651/1241-1883/1441) -34.4 W45-W66 N08-N21
      9 1107 1362 (N18W07 L=294)   242     64        0 (1092/1326-1130/1391)  63.4 W05-W08 N15-N19
     10  399 1339 (N20E42 L=246)   645    120        2 ( 358/1307- 449/1388) -29.1 E46-E37 N17-N23
     11 1255 1283 (N12W15 L=303)   296    131        2 (1212/1245-1287/1338)  59.0 W12-W17 N10-N15
     12 1357 1269 (N11W22 L=309)   313     74        1 (1343/1222-1368/1314)  68.2 W20-W22 N08-N13
     13 1552 1280 (N11W35 L=323)   442     84        1 (1511/1242-1589/1308) -38.7 W32-W37 N08-N13
     14  209 1261 (N16E60 L=227)   443     61        1 ( 185/1232- 234/1287)  45.0 E63-E57 N14-N17
     15  519 1169 (N09E31 L=256)   687    198        1 ( 465/1116- 577/1232) -45.0 E35-E27 N05-N12
     16 1589  899 (S12W36 L=324)  1745    345        2 (1511/ 759-1679/1055)  66.0 W30-W43 S20-S02
     17  904  830 (S14E08 L=279)   247     72        0 ( 885/ 787- 927/ 864)  78.7 E09-E06 S16-S11
     18 1780  781 (S19W54 L=342)   716    129        1 (1750/ 718-1808/ 822) -81.9 W51-W58 S23-S16
     19 1840  785 (S19W62 L=349)   412     36        0 (1814/ 768-1860/ 806)  21.8 W58-W64 S19-S17
     20 1194  720 (S22W10 L=297)   469    135        1 (1175/ 658-1218/ 788) -90.0 W08-W11 S25-S17
     21 1725  727 (S23W50 L=338)   379     45        0 (1703/ 697-1745/ 760)  76.0 W48-W51 S24-S20
     22 1539  544 (S34W37 L=325)  1440    272        1 (1429/ 482-1625/ 640)  40.2 W28-W43 S38-S27
     23  912  596 (S28E10 L=278)   280     99        0 ( 878/ 557- 944/ 638)  45.0 E12-E07 S30-S25
     24 1141  456 (S39W06 L=294)   346     72        1 (1103/ 442-1187/ 483)   0.0 W03-W09 S40-S37
     25  809  410 (S41E21 L=267)   413     96        1 ( 757/ 395- 854/ 429)  -7.1 E24-E16 S41-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