1chAe_chair.chem: 2.br 3.cstart 4 5# Example file for 'chem': 6 7# This originates from Computing Science Technical Report No. 122 8# CHEM - A Program for Typesetting Chemical Diagrams: User Manual 9# by Jon L. Bentley, Lynn W. Jelinski, Brian W. Kernighan 10# <http://cm.bell-labs.com/cm/cs/cstr/122.ps.gz>. 11 12# Copyright (C) 2006-2018 Free Software Foundation, Inc. 13 14# This file is part of 'chem', which is part of 'groff'. 15 16# 'groff' is free software; you can redistribute it and/or modify it 17# under the terms of the GNU General Public License (GPL) version 2 as 18# published by the Free Software Foundation. 19 20# 'groff' is distributed in the hope that it will be useful, but 21# WITHOUT ANY WARRANTY; without even the implied warranty of 22# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 23# General Public License for more details. 24 25# You should have received a copy of the GNU General Public License 26# along with this program. If not, see <http://www.gnu.org/licenses/>. 27 28# The GPL2 license text is available in the internet at 29# <http://www.gnu.org/licenses/gpl-2.0.html>. 30 31######################################################################## 32 33pic define chair { [ 34 V1: bond 120 length .25 35 V2: bond right length .35 36 V3: bond 150 length .35 37 V4: bond -60 length .25 38 V5: bond left length .35 39 V6: bond to V1.start 40pic ] } 41R1: chair 42R2: chair with .V1 at R1.V4.start 43bond 60 from R2.V4.start ; CH3 44bond down from R2.V4.start ; OH 45 46######################################################################## 47### Emacs settings 48# Local Variables: 49# mode: Nroff 50# End: 51.cend 52