c      for VRML frame test program
       parameter (x0=0, y0=0, z0=0)
       parameter (xm=-12, ym=-15, zm=0)
       parameter (xp=48, yp=15, zp=15)
c
       call fram31(x0,y0,z0,xm,ym,zm,xp,yp,zp,0)
       stop
       end