Files
Ingo Karkat e8607294ad
2017-05-26 17:53:23 +02:00

41 lines
981 B
VimL

" ingo/math.vim: Mathematical functions.
"
" DEPENDENCIES:
"
" Copyright: (C) 2016 Ingo Karkat
" The VIM LICENSE applies to this script; see ':help copyright'.
"
" Maintainer: Ingo Karkat <ingo@karkat.de>
"
" REVISION DATE REMARKS
" 1.029.001 27-Dec-2016 file creation
"******************************************************************************
"* PURPOSE:
" Return the power of a:x to the exponent a:y as a Number.
"* ASSUMPTIONS / PRECONDITIONS:
" None.
"* EFFECTS / POSTCONDITIONS:
" None.
"* INPUTS:
" a:x Number.
" a:y Exponent.
"* RETURN VALUES:
" Number.
"******************************************************************************
if exists('*pow')
function! ingo#math#PowNr( x, y )
return float2nr(pow(a:x, a:y))
endfunction
else
function! ingo#math#PowNr( x, y )
let l:r = a:x
for l:i in range(a:y - 1)
let l:r = l:r * a:x
endfor
return l:r
endfunction
endif
" vim: set ts=8 sts=4 sw=4 noexpandtab ff=unix fdm=syntax :