S3 classes in R: How to properly define a super- and its subclass?

Question

I try to construct a toy example (for educational purposes) of inheritance in the S3 paradigm. I want to construct a class "Distribution" of general distributions