genfort.pl

A scrip that converts <murge.h> file into a Fortran include file.

Usage

./genfort.pl -f murge.h
   converts the file murge.h into a fortran header.
    -h          Shows this help
    -c <0,1>    Defines if COEF ar complexes (1) or reals (0)
    -r <size>   Defines COEF/REAL kind (4 or 8 usually)
    -s <size>   Defines INTS kind (4 or 8 usually)
    -l <size>   Defines INTL kind (4 or 8 usually)

Authors

Xavier Lacostelac.nosp@m.oste@labr.nosp@m.i.fr
Summary
genfort.plA scrip that converts <murge.h> file into a Fortran include file.
Variables
realKind of the reals/complex
intsKind of the INTS
intlKind of the INTL
complexIndicate if COEFs are complex or real
fichierPath to the <murge.h> file
formatFormat to print PARAMETERs.
optsOptions given to the script
Functions
UsagePrints usage.
printTabPrint chaine with tabcount indentations.
ConvertMain function.

Variables

real

my $real

Kind of the reals/complex

ints

my $ints

Kind of the INTS

intl

my $intl

Kind of the INTL

complex

my $complex

Indicate if COEFs are complex or real

fichier

my $fichier

Path to the <murge.h> file

format

my $format

Format to print PARAMETERs.

opts

my %opts

Options given to the script

Functions

Usage

sub Usage

Prints usage.

printTab

sub printTab # ($chaine,
$tabcount,
$comm)

Print chaine with tabcount indentations.

If comm is 0, it will also replace INTS, INTL, REAL and COEF by the Correct value.

Parameters

chaineString to print
tabcountNumber of indentations to add.
commIndicate if we are in a comments section.

Convert

sub Convert

Main function.

Converts the header <murge.h> file into a Fortran include.

my $real
Kind of the reals/complex
my $ints
Kind of the INTS
my $intl
Kind of the INTL
my $complex
Indicate if COEFs are complex or real
my $fichier
Path to the murge.h file
my $format
Format to print PARAMETERs.
my %opts
Options given to the script
sub Usage
Prints usage.
sub printTab # ($chaine,
$tabcount,
$comm)
Print chaine with tabcount indentations.
sub Convert
Main function.
Close