CADJ SUBROUTINE FSC4DAT input  = 1, 2
CADJ SUBROUTINE FSC4DAT output = 2
CADJ SUBROUTINE FSC4DAT depend = 1
CADJ SUBROUTINE FSC4DAT active = 2
CADJ SUBROUTINE FSC4DAT adname = ADFSC4DAT

CADJ SUBROUTINE FFTRB input  = 1, 2
CADJ SUBROUTINE FFTRB output = 3

cphCADJ SUBROUTINE FRSBASE input  = 1,  3, 4
cphCADJ SUBROUTINE FRSBASE output =   2

CADJ SUBROUTINE HELMHOLTZ input  = 1, 2
CADJ SUBROUTINE HELMHOLTZ output =      3

CADJ SUBROUTINE SHCERROR input = 1, 2
CADJ SUBROUTINE SHCERROR output =