%ɽ   ϵήǾ饤֥꡼ (dcl-5.0) 󥹥ȡ 
%
%   95/06/09 ë 
%


0. Ϥ

Ǥ, Ǿ饤֥פǾСˤĶ SunOS 4.1.3 +
SunFORTRAN 1.4 θǥ󥹥ȡ뤹ˤĤƽҤ٤.

ΥСǤϿ޷ΤȤ, X (X С), PS (ݥȥ
ץ), Tek (ƥȥü) 3Ĥ¸Ƥ. ɥƥȤ
 X11R4 (ʾ) 󥹥ȡ뤵ƤʤФʤʤ. ˥
󥿡ȤƤϥݥȥץбΤΤɬפǤ. X, PS Ȥ⥫顼
νϤбƤ.

饤֥ۤȤ make Ǥʤ, make Ѥ(ƽ˻
Ф) Makefile Ǥ Mkinclude ȤեǤ.
Mkinclude եϤ INSTALL եƱǾ饤֥Υȥå
ǥ쥯ȥˤä, ƥ˰¸뤤ĤΥޥ̾
Ƥ. ä, ǾСȤϰۤʤĶǾ饤֥򥤥
ȡ뤹Ȥˤ,  Mkinclude եŬڤ˽񤭴Ƥ
(3. Mkinclude ե׻), ʲ˽Ҥ٤ΤƱǥ󥹥ȡ
ȤʤϤǤ.

ʤߤ, Τ褦ʴĶǤưǧƤ, sys ǥ쥯ȥβ
ˤϤδĶذܿݤѤ줿 Mkinclude ե㤬
ΤǻȤ줿. ޤ, Ʊǥ쥯ȥˤ NOTE ե⻲Ȥ
.

  a) IBM AIX 3.1.7 + XL Fortran/6000
  b) FACOM UXP + FORTRAN77 EX
  c) HITAC HI-OSF/1-MJ + Optimizing Fortran 77
  d) HP-UX + fort77

1. Fortran  C η絬

ƥ˰¸롼 X ϢΥ롼 C Ѥƽ񤫤
. Fortran  C Ȥη˺ݤƤ, SunFORTRAN ǻȤƤ褦
C ¦δؿ̾ '_' ()դä뤳Ȥ, Fortran ¦
 '_' ʤΥ֥롼(뤤ϴؿ)ȤƸƤ֤ȤǤפ
롼˽äƤ. 

ϸ Fortran ץΥѥ, 롼̾
ƥդä뤳Ȥˤۤʤʤ. SunFORTRAN ǻȤ
Ƥ뤳Τ褦ʷ絬˽äƤʤƥ⤢뤬, Τ褦ʥ
ƥǤ¿ξ Fortran Υѥ饪ץȤƥ
ղä륪ץ(Ȥ IBM AIX XL Fortran/6000 (xlf) Ǥ 
-qextname) ѰդƤ뤳Ȥ¿Τ, ޥ˥奢ʤɤտ
Ȥ줿. 

Fortran ¦˥ղä륪ץ󤬤ʤ, C ¦δ
̾饢äƤФ褤. 0. ϤˡפǼ d) 
 HP 㤬ˤ. ܤ sys ǥ쥯ȥ NOTE 򻲾Ȥ
. 

2. ѥ

make ǥѥ뤪ӥ󥹥ȡ򤹤뤿, ޤѥ򤪤
ʤ.

  % setenv DCLDIR ~/dcl-5.0

Τ褦ˤ줫ܿ褦ȤǾ饤֥꤬֤Ƥǥ쥯
(ǤϤȤ桼Υۡǥ쥯ȥǾ饤֥꤬Ÿ
ƤȤ)Ķѿ DCLDIR ꤹ. δĶѿϸĿͤǥ
֥꡼ۤ, ѤȤˤ⻲ȤΤ .cshrc ˽񤭹
Ȥ褤.

3. Mkinclude ե

ȥåץǥ쥯ȥ (ʤ cd $DCLDIR ǤϤäȤ)  Mkinclude 
Ȥե뤬äƤĤΥޥ̾Ƥ, $DCLDIR ʲ
 Makefile ǤϤξ include ƻȤäƤ.

