usr/src/cmd/troff/troff.d/tmac.d/float.me

   1 .\"
   2 .\" Copyright 2005 Sun Microsystems, Inc.  All rights reserved.
   3 .\" Use is subject to license terms.
   4 .\"
   5 .\" CDDL HEADER START
   6 .\"
   7 .\" The contents of this file are subject to the terms of the
   8 .\" Common Development and Distribution License, Version 1.0 only
   9 .\" (the "License").  You may not use this file except in compliance
  10 .\" with the License.
  11 .\"
  12 .\" You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
  13 .\" or http://www.opensolaris.org/os/licensing.
  14 .\" See the License for the specific language governing permissions
  15 .\" and limitations under the License.
  16 .\"
  17 .\" When distributing Covered Code, include this CDDL HEADER in each
  18 .\" file and include the License file at usr/src/OPENSOLARIS.LICENSE.
  19 .\" If applicable, add the following below this CDDL HEADER, with the
  20 .\" fields enclosed by brackets "[]" replaced with your own identifying
  21 .\" information: Portions Copyright [yyyy] [name of copyright owner]
  22 .\"
  23 .\" CDDL HEADER END
  24 .\"
  25 .\"ident        "%Z%%M% %I%     %E% SMI"
  26 .\"
  27 .\" University Copyright- Copyright (c) 1982, 1986, 1988
  28 .\" The Regents of the University of California
  29 .\" All Rights Reserved
  30 .\"
  31 .\" University Acknowledgment- Portions of this document are derived from
  32 .\" software developed by the University of California, Berkeley, and its
  33 .\" contributors.
  34 .\"
  35 .nr _0 \n(c.
  36 .\"     @(#)float.me    2.2     2/26/81
  37 .de (z
  38 .@D 4 \\$1 \\$2
  39 .@(
  40 .nr ?T 0
  41 ..
  42 .de )z
  43 .sp \\n(zsu
  44 .@)
  45 .rr _0
  46 .if !\\n(?b \
  47 .       nr dn +(\\n(ppu*\\n($ru)/2u+\\n(zsu
  48 .nr dl -\n(.H
  49 .ie ((\\n(dn+\n(.V)>=\\n(.t):(\\n(?a):((\\n(dl>\\n($l)&(\\n($c>1)) \
  50 \{\
  51 .       nr ?a 1
  52 .       if (\\n(dl>\\n($l)&(\\n($m>1) \
  53 .               nr ?w 1
  54 .       ds |x |t
  55 .\}
  56 .el \
  57 \{\
  58 .       nr ?b 1
  59 .       if (\\n(dl>\\n($l)&(\\n($m>1) \
  60 .               nr ?W 1
  61 .       nr _b +\\n(dnu
  62 .       ch @f -\\n(_bu
  63 .       ds |x |b
  64 .\}
  65 .da \\*(|x
  66 .nf
  67 .ls 1
  68 .nr ?k 1
  69 \!.if \\\\n(nl>(\\\\n(tm+2v) .ne \\n(dnu-\\n(zsu
  70 .|k\"
  71 .ec
  72 .nr ?k 0
  73 .rm |k\"
  74 .da
  75 .in 0
  76 .ls 1
  77 .xl \\n($lu
  78 .ev
  79 ..
  80 .de @k
  81 .ev 1
  82 .nf
  83 .ls 1
  84 .in 0
  85 .sp \\n(zsu
  86 .\\$1
  87 .ec
  88 .br
  89 .rm \\$1
  90 .ev
  91 .nr ?T 0
  92 ..
  93 .nr c. \n(_0