home *** CD-ROM | disk | FTP | other *** search
- # $Id: aset7.tst 1.1 1993/03/09 13:01:31 Ricki Exp $
- # Test file for ASETs miscellanous functions
- #
- # $Log: aset7.tst $
- # Revision 1.1 1993/03/09 13:01:31 Ricki
- # Initial revision
- #
-
- #
- #-------AIF
- #
- a=aif(4.5,'a','b','c')
- a=aif(0,'d','e','f')
- a=aif(-1.3,e,pi,eps)
- #
- a=aif
- a=aif()
- a=aif('a','b','c','d')
- a=aif(1,2,3)
-
- #
- #-------ARGS
- #
- a=args(4.5,'a','b','c')
- a=args(0,'d','e','f')
- a=args(-1.3,e,pi,eps)
- #
- a=args
- a=args()
- a=args('a','b','c','d')
- a=args(1,2,3)
-
- #
- #-------BOOTDRV
- #
- a=bootdrv
- a=bootdrv()
- #
- a=bootdrive(a)
-
- #
- #-------DOSVER
- #
- a=dosver
- a=dosver()
- #
- a=dosver(a)
-
- #
- #-------ENVCNT
- #
- a=envcnt
- a=envcnt()
- #
- a=envcnt(a)
-
- #
- #-------ENVUSED
- #
- a=envused
- a=envused()
- #
- a=envused(a)
-
- #
- #-------IF
- #
- a=if(1,'a','b')
- a=if(0,'d','e')
- a=if(e gt 2.0,'t','f')
- #
- a=if
- a=if()
- a=if('a','b','c')
- a=if(1,2,3,4)
-
- #
- #-------MAX
- #
- a=max(-10,0,10,20,30)
- a=max(0)
- a=max(1,2,'A')
- #
- a=max
- a=max()
-
- #
- #-------MIN
- #
- a=min(-10,0,10,20,30)
- a=min(0)
- a=min(1,2,'A')
- #
- a=min
- a=min()
-
- #
- #-------NTHARG
- #
- a=ntharg(2,4.5,'a','b','c')
- a=ntharg(1,'d','e','f')
- a=ntharg(4,e,pi,eps)
- #
- a=ntharg
- a=ntharg()
- a=ntharg(0,'a','b','c','d')
- a=ntharg(a,1,2,3)
-
- #
- #-------RAMFREE
- #
- a=ramfree
- a=ramfree()
- #
- a=ramfree(a)
-
- #
- #-------TYPE
- #
- a=type
- a=type()
- a=type('0')
- a=type('1')
- a=type(-1)
- a=type(10)
- a=type(pi)
- a=type(-e)
- a=type('abc')
- #
- a=type(1,2)
-
-