include file: repoint.inc 1

qr=>qrA(:,ipnt)
qv=>qvA(:,ipnt)
rc=>rcA(:,ipnt)
ccn=>ccnA(:,ipnt)
th=>thA(:,ipnt)
u=>uA(:,ipnt)
v=>vA(:,ipnt)
ug=>ugA(:,ipnt)
nc=>ncA(:,ipnt)
vg=>vgA(:,ipnt)
smoke=>smokeA(:,ipnt)
nr=>nrA(:,ipnt)
tke=>tkeA(:,ipnt)
qc=>qcA(:,ipnt)


qrN=>qrA(:,jpnt)
qvN=>qvA(:,jpnt)
rcN=>rcA(:,jpnt)
ccnN=>ccnA(:,jpnt)
thN=>thA(:,jpnt)
uN=>uA(:,jpnt)
vN=>vA(:,jpnt)
ugN=>ugA(:,jpnt)
ncN=>ncA(:,jpnt)
vgN=>vgA(:,jpnt)
smokeN=>smokeA(:,jpnt)
nrN=>nrA(:,jpnt)
tkeN=>tkeA(:,jpnt)
qcN=>qcA(:,jpnt)