Problem with reading the namelists in case of grb1 input, but ncdf output – in #10: INT2LM

in #10: INT2LM

<p> May be the IF clause below can fix this. If so, it should be introduced in the next INT2LM version. </p> <p> <pre> #ifdef NETCDF IF (<acronym title="ylmext_form_read"><span class="caps">TRIM</span></acronym> == ‘ncdf’) THEN ! to prevent an often error from users read dimension lengths from data file ierrstat = nc_get_dimlen(<acronym title="ylmext_cat"><span class="caps">TRIM</span></acronym>//’/’//<acronym title="ylmext_lfn"><span class="caps">TRIM</span></acronym>, ‘rlon’, ie_ext, yerrmsg) ierrstat = nc_get_dimlen(<acronym title="ylmext_cat"><span class="caps">TRIM</span></acronym>//’/’//<acronym title="ylmext_lfn"><span class="caps">TRIM</span></acronym>, ‘rlat’, je_ext, yerrmsg) ENDIF #endif</pre> </p> <p> </p>

  @burkhardtrockel in #2add0b4

<p> May be the IF clause below can fix this. If so, it should be introduced in the next INT2LM version. </p> <p> <pre> #ifdef NETCDF IF (<acronym title="ylmext_form_read"><span class="caps">TRIM</span></acronym> == ‘ncdf’) THEN ! to prevent an often error from users read dimension lengths from data file ierrstat = nc_get_dimlen(<acronym title="ylmext_cat"><span class="caps">TRIM</span></acronym>//’/’//<acronym title="ylmext_lfn"><span class="caps">TRIM</span></acronym>, ‘rlon’, ie_ext, yerrmsg) ierrstat = nc_get_dimlen(<acronym title="ylmext_cat"><span class="caps">TRIM</span></acronym>//’/’//<acronym title="ylmext_lfn"><span class="caps">TRIM</span></acronym>, ‘rlat’, je_ext, yerrmsg) ENDIF #endif</pre> </p> <p> </p>
BR replied

May be the IF clause below can fix this. If so, it should be introduced in the next INT2LM version. 

#ifdef NETCDF
  IF (TRIM == ‘ncdf’)  THEN
   ! to prevent an often error from users read dimension lengths from data file
   ierrstat = nc_get_dimlen(TRIM//’/’//TRIM, ‘rlon’, ie_ext, yerrmsg)
   ierrstat = nc_get_dimlen(TRIM//’/’//TRIM, ‘rlat’, je_ext, yerrmsg)
  ENDIF
#endif

View in channel