anchor.diff:        ?LOG("PatternProperties are: ~p~n",[PatternProperties]),
   
         MinOpts = MinProperties - length(ReqProps),
  -      MaxOpts = MaxProperties - length(ReqProps),
  +      %MaxOpts = MaxProperties - length(ReqProps), %NOT NEEDED ANYMORE ('N_max' USED NOW)
               
  -      case {PatternProperties,AddP} of
  -        {undefined,undefined} ->
  -          ?LET(N, randIntPositive(MinOpts,length(OptProps)),
  -               ?LET(OptPropsGen, choose_n_properties(OptProps,N),
  +          case {PatternProperties,AddP} of
  +              {undefined,undefined} ->
  +                  ?LET(N, randIntPositive(MinOpts,length(OptProps)),
  +                   ?LET(OptPropsGen, choose_n_properties(OptProps,N),
                       begin
  -                      RawProperties = 
  +                        RawProperties = 
                           [{P,json(S,Options)} ||
                             {P,S} <- ReqProps
                               ++ 
  
positive.code:      {struct,[{<<"type">>,<<"null">>}]}.
  
  
  %%%%%%%%% VVVV TO REMOVE VVVVV %%%%%%%%%%
  
     
  %% any_schema() ->
  
negative.code:             eqc_gen:choose(Min,Max)
      end.
  
  randIntPositive(Min,Max) when (Min > 0) and (Max > 0) ->
         case {Min,Max} of 
              
          {undefined,undefined} -> 
  