東京工業大学大学院理工学研究科基礎物理学専攻中村研究室メンバー

ホームページおぼえがき > 雑記帳

雑記帳



ftp>
gnuplot>
gs>
打ち込まなきゃあかん?

明恵夢記
河合隼雄


FORTRAN 77
はまった
      f(2)→f(2.d0)
      real*8 function f(x)
      real*8 x
      f=x+1
      return

      raw1=250
      raw2=iand(raw1,(z'aa')) ! z''は16進数を表す。iandはビット同士のandをとる演算をする。
      raw3=ior(raw1,(z'aa')) ! z''は16進数を表す。iorはビット同士のorをとる演算をする。
f77では、b'10101010'は2進数、o'70'は8進数、z'f0'は16進数を表す。


DATA文は宣言された変数を初期化する文。
      REAL par1(3),par2(3)
      DATA par1 / 1.0, 2.0, 2*3.0 /,
     &     par2(1) / 1.1 /


gcc バージョン 3.3.6 release (Vine Linux 3.3.6-0vl7)
cernlib 2004
makeana で以下のエラー
/cern/pro/lib/libpacklib.a(cfclos.o)(.text+0xa): In function `cfclos_':
: undefined reference to `rfio_close'
/cern/pro/lib/libpacklib.a(cfget.o)(.text+0x30): In function `cfget_':
: undefined reference to `rfio_read'
......
対処
makefile内 -lpacklib -> -lpacklib_noshift


makefile内で以下の2行はエラーになる

#SRC = usersrc.f usersub.f add_ntuple.f \
SRC = usersrc.f usersub.f add_ntuple.f \

 # でコメントアウトしても 1行目の行末の \ は有効である。

fuse CentOS4.7
/etc/ld.so.conf -> ldconfig
x mknod --mode=606 /dev/fuse c 10 229 

/lib/modules/2.6.9-11.EL/kernel/fs/fuse/fuse.ko
/usr/local/include/fuse/fuse.h
/usr/local/include/fuse/fuse_compat.h
/usr/local/include/fuse/fuse_common.h
/usr/local/include/fuse/fuse_lowlevel.h
/usr/local/include/fuse.h
/usr/local/lib/libfuse.so.2.4.1
/usr/local/lib/libfuse.la
/usr/local/lib/libfuse.a
/usr/local/bin/fusermount
/sbin/mount.fuse
/usr/local/bin/fusermount
/dev/fuse
/etc/udev/rules.d/40-fuse.rules
/usr/local/lib/pkgconfig/fuse.pc
http://jo1upk.blogdns.net/linux/?%E3%82%BD%E3%83%95%E3%83%88%2FFUSE より

プリンタ関係
/usr/bin/lpr -P lpt4 -o Duplex=DuplexNoTumble t.ps
/usr/bin/lpr -P lpt4 -o Duplex=None t.ps
http://localhost:631/

Vine 2.6r4
lprの設定
# printtool
プリンタ設定
# /etc/init.d/lpd restart

a2psインストール
# wget ftp://ftp.riken.go.jp/pub/Linux/vine/VinePlus/2.6/RPMS/i386/a2ps-4.13b-0vl3.i386.rpm
# wget ftp://ftp.riken.go.jp/pub/Linux/vine/VinePlus/2.6/RPMS/i386/psutils-p17-3.i386.rpm
# rpm -ivh psutils-p17-3.i386.rpm
# rpm -ivh a2ps-4.13b-0vl3.i386.rpm

g77インストール
# wget ftp://ftp.riken.go.jp/pub/Linux/vine/VinePlus/2.6/RPMS/i386/gcc-g77-2.95.3-2vl22.i386.rpm
# rpm gcc-g77-2.95.3-2vl22.i386.rpm

vine 4.1 xmkmf
apt-get install XOrg-devel

pdftk in.pdf cat 1E output out.pdf
1ページ目を90度回転?

pdftk A=t.pdf B=t2.pdf C=t3.pdf D=t4.pdf cat A BE CE DE output out.pdf
Eは90度回転


pdf2eps
#!/bin/bash
while [ "$1" != "" ]
do
  if [ -f $1 ]; then
    filename=${1/.pdf}
    if [ "${filename}" != "$1" ]; then
      pdf2ps -sDEVICE=epswrite -sOutputFile=${filename}.eps ${filename}.pdf
    else
      echo "not pdf file: $1"
    fi
  else
    echo "no such file: $1"
  fi
  shift
done


lh2 r

#!/bin/bash
in_file="R405n_080813.txt"
./read_dat ${in_file} > dat

td << EOT
~~~~~~~
~~~~~~~
EOT

out_file=${in_file}
#out_file=${in_file}.dtl
ps2pdf tmp.ps ${out_file}.pdf
gv ${out_file}.pdf

convert -density 54x40 -units PixelsPerInch td_sam_title_1{.ps,_thum.gif} 

C-x [RET] f
euc-jp-unix	文字コードにEUC-JPを指定改行文字はUNIX形式
euc-jp-dos 	文字コードにEUC-JPを指定改行文字はWindows形式
euc-jp-mac 	文字コードにEUC-JPを指定改行文字はmac形式
shift_jis-unix
shift_jis-dos
shift-jis-mac
from UNIXな生活

M-x hexl-mode

印刷リスト
FORTRAN77テキスト
http://www-aos.eps.s.u-tokyo.ac.jp/~takagi/f77-enshu/text/f77-20050419.pdf
猿PAW
http://www-he.scphys.kyoto-u.ac.jp/member/masaya/saru.html
ドリフトチェンバー(中林さん)
http://be.nucl.ap.titech.ac.jp/~nakabayashi/physics/sotsuron.pdf
ドリフトチェンバー(松井さん)
http://be.nucl.ap.titech.ac.jp/~matsui/syuuron.pdf
FORTRAN77リファレンス 日本語
http://www.scl.kyoto-u.ac.jp/scl/appli/appli_manual/SUNWspro/WS6U2/ja/manuals/fortran/f77_lang_ref/reference.pdf


WPA Personal TKIP


参考文献・webページ


ページ制作履歴
2008/01/15 制作開始
2008/01/15 webにアップ