Searched refs:modulefunc1 (Results 1 – 1 of 1) sorted by relevance
23 pure integer function modulefunc1(n) function25 modulefunc1 = n46 type(t(modulefunc1(0))) :: x102 ! ok