Subject: Test
From: Sergei M. Abramov \(home\) (abram@botik.ru)
Date: Sun Dec 28 2003 - 16:48:32 MSK
День добрый, всем!
К статье про компиляцию синт. отождествления я написал примерчик (приложена
программа, исходник и EXE) -- функцию, которая проверяет, что ее аргумент
имеет вид e.Y e.Y e.Y:
IsTriplet eX = {
eX : e.Y e.Y e.Y = True;
= False;
};
В старом ДОС-рефале-плюс один шаг выполнения этой функции (при длине
аргумента 49152) занимает (на моей машине) 74.26 секунд.
У меня просьбы:
(1) Люба! Пожалуйста, прогони на одной и той же машине этот пример на всех
существующих рефалах (старый Рефал Плюс, новый Рефал Плюс, Рефал Ява, если
возможно, Рефал 5 и т.п.)
(2) Вне зависимости от (1) у меня владельцам рзных рефалов (Р6/Ява, Р5 и
прочее) -- если можно, выполните на одной платформе приложенный test.exe и
затем IsTriplet (или ее аналог)на всех доступных Вам рефалах -- зарание
спасибо!
При прогоне можно выкинуть/переписать разные мелочи... Мне интересует одно:
(а) Что напечатал "test.exe" на Вашей машине;
(б) Время счета "IsTriplet" в Вашей машине на всех иных доступных
Вам рефалах -- при длине аргумента 49152 (делится на 3), аргумент '
ААААА....ААААА', результат -- TRUE.
(3) Всем вопрос: кузявое ли имя функции "IsTriplet"?
Удачи
Сергей
C:\RFP>TEST.EXE
49152
28 ' ' "Dec" ' ' 2003 ' ' 16 ':' 29 ':' 35 '.' 50
TRUE
28 ' ' "Dec" ' ' 2003 ' ' 16 ':' 30 ':' 49 '.' 76
This archive was generated by hypermail 2b25 : Mon Oct 25 2004 - 21:24:59 MSD