;"[Start: xcalini.cal]\n" ;[xcalini.cal] Sample User XCAL init file. This file should be customized ; by the user to fit his/her needs. This file should reside in: ; ; IBMPC d:\XCAL\XCALINI.CAL (or whever the "xcal" environ- ; ment variable points to) ; TOPS20 PS:XCALINI.CAL ; VAX_VMS Sys$Login:XCALINI.CAL ; Unix, Ultrix ~/xcalini.cal ; /NE ;Don't echo XCAL files as they are loaded with /L:file /S:E ;Reset Quiet Mode & all possible error conditions /S:S ;Save XCAL's present state ; ;Define some handy functions. (Edit out the crap you don't need and add ; some new functions of your own.) Area(Length,Width)='Length*Width' Volume(Length,Width,Height)='Length*Width*Height' ; Diameter(Radius)='Radius*2' Circum(Radius)='Pi*Diameter(Radius)' CircleArea(Radius)='Pi*Radius^2' CylVolume(Radius,Height)='CircleArea(Radius)*Height' ConeVolume(Radius,Height)='1/2*CylVolume(Radius,Height)' SphereVol(Radius)='4/3*Pi*Radius^3' RightHypot(SideA,SideB)='(SideA^2+SideB^2)^(1/2)' ; Hex(DecimalNum)='/S:S /I:10/O:16 DecimalNum /S:R' Octal(DecimalNum)='/S:S /I:10/O:8 DecimalNum /S:R' ;"[Done: xcalini.cal]\n" ;********************************************************************** ;******* End of xcalini.cal ******* ;**********************************************************************