ޤ, Mkinclude եƬʬˤϥեå롼뤬ҤƤ
. (դĤϥȥȤƤƤư. )

0. ϤˡפǤҤ٤, ǾɸĶʳǤ⤤ʴĶ
Ǿ饤֥ϰܿƤ, κѤ줿 Mkinclude ե뤬 
$DCLDIR/sys βˤΤ, ɬפ˱ $DCLDIR ǥ쥯ȥ˥ԡ
ѹѤФ褤.

Mkinclude եդ٤ޥ̾ȤƼΤΤ.

a) ޥ, 饤֥Ǽꤹޥ

  BINDIR   : dclfrt ʤɤΥޥɤǼǥ쥯ȥ
  LIBDIR   : 饤֥ libdcl.a Ǽ뤿Υǥ쥯ȥ
  DBASEDIR : ǡ١ϢΥեǼ뤿Υǥ쥯ȥ

Ǿ饤֥򥤥󥹥ȡ뤷褦Ȼפäͤ, ɬ root ˤʤ
櫓ǤϤʤǤ, Υޥ̾ϽǤϤ줾,
$DCLDIR/bin, $DCLDIR/lib, $DCLDIR/lib/dcldbase ȤʤäƤ. 
ƺǽ餫饷ƥԤȤϰۤʤ˥󥹥ȡ뤷褦Ȥ
Ȥ, ʬ񤭴ɬפ.

b) X ϢΥץꤹޥ

  XINCPATH : X Ϣ include ե뤬Ƥǥ쥯ȥ
  XLIBPATH : X ϢΥ饤֥(libX11.a)Ƥǥ쥯ȥ
  XLIBOPT  : X ϢѤ饤֥̾

X Ϣ include ե뤬, 餫᥷ƥबõˤ椯ɸŪʥǥ
쥯ȥˤƤ XINCPATH ϻꤷʤƤ褤. ⤷⤽Τ褦
ʤäƤʤ, C Υץץå᤹륪ץȤ㤨

  XINCPATH = -I/usr/X11R5/include

Τ褦˻ꤹ. 

Ʊͤ, X ϢΥ饤֥(ѤΤ libX11.a Τ), 餫
᥷ƥबõˤ椯ɸŪʥǥ쥯ȥˤƤ XLIBPATH 
ꤷʤƤ褤. ⤷⤽Τ褦ˤʤäƤʤ, ᤹
ץȤ㤨

  XLIBPATH = -L/usr/X11R5/lib

Τ褦˻ꤹ. 

X ϢѤ饤֥ libX11.a ΤߤǤ뤬, ƥˤäƤϤ
Ѥ뤿˥ͥåȥطΥ饤֥ libsocket.a libnsl.a ɬ
פȤ뤳Ȥ. Τ褦ʾ XLIBOPT ˤΥ饤֥̾
᤹륪ץȤƽ񤭲äʤФʤʤ. 

c) 饤֥깽ۤ˺ݤ뤤Ĥ˴ؤޥ

  MISC1EXT : misc1 ˤ, ¾ǤѤʤ饤֥̾
  OLDSRC   : ver.4 θŤ󥿡ե᤿ǥ쥯ȥ̾

MISC1EXT ˤ src/misc1 βˤä, ߤΤȤ¾Υ饤֥꤫
Ѥ뤳ȤΤʤ饤֥̾󵭤Ƥ. 0. Ϥˡפ˽
Ƥ褦ʴĶǤ, Υ饤֥⤹٤ƥѥ롦
ȡ뤬ǽǤ뤬, ƥˤäƤ MISC1EXT ΤΤĤ
ޤܿǤʤȤ뤫⤷ʤ. Τ褦ʾ, ޤܿ
ʤ饤֥򤳤ΥꥹȤ鳰ƤФ褤. 㤨, fiolib ΰ
ޤʤ, 

  MISC1EXT = clcklib randlib hexlib reallib

Τ褦 fiolib ꥹȤ鳰Ф褤. 

Ver.4 ѤƤ ver.5 ǳ줿롼 src/grph1/olrsrc,
src/grph2/oldsrc ȤƼƤ. θŤ󥿡ե
ܿ, 

  OLDSRC = oldsrc

