libsim Versione 7.2.4
|
◆ stdin_unit
standard input Definizione alla linea 229 del file io_units.F90. 229! Copyright (C) 2010 ARPA-SIM <urpsim@smr.arpa.emr.it>
230! authors:
231! Davide Cesari <dcesari@arpa.emr.it>
232! Paolo Patruno <ppatruno@arpa.emr.it>
233
234! This program is free software; you can redistribute it and/or
235! modify it under the terms of the GNU General Public License as
236! published by the Free Software Foundation; either version 2 of
237! the License, or (at your option) any later version.
238
239! This program is distributed in the hope that it will be useful,
240! but WITHOUT ANY WARRANTY; without even the implied warranty of
241! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
242! GNU General Public License for more details.
243
244! You should have received a copy of the GNU General Public License
245! along with this program. If not, see <http://www.gnu.org/licenses/>.
246#include "config.h"
247
266IMPLICIT NONE
267
268! These should be set by autoconf and included
269INTEGER, PARAMETER :: stdin_unit = 5
270INTEGER, PARAMETER :: stdout_unit = 6
271INTEGER, PARAMETER :: stderr_unit = 0
272
|