
### ΦϤɤ٤ˤĤ

umpack ˿ IPATLAND, IPATLAKE, LFILLAKE ȤѿƳ.

IPATLAND ѿ, аʳΦɤ٤ݤѤѥ
Ǥ. 2Ͽ, 3ɤ٤ѥɽ.

IPATLAKE ϸѤǤ. ͤϤ줾 1999, 9999 Ǥ.

LFILLAKE ѿ, .true. λˤ IPATLAKE Ǽ뿧ڤ
ѥǸФɤ٤Ԥ, .false. λˤطʿ(ͤǤ)Ǥ
ɤ٤Ԥ. ͤ .false. Ǥ.

Ȥϴñ, ޤ

	call umpmap('coast_world')

ȤƤĽˤ

	call umfmap('coast_world')
	call umpmap('coast_world')

ȤΤߤǤ. ɤ٤Υѥѹˤ

	call umiset('IPATLAND', 2999)     ! ֤Τ٤ɤ

ȤФ褤. 

ǥץ(顼ޥåפμ괹Ʊ˼¹ԤƤ)

	demo/grph2/umpack/test09.f

ˤޤ. 

