DELTA
SVN   ‘6ƒB…‚@FƒDJ­ESŒ@I EJ€QD‚†R‚F‚+„S‚5‚G‚G‹EJ“GU‰GU“Eƒ3ˆJƒDƒJƒ"‡Hƒ3Nƒ<YƒIRƒ‹Fƒ*‡EƒbL„#H„0„H„8J„DHƒBOƒy…E„[J…ˆH…Q…J…J‚wŸJ…`„D‚J…`”D†!G† GHŒV†L†	–E†p…Q†1ƒ]†mI…a†H…E†;—N†YŽQ†1ƒEˆFUE‡N‡E…E…E…/Dˆ>‚S‡kŠGIIˆM†Z†E…nŽN†1ˆO‰J‚w„Mƒc„P„0F„DQ„tRˆy‡D‰MV‰‚G‰.NŠCL†	ˆOŠOŠOˆIF‹R‹‡M‡jL‰A‰Nƒc„ƒD„:QŠH…bˆD‹ƒI†1Iˆ%ƒD‡YHŒ[RƒyOƒRŒDƒ)‚J„3JŠUŒH‚K‹6NŒjD‡^FdIGI‚x—DƒS†[Yˆ3S‡	jˆ3G‡~Vˆ\ˆJQˆ	KˆwDŒRŠNŠP…NŒH¤Dƒ>MŠQ…c)JŽ5…I…nMˆgƒHˆ…!-
! Copyright (C) 2000-2004 GFD Dennou Club. All s reserved.
 PROGRAM G2PK01

	use dcl

	integer,parameter :: nx=15,ny=15

	real,dimension(nx)ux,uywyy,uxx,cx,cy,z

