source/patchdata/operators/constant/fortran/pdat_concoarsen2d.f File Reference

Functions
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero	parameter (zero=0.d0) c integer &ifirstc0
Variables
c c	File
c c LLC c	Revision
c c LLC c Jan c	Description
c c LLC c Jan c LLC c	Revision
c c LLC c Jan c LLC c Jan c	Description
c c LLC c Jan c LLC c Jan c LLC c	Revision
c c LLC c Jan c LLC c Jan c LLC c Jan c	Description
c c LLC c Jan c LLC c Jan c LLC c Jan c	ifirstc1
c c LLC c Jan c LLC c Jan c LLC c Jan c	ilastc0
c c LLC c Jan c LLC c Jan c LLC c Jan c	ilastc1
c c LLC c Jan c LLC c Jan c LLC c Jan c &	filo0
c c LLC c Jan c LLC c Jan c LLC c Jan c	filo1
c c LLC c Jan c LLC c Jan c LLC c Jan c	fihi0
c c LLC c Jan c LLC c Jan c LLC c Jan c	fihi1
c c LLC c Jan c LLC c Jan c LLC c Jan c &	cilo0
c c LLC c Jan c LLC c Jan c LLC c Jan c	cilo1
c c LLC c Jan c LLC c Jan c LLC c Jan c	cihi0
c c LLC c Jan c LLC c Jan c LLC c Jan c	cihi1
c c LLC c Jan c LLC c Jan c LLC c Jan c &	ratio
c c LLC c Jan c LLC c Jan c LLC c Jan c &	arrayf
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero	ifirstc1
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero	ilastc0
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero	ilastc1
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero &	cilo0
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero	cilo1
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero	cihi0
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero	cihi1
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero &	filo0
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero	filo1
c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c ***********************************************************************implicit none double precision zero	fihi0

---

Function Documentation

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero parameter

(

zero

= 0.d0

)

---

Variable Documentation

c c File

c c LLC c Revision

c c LLC c Jan c Description

c c LLC c Jan c LLC c Revision

c c LLC c Jan c LLC c Jan c Description

c c LLC c Jan c LLC c Jan c LLC c Revision

c c LLC c Jan c LLC c Jan c LLC c Jan c Description

c c LLC c Jan c LLC c Jan c LLC c Jan c ifirstc1

c c LLC c Jan c LLC c Jan c LLC c Jan c ilastc0

c c LLC c Jan c LLC c Jan c LLC c Jan c ilastc1

c c LLC c Jan c LLC c Jan c LLC c Jan c & filo0

c c LLC c Jan c LLC c Jan c LLC c Jan c filo1

c c LLC c Jan c LLC c Jan c LLC c Jan c fihi0

c c LLC c Jan c LLC c Jan c LLC c Jan c fihi1

c c LLC c Jan c LLC c Jan c LLC c Jan c & cilo0

c c LLC c Jan c LLC c Jan c LLC c Jan c cilo1

c c LLC c Jan c LLC c Jan c LLC c Jan c cihi0

c c LLC c Jan c LLC c Jan c LLC c Jan c cihi1

c c LLC c Jan c LLC c Jan c LLC c Jan c & ratio

c c LLC c Jan c LLC c Jan c LLC c Jan c & arrayf

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero ifirstc1

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero ilastc0

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero ilastc1

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero & cilo0

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero cilo1

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero cihi0

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero cihi1

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero & filo0

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero filo1

c c LLC c Jan c LLC c Jan c LLC c Jan c arrayc c*********************************************************************** implicit none double precision zero fihi0

---