Lines Matching refs:intfunc

10   integer function intfunc(x)  function
12     intfunc = x
51     procedure(intfunc), pointer :: intprocptr
52     intprocptr => intfunc
58     procedure(intfunc), pointer :: ip
61     ip => intfunc
64     call s01(intfunc)
115     procedure(intfunc), pointer :: pif
131     call forwardproc(intfunc) ! ok
142     call callsub(intfunc)
158     call takesrealfunc1(intfunc)
164     call takesrealfunc1(intfunc)
172     call takesrealfunc2(intfunc)
178     call takesrealfunc2(intfunc)