Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1329 1787 (N45W54 L=197)   547     68        1 (1305/1757-1364/1823)  63.4 W50-W58 N42-N48
      2 1463 1623 (N31W49 L=192)   374     39        1 (1441/1593-1486/1643)  21.8 W46-W51 N29-N32
      3  407 1611 (N58E51 L= 92)   434     43        2 ( 382/1586- 430/1635) -14.0 E57-E45 N55-N60
      4 1561 1603 (N27W56 L=198)   656     86        0 (1521/1575-1601/1635) -59.0 W53-W58 N24-N29
      5  898 1476 (N37W02 L=145)   399     62        1 ( 868/1447- 929/1501)  26.6 W00-W04 N35-N38
      6  677 1417 (N38E15 L=127)   721    127        1 ( 653/1360- 703/1484)  83.7 E17-E13 N33-N42
      7  646 1152 (N22E21 L=122)  1071    280        1 ( 586/1042- 713/1274) -76.0 E24-E17 N14-N30
      8  310 1252 (N33E49 L= 93)   315     64        0 ( 281/1230- 342/1272)  15.9 E52-E45 N32-N34
      9 1661 1157 (S00W43 L=185)   389    112        0 (1646/1105-1679/1207)  53.1 W40-W45 S02-N02
     10 1840 1113 (S08W58 L=201)   572     78        2 (1798/1082-1873/1138) -12.5 W53-W62 S09-S05
     11 1850  993 (S15W57 L=200)  1234    240        0 (1780/ 898-1886/1083)  25.0 W48-W63 S18-S10
     12 1044  871 (S02E02 L=141)   194     61        0 (1014/ 854-1066/ 899)  33.7 E03-W00 S02-N00
     13 1891  855 (S25W63 L=205)   725     72        1 (1864/ 825-1915/ 887)   7.1 W58-W67 S26-S22
     14  697  775 (S01E24 L=118)   459    139        0 ( 622/ 759- 755/ 802)   0.0 E29-E20 S02-N00
     15 1487  678 (S24W22 L=164)  1426    302        1 (1408/ 548-1555/ 794)  45.0 W14-W27 S31-S18
     16  981  701 (S11E09 L=133)   312    111        0 ( 964/ 647-1004/ 751)  45.0 E11-E06 S13-S08
     17 1255  685 (S18W07 L=149)   221     32        0 (1235/ 666-1280/ 704)   0.0 W05-W08 S18-S16
     18  372  626 (S05E53 L= 90)   517    121        0 ( 348/ 569- 397/ 682) -90.0 E53-E51 S09-S01
     19  988  605 (S17E11 L=132)   676    120        4 ( 947/ 569-1028/ 638)   9.5 E13-E07 S19-S14
     20  830  512 (S20E23 L=119)  1158    362        0 ( 735/ 424- 900/ 591) -76.0 E27-E19 S26-S13
     21  866  317 (S34E29 L=113)  5589    842       11 ( 614/ 171-1196/ 553)  12.7 E82-W00 S44-S24
     22 1560  511 (S38W27 L=169)   490     99        1 (1510/ 475-1606/ 544)   0.0 W22-W31 S40-S36
     23  728  482 (S20E31 L=112)   997    185        3 ( 659/ 440- 786/ 529) -20.6 E35-E26 S22-S15
     24 1519  324 (S54W25 L=168)  1808    175        2 (1434/ 294-1600/ 364)  -8.1 W14-W37 S57-S50
  

    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