X-Git-Url: https://www.ginac.de/ginac.git//ginac.git?p=ginac.git;a=blobdiff_plain;f=ginac%2Fexprseq_suppl.cpp;h=a1ddbac371186651354aa65acce955dff8283d83;hp=22b35ec0daa456ac1218fcee253daabb5b42e62c;hb=b8b8cfbb72bfa59b01371f67f542914cf55f2ab9;hpb=6b3768e8c544739ae53321539cb4d1e3112ded1b diff --git a/ginac/exprseq_suppl.cpp b/ginac/exprseq_suppl.cpp index 22b35ec0..a1ddbac3 100644 --- a/ginac/exprseq_suppl.cpp +++ b/ginac/exprseq_suppl.cpp @@ -1,21 +1,44 @@ /** @file exprseq_suppl.cpp * - * Supplement to exprseq.cpp, contains the parts which were - * not automatically generated. */ + * Supplement to exprseq.cpp, contains the parts which were not automatically + * generated. */ -#include "ginac.h" +/* + * GiNaC Copyright (C) 1999-2002 Johannes Gutenberg University Mainz, Germany + * + * This program 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 2 of the License, or + * (at your option) any later version. + * + * This program 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 this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#include "exprseq.h" +#include "ex.h" + +namespace GiNaC { bool exprseq::info(unsigned inf) const { - if (inf==info_flags::exprseq) return 1; - return basic::info(inf); + if (inf==info_flags::exprseq) + return 1; + return basic::info(inf); } -ex & exprseq::let_op(int const i) +ex & exprseq::let_op(int i) { - ASSERT(i>=0); - ASSERT(i=0); + GINAC_ASSERT(i