anchor.diff:                  | CommonOptions     l -> l |> List.map (BlastParams.makeCmdWith m)     |> List.concat
                   | SpecificOptions   l -> l |> List.map (BlastNParams.makeCmdWith m) |> List.concat
                   
  +        ///returns an asynchronous computation that will run `blastn -task blastn` in the specified container context with the given commands
           let runBlastNAsync (bcContext:BioContainer.BcContext) (opt:BlastNParameters list) = 
               let cmds = (opt |> List.map (BlastNParameters.makeCmdWith bcContext.Mount))
               let tp = "blastn"::"-task"::"blastn"::(cmds |> List.concat)
  
positive.code:             | TaxIdMapFile (path)   -> ["-taxid_map"    ; MountInfo.containerPathOf m path]
              | Logfile(path)         -> ["-logfile"      ; MountInfo.containerPathOf m path]
      
      let runMakeBlastDBAsync (bcContext:BioContainer.BcContext) (opt:MakeBlastDbParams list) = 
      
          let cmds = (opt |> List.map (MakeBlastDbParams.makeCmdWith bcContext.Mount))
  
negative.code:                     return res
              }
  
          ///run `blastp -task blastp-short` in the specified container context with the given commands
          let runBlastPFast (bcContext:BioContainer.BcContext) (opt:BlastPFastParameters list) = 
              runBlastPFastAsync bcContext opt
              |> Async.RunSynchronously