Color  xc   yc  (LatLon LCarr)  Area Length Branches (  x0/y0     x1/y1  )  Tilt Location
      1  607 1542 (N35E26 L=129)   389     79        2 ( 591/1501- 633/1588) -66.8 E28-E23 N31-N38
      2  908 1520 (N30E04 L=152)   272     96        1 ( 869/1488- 950/1550) -45.0 E06-E01 N27-N32
      3  299 1492 (N34E57 L= 99)   510     56        1 ( 279/1462- 322/1514)  45.0 E59-E54 N32-N35
      4  372 1392 (N26E45 L=111)  1020    172        5 ( 334/1307- 399/1470) -70.0 E50-E41 N20-N31
      5  680 1400 (N24E20 L=136)   507    128        0 ( 634/1361- 731/1444) -40.6 E23-E16 N21-N27
      6  436 1303 (N20E38 L=118)   257     54        1 ( 416/1272- 463/1328)  45.0 E39-E35 N18-N21
      7  280 1278 (N20E52 L=104)   512    101        2 ( 253/1233- 305/1325) -80.5 E54-E49 N16-N22
      8  174 1281 (N21E66 L= 90)   640     72        4 ( 151/1244- 199/1310)  36.9 E69-E62 N19-N22
      9 1423 1074 (S01W25 L=181)   500    119        4 (1364/1032-1463/1110) -15.9 W20-W27 S04-N00
     10 1895  978 (S10W65 L=221)   804    101        2 (1869/ 926-1918/1019) -45.0 W61-W69 S12-S07
     11 1805  972 (S10W54 L=210)   506    103        0 (1771/ 924-1844/ 999)  29.7 W51-W58 S12-S08
     12 1807  858 (S17W55 L=211)   809    109        4 (1766/ 815-1838/ 907)  45.0 W51-W58 S19-S13
     13 1359  800 (S17W19 L=175)   335    150        0 (1296/ 767-1422/ 840)  20.6 W15-W23 S19-S15
     14  720  711 (S18E22 L=134)   302    111        2 ( 708/ 658- 750/ 762)  74.1 E23-E19 S21-S14
     15 1361  673 (S25W20 L=176)  1084    433        1 (1208/ 537-1530/ 744)  25.6 W08-W31 S33-S21
     16  282  706 (S14E57 L= 99)   370     52        1 ( 259/ 683- 313/ 724)   9.5 E59-E53 S15-S13
     17 1739  635 (S30W53 L=209)   952    168        2 (1702/ 602-1793/ 674) -14.0 W48-W60 S32-S27
     18  474  622 (S21E42 L=114)   251     54        0 ( 458/ 598- 495/ 651)  56.3 E43-E40 S22-S19
     19  368  556 (S25E54 L=102)   504     84        1 ( 343/ 520- 396/ 595) -80.5 E56-E52 S27-S21
     20  764  554 (S28E22 L=134)   387     65        0 ( 730/ 531- 811/ 575)   0.0 E24-E18 S29-S26
     21  934  426 (S39E13 L=143)   870    204        0 ( 863/ 367-1002/ 505) -57.5 E16-E08 S44-S32
     22 1096  417 (S41E00 L=156)   981    191        1 (1005/ 381-1179/ 468)   8.7 E07-W06 S43-S37
     23 1396  246 (S60W35 L=191)  1134    123        2 (1344/ 223-1460/ 282)  -6.0 W26-W45 S62-S55
  

    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