Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1 1433 1718 (N48W47 L=187)   681     90        1 (1386/1702-1482/1735) -10.3 W42-W53 N46-N49
      2  740 1421 (N31E18 L=121)   683    203        1 ( 692/1342- 771/1504) -65.6 E23-E15 N25-N36
      3  267 1329 (N25E60 L= 80)  1103    232        2 ( 205/1235- 311/1409)  59.7 E64-E55 N18-N30
      4 1085 1313 (N22W05 L=145)   845    235        3 (1023/1229-1170/1358)  32.0 W01-W11 N16-N24
      5  167 1296 (N22E75 L= 65)  1350    122        1 ( 148/1231- 188/1356) -63.4 E79-E71 N18-N26
      6  679 1297 (N23E22 L=118)   242    100        0 ( 635/1275- 721/1322)  26.6 E25-E19 N21-N24
      7  291 1290 (N23E55 L= 84)   394     47        0 ( 269/1274- 319/1306)  11.3 E58-E52 N21-N23
      8 1877  885 (S11W66 L=206)  1540    163        2 (1852/ 807-1906/ 959)  60.9 W63-W70 S15-S06
      9 1837  920 (S08W60 L=199)   396     60        0 (1822/ 891-1851/ 955) -76.0 W58-W61 S09-S05
     10 1732  896 (S08W49 L=188)   369     81        0 (1713/ 855-1750/ 933) -59.0 W46-W50 S10-S05
     11 1357  868 (S07W20 L=160)   536     91        3 (1325/ 819-1396/ 910) -78.7 W18-W22 S09-S04
     12 1340  784 (S12W19 L=158)   740    311        4 (1193/ 720-1438/ 853)  20.6 W09-W25 S15-S08
     13 1518  804 (S12W31 L=171)   263     43        1 (1500/ 779-1538/ 830)  90.0 W29-W32 S13-S10
     14  773  725 (S13E17 L=122)   475    142        1 ( 735/ 673- 810/ 791)  49.4 E20-E14 S16-S08
     15  358  752 (S11E48 L= 92)   409     63        3 ( 335/ 717- 382/ 779) -76.0 E49-E45 S12-S08
     16 1689  649 (S24W48 L=187)  1723    283        3 (1584/ 542-1766/ 729)  45.0 W39-W55 S30-S19
     17 1356  648 (S21W20 L=160)   275     68        0 (1325/ 619-1387/ 670)  26.6 W18-W22 S22-S19
     18 1431  628 (S23W26 L=165)   436     74        1 (1406/ 584-1456/ 659) -71.6 W23-W27 S26-S20
     19  473  555 (S24E43 L= 96)   866    106        1 ( 446/ 507- 509/ 606)  45.0 E47-E39 S27-S20
     20 1584  456 (S37W44 L=183)   491     97        0 (1536/ 440-1629/ 476)   5.7 W38-W48 S38-S35
     21  399  441 (S32E58 L= 82)  1430    188        0 ( 315/ 426- 486/ 458)   4.1 E74-E46 S33-S31
     22 1269  379 (S41W16 L=155)   350     67        1 (1231/ 363-1306/ 399)   0.0 W12-W19 S41-S39
     23  732  270 (S48E34 L=106)   489     70        0 ( 699/ 251- 767/ 293)  21.8 E38-E28 S49-S45
     24 1401  251 (S55W36 L=176)   522     58        2 (1381/ 232-1425/ 278) -31.0 W32-W42 S57-S51
  

    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