! @ p_3view_map.ima NAME
!   Display the IMAGE-like variable NAME in all 3 main planes
! 
! Called by IMAGER command INSPECT_3D
if (.not.exist(&1)) then
  Message E INSPECT "No such variable &1"
  let mapping_error yes
  return 
endif
!
let header_name_type "(&1)" /Upper
symbol HAS_CHANGED NO
!
!
@ p_scale       &1    ! Scaling
@ p_level       &1    ! Contour levels
@ p_3view_sub   &1    ! Effective drawing
!
symbol drawn &1%
