Предикат disk/1

Предикат disk используется для изменения текущего диска и катало-

га/подкаталога и имеет формат:

disk(DosPath) /* (i) (o) */

При вызове свободной переменной в качестве параметра disk возвратит

текущий каталог.