; interactive for choosing the view point in 3D
;
; builds a form to enter parameters for 3D display and plotting.
;
; see also : disp? disp3d? zoom3di DISP3D PLOT3D

formbox "Disp3d" \
  "dim 3 axis3d $ax level $lv loga $lg sign (head($sg)) cx $ccx cy $ccy cz $ccz" \
  "select parameters for disp3d mode" message \
  "Axis for level plotting" enum "F1,F2,F3,F12,F13,F23,F123" ax F123 \
  "Number of level to plot" integer lv $level \
  "level spacing (loga):" real lg $loga \
  "Display positive, negative, both :" enum "0 (both),1 (positive),-1 (negative)" sg $sign \
  'size of box in X' real ccx $cx \
  'size of box in Y' real ccy $cy \
  'size of box in Z' real ccz $cz \
  'Choose a 3D zoom window' action zoom3di \
  *
