require 'duration'
require 'collect'

require 'duration'
require 'collect'
require 'samplelys'

def wcr (sampleVolume, bubblePt, fixTime=60*60, fixDelay=20*60, fixVolume=2) 
  
  Log.record "Whole Cell Archive sampling #{sampleVolume}ml"

  collectSample sampleVolume, bubblePt
  
  fixTime=fixTime.to_f
  fixes=(fixTime/fixDelay).ceil
  Log.record "Initial rinse before fixing for #{Duration.new fixTime}"
  addReagent :fix, 20, fixVolume #evacDelay, pressureVol    
  return if fixes <= 0
  fixDelay = fixTime/fixes
  fixNumber = 0
  while fixNumber < fixes
    fixNumber+=1
    Log.record "Fix ##{fixNumber} of #{fixes} for #{Duration.new fixDelay}"
    addReagent :fix, fixDelay, fixVolume #evacDelay, pressureVol    
    puckEvac bubblePt #evacDelay, pressureVol
  end
end
  
