contrib/groff/contrib/chem/examples/122/ch4p_cholestanol.chem

   1 ch4p_cholestanol.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, 2009 Free Software Foundation, Inc.
  13
  14 # Last update: 5 Jan 2009
  15
  16 # This file is part of `chem', which is part of `groff'.
  17
  18 # `groff' is free software; you can redistribute it and/or modify it
  19 # under the terms of the GNU General Public License as published by
  20 # the Free Software Foundation, either version 3 of the License, or
  21 # (at your option) any later version.
  22
  23 # `groff' is distributed in the hope that it will be useful, but
  24 # WITHOUT ANY WARRANTY; without even the implied warranty of
  25 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  26 # General Public License for more details.
  27
  28 # You should have received a copy of the GNU General Public License
  29 # along with this program. If not, see <http://www.gnu.org/licenses/>.
  30
  31 ########################################################################
  32
  33 R1: ring6
  34     "R1" at R1     # this puts a label at R1
  35     front bond -120 from R1.V5 ; HO
  36          # the following line says "fuse the next six-
  37          # membered ring with its 6th vertex joining
  38          # the second vertex of R1"
  39 R2: ring6 with .V6 at R1.V2
  40     front bond up from R2.V6 ; CH3
  41     back bond down from R2.V4 ; H
  42     back bond down from R2.V1 ; H
  43     front bond up from R2.V2 ; H
  44 R3: ring6 with .V4 at R2.V2
  45 R4: flatring with .V5 at R3.V2
  46     front bond up from R4.V5 ; CH3
  47     back bond down from R4.V4 ; H # this is the alkyl chain
  48     bond up from R4.V1 ; BP
  49     bond -60 from BP
  50     bond 60 from BP
  51     bond 120
  52     bond 60
  53     bond 120 ; BP
  54     bond down from BP
  55     bond 60 from BP
  56
  57 ########################################################################
  58 ### Emacs settings
  59 # Local Variables:
  60 # mode: Nroff
  61 # End:
  62 .cend