[petsc-users] using SNES_VI_INF in variable initialization

Dharmendar Reddy dharmareddy84 at gmail.com
Fri Jan 17 15:17:46 CST 2014


Hello,
        I am not sure if this is a petsc related issue. I am trying to
use SNES_VI_{INF,NINF} to initialize a variable as shown below in the
code. The code does not compile...How do i fix it ? Looks like
SNES_VI_INF is not available via petscdef.h

module test_m
  implicit none
#include "finclude/petscdef.h"
  type Var_t
    real :: lb = SNES_VI_NINF
    real :: ub = SNES_VI_INF
  end type Var_t
end module test_m

program test
  implicit none
#include "finclude/petsc.h"
  PetscErrorCode ierr
  type(Var_t) :: Var
  call PetscInitialize(PETSC_NULL_CHARACTER, ierr)
   print*, 'lb=',Var%lb
   print*, 'ub=',Var%ub
  call PetscFinalize(ierr)
end program test


More information about the petsc-users mailing list