anchor.diff:                  return res
           }
       
  +    ///run makeblastdb in the specified container context with the given commands
       let runMakeBlastDB (bcContext:BioContainer.BcContext) (opt:MakeBlastDbParams list) =
       
           runMakeBlastDBAsync bcContext opt
  
positive.code:                     return res
              }
  
          let runBlastP (bcContext:BioContainer.BcContext) (opt:BlastPParameters list) = 
              runBlastPAsync bcContext opt
              |> Async.RunSynchronously
  
  
          type BlastPShortParams =
              ///Word size of initial match.
              | WordSize of int 
  
negative.code:             static member makeCmdWith (m:MountInfo) = function
                  | CommonOptions     l -> l |> List.map (BlastParams.makeCmdWith m)     |> List.concat
                  | SpecificOptions   l -> l |> List.map (BlastPParams.makeCmdWith m) |> List.concat
          
          ///returns an asynchronous computation that will run `blastp -task blastp` in the specified container context with the given commands
          let runBlastPAsync (bcContext:BioContainer.BcContext) (opt:BlastPParameters list) = 
              let cmds = (opt |> List.map (BlastPParameters.makeCmdWith bcContext.Mount))
              let tp = "blastp"::"-task"::"blastp"::(cmds |> List.concat)
  