Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  382 1588 (N11E64 L=189)  3133    350        7 ( 291/1509- 438/1679) -76.0 147-E53 N08-S-2
      2 1565 1642 (N52W26 L=278)   405     74        0 (1538/1626-1593/1658)  24.0 W22-W30 N52-N52
      3  502 1611 (N15E54 L=199)   410     67        1 ( 482/1588- 525/1642) -76.0 E58-E50 N14-N17
      4  745 1577 (N19E34 L=218)   251     90        2 ( 732/1536- 760/1613) -63.4 E37-E31 N17-N21
      5  623 1518 (N12E39 L=214)   376     51        0 ( 600/1492- 646/1543)  90.0 E42-E36 N11-N13
      6  828 1469 (N14E24 L=228)   566    113        0 ( 772/1420- 883/1530)  77.5 E30-E19 N13-N17
      7 1165 1437 (N22E04 L=249)   711    130        0 (1136/1373-1199/1501) -49.4 E08-W00 N19-N25
      8  202 1242 (S12E65 L=188)  8040    942       16 ( 120/1094- 292/1421) -65.8 147-E51 S19-S-2
      9  715 1309 (N02E25 L=228)   519    123        1 ( 686/1247- 736/1365) -33.7 E29-E22 S01-N05
     10 1390 1300 (N20W14 L=267)   295     75        0 (1359/1271-1431/1318)  36.9 W12-W17 N20-N20
     11  625 1293 (S01E30 L=222)   500     89        1 ( 573/1266- 663/1313)   9.5 E34-E27 S01-S01
     12 1074 1234 (N07E03 L=250)   490     96        1 (1019/1196-1121/1265)  -9.5 E07-W01 N06-N08
     13  263 1215 (S13E57 L=196)   404    111       -1 ( 245/1179- 287/1240)  76.0 E59-E53 S15-S12
     14  386 1170 (S13E44 L=209)  1812    467        6 ( 299/1085- 481/1235)  47.7 E53-E35 S16-S11
     15  954 1132 (S02E07 L=246)   641    186        0 ( 887/1104-1048/1196)   0.0 E12-E01 S01-N00
     16 1834 1105 (N24W55 L=308)   477     63        1 (1814/1072-1853/1129)  63.4 W53-W58 N22-N24
     17  497 1055 (S17E33 L=220)   321     74        3 ( 478/1013- 515/1097) -78.7 E35-E31 S19-S15
     18  280 1063 (S22E52 L=201)   327    106        0 ( 248/1039- 320/1092)  -7.1 E55-E47 S22-S20
     19  831  936 (S16E09 L=244)   757    145        3 ( 769/ 887- 882/ 989)  66.8 E14-E04 S17-S14
     20  522  929 (S24E29 L=224)   934    194        1 ( 477/ 873- 565/ 987)  63.4 E33-E25 S26-S22
     21  804  781 (S25E06 L=247)   494    125        0 ( 731/ 750- 855/ 834)  -5.7 E12-E02 S25-S24
     22 1267  794 (S11W20 L=273)   313     68        1 (1236/ 766-1309/ 821)  68.2 W18-W24 S12-S11
     23  227  756 (S42E60 L=193)   587     80        1 ( 202/ 729- 256/ 783)  33.7 E63-E57 S43-S41
     24 1602  560 (S14W52 L=305)   585    112        1 (1578/ 511-1626/ 615) -56.3 W47-W57 S15-S11
     25  598  567 (S45E17 L=236)   320     75        1 ( 578/ 529- 621/ 607) -45.0 E19-E14 S47-S42
     26 1685  459 (S16W67 L=320)   606    135        1 (1643/ 445-1720/ 474)  18.4 W62-W74 S15-S16
     27  725  438 (S50E01 L=251)   353     69        0 ( 705/ 402- 751/ 472) -38.7 E04-W03 S52-S48
     28 1018  373 (S44W26 L=279)  2249    380        3 ( 844/ 323-1179/ 460)  36.9 W08-W41 S41-S44
     29 1519  416 (S24W56 L=308)   371    109        0 (1484/ 400-1558/ 435)  14.0 W51-W60 S23-S24
  

    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