Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  331 1433 (N21E52 L= 12)  2693    588        4 ( 237/1259- 474/1554) -34.1 E67-E36 N09-N30
      2 1191 1477 (N25W09 L= 73)   457     99        1 (1152/1435-1238/1520) -45.0 W06-W12 N22-N27
      3 1738 1458 (N27W52 L=116)  1179    138        3 (1694/1420-1783/1495)   0.0 W48-W57 N24-N29
      4  929 1440 (N21E07 L= 56)   293     69        1 ( 891/1413- 973/1461) -11.3 E09-E04 N19-N22
      5  202 1232 (N08E61 L=  2)   517    132        2 ( 183/1197- 227/1266) -59.0 E63-E57 N05-N10
      6  674 1195 (N05E22 L= 41)   229     59        1 ( 648/1178- 702/1224) -45.0 E23-E20 N04-N07
      7 1905 1193 (N11W67 L=131)   698     76        0 (1879/1158-1923/1221) -63.4 W63-W70 N09-N13
      8 1845 1183 (N10W59 L=123)   438     55        0 (1833/1148-1857/1214)  78.7 W57-W60 N07-N12
      9  429 1154 (N03E39 L= 25)   499    119        0 ( 374/1110- 486/1206)  32.0 E43-E34 N00-N05
     10 1407 1090 (N01W23 L= 87)   246     37        0 (1390/1060-1426/1121)  56.3 W22-W24 N00-N03
     11 1594 1016 (S02W36 L=100)   223     36        0 (1576/ 994-1618/1036)  45.0 W35-W38 S03-N00
     12 1650  993 (S03W41 L=105)   421     48        2 (1627/ 959-1677/1024) -63.4 W39-W43 S05-S01
     13  231  786 (S19E58 L=  6)  3580    486        4 ( 138/ 684- 333/ 887) -55.3 E69-E48 S25-S12
     14 1488  865 (S12W30 L= 94)   241     53        0 (1462/ 844-1515/ 883)  33.7 W28-W31 S13-S10
     15 1317  745 (S20W20 L= 83)  1306    322        1 (1233/ 616-1372/ 880) -67.6 W13-W23 S28-S11
     16 1607  840 (S12W39 L=103)   260     59        0 (1595/ 806-1624/ 878) -63.4 W37-W40 S14-S10
     17  310  840 (S16E49 L= 14)   469     89        2 ( 265/ 818- 339/ 858) -15.9 E53-E46 S17-S14
     18 1748  755 (S17W53 L=116)  1158    246        3 (1660/ 693-1821/ 848)  37.6 W45-W58 S20-S10
     19  502  615 (S30E37 L= 27)  2577    688        3 ( 353/ 440- 716/ 821)  33.7 E55-E18 S42-S17
     20 1656  761 (S17W44 L=108)   349     76        2 (1632/ 720-1683/ 803)  68.2 W42-W45 S19-S14
     21 1070  744 (S21W04 L= 67)   380     94        0 (1027/ 718-1129/ 762)  26.6 W01-W07 S22-S19
     22 1611  621 (S26W44 L=107)  1416    320        2 (1544/ 580-1721/ 714)   0.0 W38-W53 S28-S20
     23 1366  482 (S37W28 L= 92)  1028    161        0 (1281/ 434-1432/ 550)  45.0 W22-W32 S40-S31
     24  879  497 (S38E09 L= 55)   461    103        1 ( 835/ 456- 926/ 537)  45.0 E12-E05 S41-S34
     25 1231  462 (S39W18 L= 82)   386     84        0 (1211/ 427-1256/ 495) -38.7 W16-W21 S41-S36
  

    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