diff --git a/repository/Grafoscopio-Utils/Markdeep.class.st b/repository/Grafoscopio-Utils/Markdeep.class.st
new file mode 100644
index 0000000..c3489ee
--- /dev/null
+++ b/repository/Grafoscopio-Utils/Markdeep.class.st
@@ -0,0 +1,126 @@
+"
+I model a Mardeep file as described in https://casual-effects.com/markdeep/
+"
+Class {
+ #name : #Markdeep,
+ #superclass : #Object,
+ #instVars : [
+ 'tocStyle',
+ 'header',
+ 'tail',
+ 'body',
+ 'language',
+ 'markdownFile'
+ ],
+ #category : #'Grafoscopio-Utils'
+}
+
+{ #category : #'as yet unclassified' }
+Markdeep class >> fromMarkdownFile: aFileReference [
+ ^ self new fromMarkdownFile: aFileReference.
+]
+
+{ #category : #accessing }
+Markdeep >> body [
+ ^ body
+]
+
+{ #category : #accessing }
+Markdeep >> body: anObject [
+ body := anObject
+]
+
+{ #category : #'instance creation' }
+Markdeep >> contents [
+ | output |
+ output := '' writeStream.
+ output
+ nextPutAll: self header; crlf;
+ nextPutAll: (self body); crlf;
+ nextPutAll: self tail.
+ ^ output contents.
+]
+
+{ #category : #utilities }
+Markdeep >> fontAwesomeHeader [
+ "I enable the font awesome support in the document header"
+
+ ^ '
+'
+]
+
+{ #category : #'instance creation' }
+Markdeep >> fromMarkdownFile: aFileReference [
+ "I create a Markdeep document from a given Markdown file."
+ self processMarkdownFor: aFileReference.
+ ^ self contents.
+]
+
+{ #category : #accessing }
+Markdeep >> header [
+ ^ self fontAwesomeHeader
+]
+
+{ #category : #accessing }
+Markdeep >> header: anObject [
+ header := anObject
+]
+
+{ #category : #accessing }
+Markdeep >> language [
+ ^ language
+]
+
+{ #category : #accessing }
+Markdeep >> language: anObject [
+ language := anObject
+]
+
+{ #category : #accessing }
+Markdeep >> markdownFile [
+ ^ markdownFile
+]
+
+{ #category : #accessing }
+Markdeep >> markdownFile: aFileReference [
+ "I provide information about which Markdown file was used to generate the Markdeep body"
+ markdownFile := aFileReference
+]
+
+{ #category : #'instance creation' }
+Markdeep >> processMarkdownFor: aFileReference [
+ "comment stating purpose of message"
+ self markdownFile: aFileReference.
+ self body: (self markdownFile contents).
+]
+
+{ #category : #accessing }
+Markdeep >> tail [
+ "I enable the document tail, which, in turn, enables a Markdeep document"
+ ^ '
+
+
+
+
+
+
+ '
+]
+
+{ #category : #accessing }
+Markdeep >> tail: anObject [
+ tail := anObject
+]
+
+{ #category : #accessing }
+Markdeep >> tocStyle [
+ ^ tocStyle
+]
+
+{ #category : #accessing }
+Markdeep >> tocStyle: anObject [
+ tocStyle := anObject
+]