1 2 3 4 5 6 7 8 9 10 11
LOGICAL FUNCTION DELCTG( PAR1, PAR2, PAR3 ) C C PURPOSE C C Void logical function for DGGES. C DOUBLE PRECISION PAR1, PAR2, PAR3 C DELCTG = .TRUE. RETURN END