added card-class.R file