Link initailization for FRED and FREDL
==========================================================================

Identify the following code (in simplex-link)... in  tcl/lib/ns-lib.tcl

      if {[string first "RED" $qtype] != -1} {
      $q link [$link_($sid:$did) set link_]
      }

... and add the following lines after it:

      # CSFQ-begin
      if {[string first "FRED" $qtype] != -1} {
      $q link [$link_($sid:$did) set link_]
      }
      if {[string first "FREDL" $qtype] != -1} {
      $q link [$link_($sid:$did) set link_]
      }
      # CSFQ-end