!*/ SET PARAMETERS /
DO I=1,NX  UX(I)=(I-1.0)/(NX
	end doJYY(J)=(JY  CX(I,J) = + 0.1*Y0.2*CXMIN0AX = 1.1YYGRAPHIC /
	call DclOpenGraphicsNewFSetViewPort(0.15,0.8) CALL GRSVPTWindow(UX(1),UX(NX),UYY(NY)WNDG2Fctr2SCTR(NX,NY,UX,UY,CX,CYTransNumber(51TRN SGSCWD(,,AXFunction
 FParm(':LCLIP',.TRUE.SGLSET('TONEZ	Hatch:LUEXGrid(UXWSGXA(UX,NYYYA(UY,NhadeContour(zGRID LINEUYW=DrawLineUYWPLUW(W,AXES (Switch to ITR==1)1ScaledAxisSDAXSTitle('T','BOTH X & Y TRANSFORMED',0XSTTLCloseCLS END
ENDREP
DELTA
SVN   ŽVƒi„‚@FƒDJ­ESŒ@I EJHU•Hj“M‚	‚G‚‚P‚D‚ˆG‚ML‚	S‚X‡D‚‚GH…JqƒHj•Fƒ:I‚ŒGUD‚ŽEƒn†Iƒ]H‚“EƒfƒE‚^‹KƒJƒDƒXJƒ]‡HƒnEƒnE„/J„5Hƒ&…D„Fƒ:JƒJQ„ID…QƒUD‚UƒD„E„Z†J„ƒK„
DU‚D…GK„7L„uHƒ‡Jƒ#œD„„Lƒ&†J‚	F†7ƒNƒ%ˆH‚^G‡ƒN‡D‡:G‡9O‡‹G‚‚E‡`E‚P‡J†N‡„Dz„D‚6‰I‚]J‡J†„Jƒ#„T…"S…7I…LDƒg†E„ZE…vP…|S„uDƒ.„Dƒ6DˆRˆMˆ5ŠDƒO‰j…K‚[G‰NDˆR„Eˆ!Eˆ"L†‡Kƒ"„T…"S…7D‚/E„E„ZDŠP…|M†X‚Dˆ Eˆ)F‹R„u…PƒVD‹ZP„JDƒd‚J‰DŠa‹‡F‚]T†˜Pƒ#‹Dˆ.ƒD‚TFƒNŠ G‡WF
FFUDˆOˆFˆCL‰j…Mw‹G‚D„mN%‚I†{„*-
* Copyright (C) 2000-2004 GFD Dennou Club. All s reserved.
 PROGRAM G2PK02
ARAMETER(NX=15,NY=15)REAL UX(NX), UY(NY)YWXWC,NY), CYZTERRAIN

/ SETS /CALL GLRGET('RUNDEF',DO 10 I=1,NX I)=(I-1.0)/(NX - 0.5I) = 0.1 * EXP(-24***210 CONTINUE5 JYY(J)=(JY5X(1,12 I,J*(1.0-) +202GRAPHICWRITE(*,*) ' WORKSTATION ID ? ;'SGPWSNDIWSROPN(IWSFRMSVPT(0.15,0.8SWND(UX(1),UYTRN(512SCT, NY,UY, CX,CFTONEDO 33Z * (1-33UELSL',.TRUE.UWSGXA(UX,YA(UY(Z, )ID LINEDO 444LUWDO 550W(5Y,UXW,U5AXES  (Switch to ITR==1)2QCTM(CXMINMAXYMASDAXSXSTTL('T',' FOLLOWING',0CLEND
ENDREP
DELTA 20 0 233
SVN  vŽ
 Šx ˆ ƒŠi	gt2dlibENDREP
DELTA 47 1233 824
SVN  p‘+"m  £ b‹ ‰-‚u˜ 7ŒE£ B{„ /A

!include $(ROOTDIR)\MkInclude.win            gt2dlib_interface.f90 
	$(FC) /c /Fo$(OBJDIR)\ dcl_f77.f90copyENDREP
DELTA
SVN   ‚77j‚pžs G>GHI4ƒJ¢EI†D4ŠK;EH„J)DGDsJDsF>E‚E.!-
!interface module of gt2dlib
_
  	subroutine g2fctr(ux,uy,cx,cy)

 REAL,	nt(in) :: end 
!uzpack libraryENDREP
DELTA 36 0 48
SVN  ™?™L
 „{ ˆ ”I„v	gt2dlibENDREP
DELTA 48 467 957
SVN  ‹P‹^ ‚v  ‚‚v †R„~  gt2dlib.f90
ENDREP
DELTA
SVN   ‚8*‚pžs G>ƒDL€BE-‡D	‹KGGS†WAƒK1‚D‚F>!-
!interface module of gt2dlib
int  use dcl_common
  contains

    subroutine DclG2fctr(ux,uy,cx,cy)  real,ent(in) :: call gend


ENDREP
PLAIN
K 13
svn:eol-style
V 6
native
END
ENDREP
id: 2ps.3.r59/2948
type: file
count: 0
text: 59 2405 171 311 e61f4cd9e7f6eb55764d85c85e5b68d5
props: 59 2901 34 0 25e6c2f7558b7484000d4d090dea5b92
cpath: /branches/develop/src/f77/gt2dlib_interface.f90
copyroot: 46 /branches/develop

id: 2mt.3.r59/3182
type: file
pred: 2mt.0.r20/1079
count: 5
text: 59 2175 29 1805 95a0b124fcc2053e7ad27935c2df68f2
props: 2 3402708 81 0 685faf6a4230ea531a31a12e4b3cb565
cpath: /branches/develop/src/f77/Makefile
copyroot: 46 /branches/develop

id: 2pl.3.r59/3426
type: file
pred: 2pl.3.r48/1701
count: 2
text: 59 2226 154 2219 e40f056aacc63062c88bbf0d385ca975
props: 47 3286 34 0 25e6c2f7558b7484000d4d090dea5b92
cpath: /branches/develop/src/f77/Makefile.win
copyroot: 46 /branches/develop

PLAIN
K 8
Makefile
V 19
file 2mt.3.r59/3182
K 12
Makefile.win
V 19
file 2pl.3.r59/3426
K 17
bit_interface.f90
V 20
file 2lj.0.r39/45912
K 17
blk_interface.f90
V 20
file 2nk.0.r39/40905
K 7
bug.txt
V 20
file 3q.0.r2/3404303
K 17
chg_interface.f90
V 20
file 2lz.0.r39/53667
K 17
chk_interface.f90
V 20
file 2nr.0.r39/40222
K 17
chn_interface.f90
V 20
file 2n7.0.r39/48417
K 17
chr_interface.f90
V 20
file 2nd.0.r39/49102
K 17
clc_interface.f90
V 20
file 2me.0.r39/53439
K 17
ctr_interface.f90
V 20
file 2lf.0.r39/50469
K 17
dat_interface.f90
V 20
file 2mr.0.r39/45455
K 11
dcl_f77.f90
V 21
file 11h.0.r2/3403096
K 17
fft_interface.f90
V 20
file 2m5.0.r39/42953
K 17
fio_interface.f90
V 20
file 2nx.0.r39/52524
K 17
fmt_interface.f90
V 20
file 2m0.0.r39/46824
K 17
fnc_interface.f90
V 20
file 2nj.0.r39/47735
K 17
gnm_interface.f90
V 20
file 2lh.0.r39/49785
K 16
gr_interface.f90
V 20
file 2ni.0.r39/41133
K 21
gt2dlib_interface.f90
V 19
file 2ps.3.r59/2948
K 17
hex_interface.f90
V 20
file 2mj.0.r39/46596
K 17
ifa_interface.f90
V 20
file 2n5.0.r39/47281
K 17
ind_interface.f90
V 20
file 2mg.0.r39/41815
K 17
int_interface.f90
V 20
file 2n0.0.r39/44545
K 18
intr_interface.f90
V 20
file 2mq.0.r39/52296
K 13
lower_routine
V 21
file 1x1.0.r2/3399472
K 17
lrl_interface.f90
V 20
file 2lm.0.r39/44317
K 17
map_interface.f90
V 20
file 2mn.0.r39/45683
K 17
mis_interface.f90
V 20
file 2ms.0.r39/52982
K 17
ode_interface.f90
V 20
file 2mp.0.r42/11294
K 16
os_interface.f90
V 20
file 2mz.0.r39/50013
K 17
ran_interface.f90
V 20
file 2my.0.r39/46368
K 17
rea_interface.f90
V 20
file 2ml.0.r39/52069
K 17
rfa_interface.f90
V 20
file 2lo.0.r39/48190
K 17
rfb_interface.f90
V 20
file 2na.0.r39/41587
K 17
rnm_interface.f90
V 20
file 2nh.0.r39/51383
K 16
sc_interface.f90
V 20
file 2mm.0.r39/47506
K 16
sg_interface.f90
V 20
file 2nm.0.r42/12883
K 17
sht_interface.f90
V 20
file 2nb.0.r39/51839
K 16
sl_interface.f90
V 20
file 2nw.0.r39/42726
K 16
st_interface.f90
V 20
file 2lx.0.r39/43408
K 17
sub_interface.f90
V 20
file 2ng.0.r39/47052
K 16
sw_interface.f90
V 20
file 2mo.0.r42/13339
K 17
sys_interface.f90
V 19
file 2mi.3.r48/1448
K 16
sz_interface.f90
V 20
file 2ma.0.r39/45000
K 17
tim_interface.f90
V 20
file 2le.0.r39/53210
K 16
uc_interface.f90
V 20
file 2m1.0.r39/40450
K 16
ud_interface.f90
V 20
file 2mb.0.r42/12659
K 16
ue_interface.f90
V 20
file 2m2.0.r42/11522
K 16
ug_interface.f90
V 20
file 2ln.0.r42/11749
K 16
uh_interface.f90
V 20
file 2m4.0.r39/48874
K 16
ul_interface.f90
V 20
file 2lv.0.r42/13112
K 16
um_interface.f90
V 20
file 2lr.0.r42/12204
K 16
us_interface.f90
V 20
file 2m7.0.r42/12431
K 16
uu_interface.f90
V 20
file 2lk.0.r39/44090
K 16
uv_interface.f90
V 20
file 2m3.0.r39/50927
K 16
uw_interface.f90
V 20
file 2lq.0.r39/44773
K 16
ux_interface.f90
V 20
file 2ls.0.r39/51155
K 16
uy_interface.f90
V 20
file 2lt.0.r39/45228
K 16
uz_interface.f90
V 20
file 2ll.0.r42/13568
K 17
via_interface.f90
V 20
file 2lg.0.r39/52753
K 17
vib_interface.f90
V 20
file 2np.0.r39/46140
K 17
vra_interface.f90
V 20
file 2li.0.r39/50241
K 17
vrb_interface.f90
V 20
file 2nq.0.r39/43862
K 17
vst_interface.f90
V 20
file 2ld.0.r39/42270
K 17
xfc_interface.f90
V 20
file 2mu.0.r39/49558
END
ENDREP
id: 3p.3.r59/6869
type: dir
pred: 3p.3.r58/3144
count: 12
text: 59 3673 3183 3183 5e29e0257a492a72477066fec36ed744
cpath: /branches/develop/src/f77
copyroot: 46 /branches/develop

id: 2n9.3.r59/7049
type: file
pred: 2n9.0.r36/475
count: 7
text: 59 2589 29 3276 a02bd72be1ae48e0c651a576bf9bb6fd
props: 2 3423184 81 0 685faf6a4230ea531a31a12e4b3cb565
cpath: /branches/develop/src/f90/Makefile
copyroot: 46 /branches/develop

PLAIN
K 13
svn:eol-style
V 6
native
END
ENDREP
id: 2pt.3.r59/7339
type: file
count: 0
text: 59 2704 184 312 4bef09d6c678f1236c58dfdc8e0f9312
props: 59 7292 34 0 25e6c2f7558b7484000d4d090dea5b92
cpath: /branches/develop/src/f90/gt2dlib.f90
copyroot: 46 /branches/develop

id: 2pe.3.r59/7563
type: file
pred: 2pe.3.r48/5314
count: 3
text: 59 2639 41 1502 1eb7a9c36533208a34ef937cfaed09ca
cpath: /branches/develop/src/f90/Makefile.win
copyroot: 46 /branches/develop

PLAIN
K 8
Makefile
V 19
file 2n9.3.r59/7049
K 12
Makefile.win
V 19
file 2pe.3.r59/7563
K 10
blklib.f90
V 21
file 1hk.0.r2/3418820
K 10
chglib.f90
V 20
file 2m8.0.r39/60950
K 10
chklib.f90
V 20
file 2nc.0.r39/61833
K 10
ctrlib.f90
V 20
file 2no.0.r39/59626
K 11
datelib.f90
V 20
file 2n8.0.r39/57857
K 7
dcl.f90
V 18
file z.0.r39/62439
K 14
dcl_common.f90
V 21
file 28k.0.r2/3422086
K 12
dcl_parm.f90
V 21
file 2ec.0.r2/3424164
K 9
entry.lst
V 21
file 264.0.r2/3420305
K 10
fftlib.f90
V 20
file 2md.0.r39/62875
K 10
gnmlib.f90
V 20
file 2nn.0.r39/63542
K 10
grpack.f90
V 21
file 2h9.0.r2/3420602
K 11
gt2dlib.f90
V 19
file 2pt.3.r59/7339
K 11
indxlib.f90
V 21
file 2dk.0.r2/3425944
K 10
intlib.f90
V 20
file 2n1.0.r39/60068
K 11
intrlib.f90
V 20
file 2mh.0.r39/62653
K 10
lrllib.f90
V 21
file 29y.0.r2/3430653
K 10
maplib.f90
V 20
file 2ly.0.r39/57635
K 9
oslib.f90
V 20
file 2n3.0.r39/63321
K 10
rfalib.f90
V 20
file 2mv.0.r39/57192
K 10
rfblib.f90
V 20
file 2pb.0.r39/62275
K 10
rnmlib.f90
V 20
file 2lw.0.r39/60289
K 12
sample01.f90
V 19
file 2pf.0.r44/2619
K 10
scpack.f90
V 20
file 2m6.0.r39/57412
K 10
sgpack.f90
V 20
file 2n4.0.r39/58520
K 11
shtrlib.f90
V 20
file 2mk.0.r39/63098
K 10
slpack.f90
V 20
file 2ns.0.r39/59404
K 10
syslib.f90
V 20
file 2mc.0.r39/58079
K 11
timelib.f90
V 20
file 2lu.0.r39/60508
K 10
udpack.f90
V 20
file 2nt.0.r39/58299
K 10
uepack.f90
V 20
file 2nl.0.r39/58742
K 10
ugpack.f90
V 20
file 2mf.0.r39/58963
K 10
uhpack.f90
V 20
file 2ny.0.r39/59183
K 10
uipack.f90
V 19
file 2pg.0.r44/2760
K 10
umpack.f90
V 20
file 2nf.0.r42/17094
K 10
uspack.f90
V 20
file 2m9.0.r39/60728
K 10
uupack.f90
V 20
file 2ne.0.r39/61170
K 10
uvpack.f90
V 20
file 2nv.0.r39/61391
K 10
uwpack.f90
V 20
file 2nu.0.r39/61612
K 10
uzpack.f90
V 20
file 2lp.0.r39/62055
END
ENDREP
id: d.3.r59/9542
type: dir
pred: d.3.r57/1743
count: 17
text: 59 7756 1773 1773 4e9cc0d1353fbd0c9932ed41182b7b43
cpath: /branches/develop/src/f90
copyroot: 46 /branches/develop

PLAIN
K 12
Makefile.win
V 19
file 2pk.3.r47/6974
K 3
f77
V 17
dir 3p.3.r59/6869
K 3
f90
V 16
dir d.3.r59/9542
END
ENDREP
id: c.3.r59/9841
type: dir
pred: c.3.r58/3442
count: 19
text: 59 9720 108 108 142abe9e0c01d5286fec3c12595ae239
cpath: /branches/develop/src
copyroot: 46 /branches/develop

PLAIN
K 13
svn:eol-style
V 6
native
END
ENDREP
id: 2pq.3.r59/10060
type: file
count: 0
text: 59 0 1107 2230 39894eba43b752716adf0445b2520577
props: 59 10013 34 0 25e6c2f7558b7484000d4d090dea5b92
cpath: /branches/develop/doc/g2pk01.f90
copyroot: 46 /branches/develop

PLAIN
K 13
svn:eol-style
V 6
native
END
ENDREP
id: 2pr.3.r59/10327
type: file
count: 0
text: 59 1120 1042 1878 c3c3a50355d4e1d2650d3f04a030058c
props: 59 10280 34 0 25e6c2f7558b7484000d4d090dea5b92
cpath: /branches/develop/doc/g2pk02.f90
copyroot: 46 /branches/develop

PLAIN
K 2
en
V 14
dir 1q.9.r53/0
K 10
g2pk01.f90
V 20
file 2pq.3.r59/10060
K 10
g2pk02.f90
V 20
file 2pr.3.r59/10327
K 2
jp
V 16
dir 10.a.r53/185
K 8
tutorial
V 17
dir 4.6.r54/20765
END
ENDREP
id: 2pn.3.r59/10743
type: dir
pred: 2pn.3.r54/21068
count: 4
text: 59 10550 180 180 2774b197903bda7617b04d0c39403f58
cpath: /branches/develop/doc
copyroot: 46 /branches/develop

PLAIN
K 7
INSTALL
V 19
file 2n6.0.r30/6740
K 12
INSTALL.auto
V 19
file 2p3.0.r28/1758
K 8
Makefile
V 18
file 2mx.0.r19/436
K 12
Makefile.win
V 18
file 2pi.3.r55/512
K 13
MkInclude.win
V 18
file 2pj.3.r49/337
K 12
Mkinclude.in
V 20
file 2o2.0.r42/11084
K 4
NOTE
V 18
file 2mw.0.r43/928
K 10
aclocal.m4
V 18
file 2o3.0.r7/8783
K 3
bin
V 19
dir 2o7.0.r42/20012
K 11
charconv.mk
V 18
file 2oz.0.r19/230
K 10
chkfort.sh
V 18
file 2p2.0.r25/898
K 9
configure
V 19
file 2o4.0.r26/3541
K 12
configure.in
V 19
file 2o1.0.r26/3751
K 3
doc
V 19
dir 2pn.3.r59/10743
K 12
exclude-list
V 21
file 2ep.0.r2/3148674
K 10
index.html
V 19
file 2n2.0.r13/1425
K 9
packaging
V 17
dir 2po.3.r52/461
K 3
src
V 16
dir c.3.r59/9841
K 3
sys
V 18
dir 2oo.0.r29/1248
END
ENDREP
id: 1.3.r59/11671
type: dir
pred: 1.3.r58/4364
count: 54
text: 59 10921 737 737 3027332c32ff7eba588e990ff776425b
cpath: /branches/develop
copyroot: 46 /branches/develop

PLAIN
K 7
develop
V 17
dir 1.3.r59/11671
END
ENDREP
id: 2ph.0.r59/11893
type: dir
pred: 2ph.0.r58/4583
count: 13
text: 59 11841 39 39 369f6a741906d9bd28e5e2f5a91e216f
cpath: /branches
copyroot: 0 /

PLAIN
K 8
branches
V 19
dir 2ph.0.r59/11893
K 4
tags
V 14
dir 3.0.r5/248
K 5
trunk
V 16
dir 1.0.r44/6055
END
ENDREP
id: 0.0.r59/12156
type: dir
pred: 0.0.r58/4843
count: 59
text: 59 12040 103 103 9790ec3ef34c404db82ad4f8f8b0a1c0
cpath: /
copyroot: 0 /

_2.3.t58-1 add true true /branches/develop/src/f77/gt2dlib_interface.f90

2pe.3.t58-1 modify true false /branches/develop/src/f90/Makefile.win

2n9.3.t58-1 modify true false /branches/develop/src/f90/Makefile

2pl.3.t58-1 modify true false /branches/develop/src/f77/Makefile.win

_0.3.t58-1 add true true /branches/develop/doc/g2pk01.f90

_1.3.t58-1 add true true /branches/develop/doc/g2pk02.f90

2mt.3.t58-1 modify true false /branches/develop/src/f77/Makefile

_3.3.t58-1 add true true /branches/develop/src/f90/gt2dlib.f90


12156 12293