anchor.diff:      CommitTime=rpc:call(FirstNode, floppy, clocksi_iprepare, [TxId]),
       ?assertMatch({ok, _}, CommitTime),
       lager:info("Tx1 sent prepare, got commitTime=..., id : ~p", [CommitTime]),
  -
  +    timer:sleep(1000),
       %% start a different tx and try to read key read_wait_test.
       {ok,TxId1}=rpc:call(LastNode, floppy, clocksi_istart_tx, [now()]),
  +
  +    timer:sleep(100),
   
       lager:info("Tx2 Started, id : ~p", [TxId1]),
       lager:info("Tx2 Reading..."),
  
positive.code:     lager:info("Test3 passed"),
      ok.
  
  %% The following function tests that ClockSI can excute a
  %% read-only interactive tx.
  clockSI_test4(Nodes) ->
  
negative.code:     lager:info("Nodes: ~p", [Nodes]),
      clockSI_test1(Nodes),
      clockSI_test2 (Nodes),
      clocksi_single_key_update_read_test(Nodes),
      clocksi_multiple_key_update_read_test(Nodes),
      clockSI_test4 (Nodes),
      clockSI_test_read_time(Nodes),
      clockSI_test_read_wait(Nodes),
      clockSI_test_certification_check(Nodes),
      clockSI_multiple_test_certification_check(Nodes),
      clocksi_multiple_read_update_test(Nodes),
      rt:clean_cluster(Nodes),
      ok.
  
  