avh_olo_a0_a.h90
No OneTemporary
Actions

Size

940 B

Subscribers

None

avh_olo_a0_a.h90
View Options

	!!
	!! Copyright (C) 2011 Andreas van Hameren.
	!!
	!! This file is part of OneLOop-2.2.1.
	!!
	!! OneLOop-2.2.1 is free software: you can redistribute it and/or modify
	!! it under the terms of the GNU General Public License as published by
	!! the Free Software Foundation, either version 3 of the License, or
	!! (at your option) any later version.
	!!
	!! OneLOop-2.2.1 is distributed in the hope that it will be useful,
	!! but WITHOUT ANY WARRANTY; without even the implied warranty of
	!! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	!! GNU General Public License for more details.
	!!
	!! You should have received a copy of the GNU General Public License
	!! along with OneLOop-2.2.1. If not, see <http://www.gnu.org/licenses/>.
	!!
	complex(kindc2) :: ss
	real(kindr2) :: am,thrs,mulocal,mulocal2
	character(25+99) ,parameter :: warning=&
	'WARNING from OneLOop a0: '//warnonshell
	if (intro) call hello