;;; ************************************************************************ ;;; * Библиотека DWGruLispLib Copyright ©2007 DWGru Programmers Group ;;; * ;;; * dwgru-string-align-to-left ;;; * ;;; * 03/12/2007 Версия 0001. Сергей Зуев (ShaggyDoc) ;;; ************************************************************************ (defun lispru-string-align-to-left (string str_len sym) ;;; выравнивает строку string до длины str_len символом sym слева ;;; Использует функцию библиотеки ;;; _dwgru-string-align ;;; Параметры: ;;; string - исходная строка ;;; str_len - необходимая длинна (Integer) ;;; sym - символ выравнивания (string) ;;; Возврат: ;;; строку (String) ;;; Пример: ;| (lispru-string-align-to-left "123" 10 "0") ;_Результат "0000000123" |; (_lispru-string-align string str_len sym T) )