R/all_classes.R

In tomaszbiegacz/yan: Yet Another Neuron

library(methods)

#
# Constant
#

NEW_LINE <- '\n'

#
# Operators
#

'%!in%' <- function(x,y)!('%in%'(x,y))

#
# Classes
#

yan.neuronLogicalUnitInput <- setClass(
  "yan.neuronLogicalUnitInput",
  slots = c(
   cutOff = "numeric"
  )
)

#
# Generics
#

setGeneric("propagation", function(model, input, ...) {
  standardGeneric("propagation")
}, signature = c('model', 'input'))

setGeneric("backpropagation", function(model, input, output, ...) {
  standardGeneric("backpropagation")
}, signature = c('model', 'input'))