pascal subsluts

.