val neg_simple_cond :
neg:bool ->
[ `Simple ] Cobol_ptree__.Terms.cond ->
[ Cobol_ptree__.Terms.simple_ | Cobol_ptree__.Terms.complex_ ]
Cobol_ptree__.Terms.condval neg_condition :
neg:bool ->
[ Cobol_ptree__.Terms.simple_ | Cobol_ptree__.Terms.complex_ ]
Cobol_ptree__.Terms.cond ->
[ Cobol_ptree__.Terms.simple_ | Cobol_ptree__.Terms.complex_ ]
Cobol_ptree__.Terms.condval expand_every_abbrev_cond :
'k Cobol_ptree__.Terms.cond ->
[ Cobol_ptree__.Terms.simple_ | Cobol_ptree__.Terms.complex_ ]
Cobol_ptree__.Terms.condval expand_abbrev_cond :
(bool
* Cobol_ptree__.Terms.expression
* Cobol_ptree__.Terms.abbrev_relation_operand) ->
[ Cobol_ptree__.Terms.simple_ | Cobol_ptree__.Terms.complex_ ]
Cobol_ptree__.Terms.cond