Ȼꤹ. Ť󥿡եɬפʤȤ OLDSRC ϶Τޤޤˤ
ƤФ褤.

d) ޥɤӤΥץ˴ؤޥ

  CC      : C ѥ̾
  CFLAGS  : C ѥ餬᤹륪ץ
  FC      : Fortran ѥ̾
  FFLAGS  : Fortran ѥ餬᤹륪ץ
  RANLIB  : 饤֥륳ޥ̾

C  Fortran Υޥ̾ӥѥ饪ץϤ줾Υ
ƥŬڤʤΤꤹ뤳. ƥˤäƤϥ饤֥
ݤ, 饤֥饤֥경ʤФʤʤ.  RANLIB 
ˤϤΥޥ̾ꤹ. ɬפǤʤƥˤĤƤ 
RANLIB Ȥ, Ȥ touch ޥɤʤɤꤷƤФ褤.

e) ޥ˥奢Ѥ륳ޥɤ˴ؤޥ

  JLATEX  : jLaTeX Υޥ̾
  DVI2JPS : dvi ե PS եѴ륳ޥ̾. 

$DCLDIR/doc βˤ jLaTeX ǽ񤫤줿ޥ˥奢뷲. 
 PS ե뤿Υޥ̾ꤹ. 

f) math1/syslib/glpget.f Ѥޥ

  INTMAX
  REALMAX
  REALMIN
  REPSL

ξܺ٤ˤĤƤ src/math1/syslib  NOTE 򻲾Ȥ줿. 

g) misc1/clcklib/clckst.c Ѥޥ

  CLK_PER_SEC
  CLK_RSL_TCK

ξܺ٤ˤĤƤ src/misc1/clcklib  NOTE 򻲾Ȥ줿. 

h) math1/oslib Ѥޥ

  OSLIB

ξܺ٤ˤĤƤ src/math1/oslib  NOTE 򻲾Ȥ줿. 

i) misc1/ranlib Ѥޥ

  RANDLIB

sun4 Ȥ̻Ҥ, SunFORTRAN 1.4 ΥѥѤ
, Ȥ̣Ǥ. SunOS 5 ʹߤǤ SunFORTRAN 2 ʹߤѤǤ
Τ, others 򤹤Ф褤.

ξܺ٤ˤĤƤ src/misc1/randlib  NOTE 򻲾Ȥ줿. 

4. make - ץΥѥ

ޤǽ, ȥåץǥ쥯ȥ (Ĥޤ cd $DCLDIR ǤϤä
Ȥ)

  % make

Ȥ, ɬפʥѥ뤪ӥǡ١եκ,  
$DCLDIR/bin ǥ쥯ȥˤ륳ޥɤ꤬ʤ. 

5. make - 󥹥ȡ

ѥ뤬饤󥹥ȡ򤪤ʤ. 

  % make install

Ȥ, 饤֥ȥǡ١ι, env2 ˤ륢ץꥱ
ץκȤ $DCLDIR/bin ؤΰư, ɬפ˱ 
dclfrt ʤɤΥޥɷ $DCLDIR/bin ؤΰưʤ.

6. ǥץκ

ޤǤɬפʺȤϽäƤΤ,  $DCLDIR/demo ˰ưƥ
ץ.

  % cd $DCLDIR/demo
  % make

make λ, ƥǥ쥯ȥ򲼤äƥǥץ¹ԤƤߤȤ
. եåϤޤΤμ¹ϼỲȤΤ. 

7. 

Ǿ饤֥Ѥˤ dclfrt ޥɤѤ. ϴŪ 
Mkinclude Υޥ̾ FC ǻꤷ Fortran ѥΥޥɤƱ
, ޤǤˤäƺ줿饤֥򤢤餫󥯤
ˤʤäƤ. ΥޥɤѤ뤿ˤ, Mkinclude Τʤ 
BINDIR ǻꤵƤǥ쥯ȥ̾򥷥ѿ $path ˽񤭲äƤ
ʤФʤʤ.  .cshrc ˽񤭲äƤдñǤ. Ȥ
 test01.f Ȥեåޤ༡Τ褦ʥץबäȤ
