!*****************************************************

  MACRO MODULE stdviews();

!*  Creates a number of graphical views suitable
!*  for display of hull geometry.
!*
!*  This program is free software; you can redistribute it and/or
!*  modify it under the terms of the GNU General Public License
!*  as published by the Free Software Foundation; either version 2
!*  of the License, or (at your option) any later version.
!*
!*  This program is distributed in the hope that it will be useful,
!*  but WITHOUT ANY WARRANTY; without even the implied warranty of
!*  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
!*  GNU General Public License for more details.
!*
!*  You should have received a copy of the GNU General Public License
!*  along with this program; if not, write to the Free Software
!*  Foundation, Inc., 59 Temple Place - Suite 330, Boston,
!*  MA  02111-1307, USA.
!*
!*  (C)Microform AB 2000-02-20, J.Kjellander
!*
!******************************************************

BEGINMODULE

  mode_basic();
  csys_1p(#1,"Profile", vec(0, 0, 0), -90, 0, 0:BLANK=1);
  cre_view("Profile", #1);
  del(#1);

  csys_1p(#2,"Plan", vec(0, 0, 0), -180, 0, 0:BLANK=1);
  cre_view("Plan", #2);
  del(#2);

  csys_1p(#3,"Bow", vec(0, 0, 0), -90, 90, 0:BLANK=1);
  cre_view("Bow", #3);
  del(#3);

  csys_1p(#4,"Stern", vec(0, 0, 0), -90, -90, 0:BLANK=1);
  cre_view("Stern", #4);
  del(#4);

  csys_1p(#5,"Upfront", vec(0, 0, 0), -120, 30, 30:BLANK=1);
  cre_view("Upfront", #5);
  del(#5);

  csys_1p(#6,"Downfront", vec(0, 0, 0), -60, 30, 30:BLANK=1);
  cre_view("Downfront", #6);
  del(#6);

ENDMODULE

!**********************************************************