FODO example - hard-edge fields         ! title
 $cont  npart=100 nprnt=1 prlevel=1 $   ! control variables, print out
 $bmt $
1 2 1. 1                                ! gaussian beam
0.     0.     0.    0.      0.     0.451
0.010  0.010  0.    0.010   0.010  0.00
0
 $ints $                                ! defaults only

 $nhs $
 $nsc $
 $nzh $
 $nrh nrhist=4 $                        ! R-histories
2 1 0. 0. 1
2 1 0. 0. 2
2 1 0. 0. 4
2 1 0. 0. 5
 $nem  $
 $ncv ncovar=1 $                        ! correlations
 51

SECTION

REPEAT                                  ! looping construct
10

SREGION         ! 1/2 QD
0.10   1   1e-3
1 0     1.00
QUAD
1  -5.  0  0  0    0  0  0  0  0    0  0  0  0  0 
VAC
NONE
0  0  0  0  0    0  0  0  0  0

SREGION         ! drift
0.80   1   1e-3
1 0     1.00
NONE
0  0  0  0  0    0  0  0  0  0    0  0  0  0  0 
VAC
NONE
0  0  0  0  0    0  0  0  0  0

SREGION         ! QF
0.20   1   1e-3
1 0     1.00
QUAD
1  5.  0  0  0    0  0  0  0  0    0  0  0  0  0 
VAC
NONE
0  0  0  0  0    0  0  0  0  0

SREGION         ! drift
0.80   1   1e-3
1 0     1.00
NONE
0  0  0  0  0    0  0  0  0  0    0  0  0  0  0 
VAC
NONE
0  0  0  0  0    0  0  0  0  0

SREGION         !  1/2 QD
0.10   1   1e-3
1 0     1.00
QUAD
1  -5.  0  0  0    0  0  0  0  0    0  0  0  0  0 
VAC
NONE
0  0  0  0  0    0  0  0  0  0

ENDREPEAT

ENDSECTION