!##############################################################
MODULE prec
implicit none
integer, parameter :: pReal = 8
integer, parameter :: pInt = 4
END MODULE prec