Mercurial > octave-nkf
view liboctave/UMFPACK/UMFPACK/Demo/umfpack_zl_demo.sed @ 5164:57077d0ddc8e
[project @ 2005-02-25 19:55:24 by jwe]
author | jwe |
---|---|
date | Fri, 25 Feb 2005 19:55:28 +0000 |
parents | |
children |
line wrap: on
line source
/::/d 1,$s/_xx_/_zl_/g 1,$s/Int/long/g 1,$s/WSIZE/10/ /define ABS/ { s/ABS/ABS(x,z) ((x) >= 0 ? (x) : -(x)) + ((z) >= 0 ? (z) : -(z))/ }