# offset_udf_2
# written by John Dannenhoffer

DIMENSION dist      1  10
DESPMTR   dist      "-.10; -.05; -.01; -.005; -.001; 0.001; 0.005; 0.01; 0.05; 0.10"

# base shape (meanline WireBody)
UDPRIM    naca      camber    0.12
STORE     base  0  1

# various offsets (both sides)
PATBEG    idist     dist.size
   RESTORE   base
   UDPRIM    offset    dist dist[idist]
PATEND

END