Commit 0a68bbf1 authored by Juergen Reuter's avatar Juergen Reuter
Browse files

e52bb6c Merge branch '423-retire-old-rcsid-based-version-tags' into 'master'

parent 7bb43fc0
% circemacs.mp4
% $Id: circemacs.mp4,v 1.11 1996/10/22 22:11:34 ohl Exp $
% circemacs.mp4 --
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% MetaPost's `input' doesn't blend well with verbatimtex.
% Let's use m4(1) instead.
......
% dist-v0-r0.mp4 --
% $Id: dist.mp4,v 1.2 1996/08/08 10:37:58 ohl Exp $
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
include(`circemacs.mp4')
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
......
% fit.mp
% $Id: fit.mp4,v 1.2 1996/07/26 10:52:25 ohl Exp $
% fit.mp --
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
include(`circemacs.mp4')
include(`output/Slices.mp4')
......
% graphx.mp --
% Copyright (C) 1995-2011 by ohl@physik.uni-wuerzburg.de
% $Id: graphx.nw,v 1.13 1995/08/29 22:16:59 ohl Exp $
%
% Graphx is free software; you can redistribute it and/or modify it
% under the terms of the GNU General Public License as published by
......
#! /usr/bin/awk -f
# $Id: tex-comments.sh 314 2010-04-17 20:32:33Z ohl $
# tex-comments.sh --
/^@begin docs / { code = 0 }
/^@begin code / { code = 1 }
......
! $Id:$
! gg.f90 --
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
module kinds
......@@ -52,8 +52,6 @@ module histograms
real(kind=double), dimension(2) :: x_min, x_max
real(kind=double), dimension(:,:), pointer :: bins, bins2
end type histogram2
character(len=*), public, parameter :: HISTOGRAMS_RCS_ID = &
"$Id: triangle90.f90,v 1.8 1998/09/09 11:10:14 ohl Exp $"
contains
elemental subroutine create_histogram1 (h, x_min, x_max, nb)
type(histogram), intent(out) :: h
......
......@@ -2,7 +2,6 @@
\section{Implementation of [[circe1]]}
<<[[circe1.f90]]>>=
! circe1.f90 -- canonical beam spectra for linear collider physics
! $Id: circe1.nw 7444 2016-02-17 15:37:20Z jr_reuter $
<<Copyleft notice>>
<<Main module>>
@
......@@ -40,7 +39,6 @@ The file \texttt{circe.h} contains symbolic names for various magic
constants used by \Kirke/:
<<[[circe.h]]>>=
c circe.h -- canonical beam spectra for linear collider physics
c $Id: circe1.nw 7444 2016-02-17 15:37:20Z jr_reuter $
<<Main module>>=
module circe1
use kinds
......@@ -159,8 +157,6 @@ all negative variables to ensure initialization:
circe1_params%chat = 1
if (xchat .ne. 0) then
call circem ('MESSAGE', 'starting up ...')
call circem ('MESSAGE', &
'$Id: circe1.nw 7444 2016-02-17 15:37:20Z jr_reuter $')
endif
@
<<Update circe1 parameters>>=
......
% $Id: prelude.nw 6466 2015-01-10 16:06:40Z jr_reuter $
% prelude.nw --
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\iffalse %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
......@@ -775,7 +775,6 @@ write (*, 1000) 'delta(sigma) (Gauss) =', (s-1d0)*100d0
over energies and accelerator designs
<<[[circe1_sample.f90]]>>=
! circe1_sample.f90 -- canonical beam spectra for linear collider physics
! $Id: prelude.nw 6466 2015-01-10 16:06:40Z jr_reuter $
<<Copyleft notice>>
module sample_routines
use kinds
......@@ -822,7 +821,6 @@ end module sample_routines
@ with the following result
<<Sample output>>=
circe1:message: starting up ...
circe1:message: $Id: prelude.nw 6466 2015-01-10 16:06:40Z jr_reuter $
circe1:message: updating `roots' to 90.0
circe1:message: updating `ver' to 7
circe1:message: updating `rev' to 20000501
......
% taorng.nw --
% $Id: taorng.nw 6466 2015-01-10 16:06:40Z jr_reuter $
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\NeedsTeXFormat{LaTeX2e}
\documentclass[a4paper]{article}
......
# Makefile.am --
# $Id: Makefile.am 314 2010-04-17 20:32:33Z ohl $
########################################################################
DATAFILES = \
......
#! /usr/bin/awk -f
# $Id: tex-comments.sh 314 2010-04-17 20:32:33Z ohl $
# tex-comments.sh --
/^@begin docs / { code = 0 }
/^@begin code / { code = 1 }
......
......@@ -126,8 +126,6 @@ module tao_random_numbers
integer(kind=tao_i32), dimension(:), allocatable :: buffer
integer :: buffer_end, last
end type tao_random_state
character(len=*), public, parameter :: TAO_RANDOM_NUMBERS_RCS_ID = &
"$Id: tao_random_numbers.nw 314 2010-04-17 20:32:33Z ohl $"
contains
subroutine seed_static (seed)
integer, optional, intent(in) :: seed
......@@ -690,7 +688,6 @@ contains
integer, dimension(:), allocatable :: ibuf
real(kind=tao_r64), dimension(:), allocatable :: dbuf
integer :: i, ibuf_size, dbuf_size
print *, TAO_RANDOM_NUMBERS_RCS_ID
print *, "testing the 30-bit tao_random_numbers ..."
! call tao_random_luxury ()
call tao_random_seed (SEED)
......
......@@ -144,8 +144,6 @@ module tao_random_numbers
integer(kind=int32), dimension(:), pointer :: buffer =>null()
integer :: buffer_end, last
end type tao_random_state
character(len=*), public, parameter :: TAO_RANDOM_NUMBERS_RCS_ID = &
"tao_random_numbers.f90 --"
contains
subroutine seed_static (seed)
integer, optional, intent(in) :: seed
......@@ -800,7 +798,6 @@ contains
integer, dimension(:), allocatable :: ibuf
real(kind=double), dimension(:), allocatable :: dbuf
integer :: i, ibuf_size, dbuf_size
print *, TAO_RANDOM_NUMBERS_RCS_ID
print *, "testing the 30-bit tao_random_numbers ..."
call tao_random_luxury ()
call tao_random_seed (SEED)
......
% $Id: preview.tex 314 2010-04-17 20:32:33Z ohl $
% preview.tex --
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\iffalse %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
......
% $Id: preview2.tex 314 2010-04-17 20:32:33Z ohl $
% preview2.tex --
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\iffalse %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
......
#! /usr/bin/awk -f
# $Id: tex-comments.sh 314 2010-04-17 20:32:33Z ohl $
# tex-comments.sh --
/^@begin docs / { code = 0 }
/^@begin code / { code = 1 }
......
! $Id: illustrations.F 314 2010-04-17 20:32:33Z ohl $
! illustrations.F --
module foo
use kinds
......
% -*- ess-noweb-default-code-mode: f90-mode; noweb-default-code-mode: f90-mode; -*-
% VAMP application code as NOWEB source
@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\RCSId$Id: application.nw 314 2010-04-17 20:32:33Z ohl $
@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\chapter{Application}
@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\section{Cross section}
......
% -*- ess-noweb-default-code-mode: f90-mode; noweb-default-code-mode: f90-mode; -*-
% VAMP constants code as NOWEB source
@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\RCSId$Id: constants.nw 314 2010-04-17 20:32:33Z ohl $
@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\section{Mathematical and Physical Constants}
<<[[constants.f90]]>>=
......@@ -13,8 +11,6 @@ module constants
private
real(kind=default), public, parameter :: &
PI = 3.1415926535897932384626433832795028841972_default
character(len=*), public, parameter :: CONSTANTS_RCS_ID = &
"$Id: constants.nw 314 2010-04-17 20:32:33Z ohl $"
end module constants
@ %def constants PI
......
% -*- ess-noweb-default-code-mode: f90-mode; noweb-default-code-mode: f90-mode; -*-
% VAMP coordinates code as NOWEB source
@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\RCSId$Id: coordinates.nw 314 2010-04-17 20:32:33Z ohl $
@ %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\chapter{Coordinates}
\label{sec:coordinates}
<<[[coordinates.f90]]>>=
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment