Skip to content

Instantly share code, notes, and snippets.

View tenomoto's full-sized avatar

Takeshi Enomoto tenomoto

45 followers · 1 following
View GitHub Profile
@tenomoto
tenomoto / pdfextract
Created December 8, 2015 08:37
Extract pages from PDF and save them to separate files
#!/bin/sh
FNAME=$1
shift
for PAGE in $@; do
gs -q -dBATCH -dNOPAUSE -dFirstPage=$PAGE -dLastPage=$PAGE \
-dAutoFilterColorImages=false -dColorImageFilter=/FlateEncode \
-sDEVICE=pdfwrite -sOutputFile=${FNAME%\.pdf}_$PAGE.pdf $FNAME
done
@tenomoto
tenomoto / ann.awk
Last active October 29, 2021 00:34
Scaling factor for the Fourier coefficients of Legendre polynomials
function abs(n)
{
return (n>0)? n : -n
}
function f1(n, i)
{
return sqrt(1 - 1 / (4 * n * n))
}
@tenomoto
tenomoto / glatwgt.awk
Last active June 12, 2016 23:39
Calculate Gaussian points and weights at arbitrary precision with the Fourier-Newton method in MPFR enabled GNU Awk
# gawk -M -v PREC=100 -v lgaqd=1 -v nlat=120 -f glatwgt.awk
function abs(x)
{
return (x > 0) ? x : -x
}
function gamma(y, c)
{
c[1] = 1 / 12
@tenomoto
tenomoto / pdf2eps
Created April 28, 2015 07:59
Create EPS from PDF with white margin cropped using pdfcrop and pdftoeps
#!/bin/sh
if [ $# -lt 1 ]; then
echo "Usage :: $0 input.pdf [p1 p2 ...]"
exit
fi
in=${1}
shift
pdfcrop ${in}
crop=`basename -s .pdf ${in}`-crop
if [ $# -eq 0 ]; then
@tenomoto
tenomoto / dont_show_height_label.ncl
Created December 19, 2013 03:37
gsn_csm_pres_hgt() shows height labels and "Height (km)" on the YR axis by default. To get rid of them, set gsnPresHgtHeightLabelOn to False.
res@gsnPresHgtHeightLabelOn = False