(դĤ Fortran ѥǤ -o ץǼ¹Էե̾
ꤹ),

      PROGRAM TEST01
 
      WRITE(*,*) 'WORKSTATION ID (I) ? ;'
      CALL SGPWSN
      READ(*,*) IWS
 
      CALL SGOPN(IWS)
      CALL SGFRM
      CALL SGSVPT(0.1,0.9,0.1,0.9)
      CALL SGSWND(0.0,10.0,0.0,10.0)
      CALL SGSTRN(1)
      CALL SGSTRF
      CALL SLPWWR(1)
      CALL SLPVPR(1)
      CALL SGTXZU(5.0,5.0,'TEST FOR GRPH1',0.03,0,0,3)
      CALL SGCLS
 
      END

  % dclfrt -o test01 test01.f

ˤä test01 Ȥ¹ԥե뤬. (ʲɸ饤֥
Ǥ.)

  % test01

Ȥ

  WORKSTATION ID (I) ? ;
  1:X, 2:PS, 3:Tek ;

ȤƤ (ơ̾ΥꥹȤ SGPWNS ˤäƽϤƤ
) Τ, X ɥƥबưƤ֤1Ϥȥ
ɥ, ɥΰ֤ꤹ褬Ϥޤ. ڡ, 
ɽνλϥåǤʤ.  2 (PS)ꤹ, dcl.ps Ȥե
뤬ȥǥ쥯ȥˤǤΤ

  % lpr dcl.ps

Ȥ PostScript ץ󥿡˽Ϥ. ޤ3 (Tek)ꤹȥ
ȥüǤ褬ǽǤ.

8. ޥ˥奢κ

Ǿ饤֥꤬󥹥ȡ뤵Ƥ뤳ȤǧǤ, ɬפ
ƥޥ˥奢. (ޥ˥奢ˤϥǥץμ¹Է̤
ޤΤ, Ǿ饤֥꤬ܿƤʤȥޥ˥奢
Ǥʤ. Τ褦ʾ, ǾС֤Ƥޥ˥奢 
PS ե뷲 ftp ƽϤ줿. )

ޥ˥奢 jLaTeX ǽ񤫤Ƥ dennou.sty Ȥե뤬
ɬפǤ.  $DCLDIR/etc/texsty ˼ƤΤ

  % setenv TEXINPUTS .:$DCLDIR/etc/texsty:/usr/local/lib/tex/macros

ʤɤȤƥѥ̤Ƥɬפ. 

ޤ, 3. Mkinclude եפΤȤǤǤҤ٤ JLATEX, DVI2JPS 
ޥ̾ꤷƤʤФʤʤ. 

򤷤, 

  % cd $DCLDIR/doc
  % make

Ȥȳƥޥ˥奢 PS ե뤬. 

  % make install

Ȥ,  PS ե $DCLDIR/ps Ȥǥ쥯ȥ˥ԡ
. 

ߤΤȤʲΤ褦ʥޥ˥奢뤬ѰդƤ. 

  gokuraku, rakuraku, math1, math2, misc1, grph1, grph2, sample, etc

ޤǽ, Ǿ饤֥Τä˥եåطγѤ򤹤ˤ 
gokuraku ܤ̤줿. Ǥ, Ȥ grph2 Υ롼Ȥä
ޤդ䥳󥿡ץåȤ򤹤꤫ñ˵Ƥ. 
˾ܤҤ rakuraku ˤʤƤ. math1, math2, misc1, grph1,
grph2 Ϥ줾бѥåΥץޡޥ˥奢Ǥ. 
֥롼ؿεǽȻȤܤҤƤ. sample  
grph1, grph2 Υץ뽸Ǥ. etc ˤǾѤ TeX ե
,  PS եβùΤ񤫤Ƥ(ߤΤ
, ޤ Ver.5 бƤʤ)

9. 

ǥڡ;͵ʤ, 󥹥ȡ˺줿֥
ȥե, 뤤ϥǥץ, TeX ϢΥեõ. ȥ
ץǥ쥯ȥ

  % make clean

ȤѤʥե뤬õ. 

ʤ, 

  % make clean.all

Ȥ, 饤֥ʤɤ⤹٤ƾõ. 
