[BACK]Return to %MUTIL.m CVS log [TXT] [DIR] Up to [Coherent Logic Development] / freem / contrib
File:  [Coherent Logic Development] / freem / contrib / %MUTIL.m
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Sun Jan 19 02:04:04 2025 UTC (2 months, 2 weeks ago) by snw
Branches: MAIN, CoherentLogicDevelopment
CVS tags: v0-63-1-rc1, v0-63-0-rc1, v0-63-0, v0-62-3, v0-62-2, v0-62-1, v0-62-0, start, HEAD
FreeM

%MUTIL	; A.Trocha ; Library [1999/02/01-20:04:22]
	; $Source: /home/cvsroot/freem/contrib/%MUTIL.m,v $
	; $Revision: 1.1.1.1 $ $Date: 2025/01/19 02:04:04 $
	Q
	;
ask(d)	;
	N x R x S x=$TR(x,"ny ","NY"),d=$TR(d,"ny","NY ")
	I x=""!($E(x)=$E(d)) Q 1
	Q 0
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>