
c===============================================================================
c                          MAP_DEF_4.INC
c===============================================================================

c in diesem File sind die Dimensionen des Potentialmappen-Speichers fuer Mappe 4
c des Programms 'ACCEL' niedergelegt:

c Position der Folie relativ zur Kryoachse:

	real    xFoil
	common /xFoil/ xFoil


c the grid characteristics:

	real	Dx_,Dy_,Dz_
c	integer imax_,jmax_,kmax_

	parameter ( Dx_  = .050, Dy_  = .050, Dz_  = .500)
c	parameter ( imax_=   80, jmax_=  440, kmax_=   44)

	real	xmin,xmax
	integer imax,jmax,kmax
	common /map_4/ xmin,xmax, imax,jmax,kmax


c der Beginn des Uebergabebereichs zur naechsten Mappe:

	real xStartUeberUpp,xStartUeberLow
	common /map_4/ xStartUeberUpp,xStartUeberLow


c die naeherungsweise Obergrenze fuer die einzelnen Schrittlaengen:

	real dl_max
	parameter (dl_max = .1)


c the map:

	INCLUDE 'accel$sourcedirectory:MAPMAP.INC'

