File : lattice-io-vrml.ads

package Lattice.IO.VRML is  -- producing VRML data from polymers

  procedure PutHeader(F: in File_Type);
  procedure PutBall(F: in File_Type; L: in IPoint; R: in Rep);
  procedure PutPoints(F: in File_Type; L: in IPointVec);
  procedure PutLine(F: in File_Type; L1,L2: in IPoint);

  procedure WriteVRML(Name: in String; B: in PolyPtr);

private

  function Box(B: Poly) return IPointVecPtr;

end Lattice.IO.VRML;