LOGICAL GM_AdvSeparate
& GM_AdvForm, GM_AdvSeparate,
IF ( GM_AdvForm .AND. .NOT.GM_AdvSeparate
CALL WRITE_0D_L( GM_AdvSeparate, INDEX_NONE,
& .AND. .NOT.GM_AdvSeparate
GM_AdvSeparate = .FALSE.
ELSEIF( GM_AdvForm .AND. .NOT.GM_AdvSeparate
IF (GM_AdvForm .AND. GM_AdvSeparate