a b/partyMod/R/AAA.R 

  1
  





  
  

  2
  
# $Id$





  
  

  3
  





  
  

  4
  
.onLoad <- function(lib, pkg) {





  
  

  5
  
    GCtorture <<- FALSE





  
  

  6
  
    .Call("party_init", PACKAGE = "atlantisPartyMod")





  
  

  7
  
    return(TRUE)





  
  

  8
  
}