pascal-subsluts Κλιπ (1137)