Can I pass an array of arbitrary rank to a subroutine in Fortran? -


i'm writing general output numerical model i've written. produce arrays either 1,2,3 or 4 dimensions on unknown length. i'm running issues in how define array in subroutine (found in different module). 

gfortran -g -o0 -i/usr/include -c analysis.f90 analysis.f90:136:32:  call write_netcdf('domain', domain, 'binary_cloud_domain', 0)                             1 error: rank mismatch in argument ‘data_out’ @ (1) (scalar , rank-4)

the error comes subroutine:

  subroutine binary_cloud_analysis  use cloud, only: cloud_domain, cloud_smooth_domain use write, only: write_netcdf  real, allocatable, dimension(:,:,:,:) :: domain, smth_domain  allocate(domain(x_dim,y_dim,z_dim,t_dim), smth_domain(x_dim,y_dim,z_dim,t_dim))  call cloud_domain(domain)  if (cloud_smooth)   call cloud_smooth_domain(domain,smth_domain)   domain = smth_domain endif  call write_netcdf('domain', domain, 'binary_cloud_domain', 0)  end subroutine binary_cloud_analysis

at moment in subroutine write_netcdf i've assigned data_out 

  subroutine write_netcdf(var_name, data_out, output_name, output_type)  !--------------------------------------------------------------------------! ! input variables                                                          ! !--------------------------------------------------------------------------!  real(kreal), allocatable, intent (in) :: data_out

understandably compiler taking scalar haven't included dimensions(:) type specifier because don't know type of array i'm passing in generality , i'd hoped might able massage dimensions due variable being allocatable. output_type variable specifies type of array have i.e. 3d, 4d etc define netcdf file.

i think able reshaping array 1d array , reshaping based on defining number of dimensions , passing lengths ideally wouldn't have these additional steps. there way define allocatable array in sufficient generality these purposes?


Comments

Post a Comment

Popular posts from this blog

PHP and MySQL WP -

i trying accomplish 2 things here code. writing php directly wp page using insert php plugin. 1) query mysql database , return results 1 column 4 columns. 2) make each result own hyperlink directs user new wp page runs new query on page. i able query show results , turn results dynamic hyperlink, cannot formatting down. right returns result 1 column. here have: [insert_php] $servername = "localhost"; $username = "login"; //edited privacy $password = "password"; //edited privacy $database = "database"; //edited privacy // create connection $conn = new mysqli($servername, $username, $password, $database); // check connection if ($conn->connect_error) { die("connection failed: " . $conn->connect_error); } echo "connected successfully"; //get results database $result = mysqli_query($conn,"select mine mines order mine"); $all_property = array(); //declare array saving property //showing proper...
Read more

android - InAppBilling registering BroadcastReceiver in AndroidManifest -

i'm implementing inapp billing in android app. works well, however, i'm trying decouple broadcast receiver activity manifest. suggestion in android's trivialdrive sample: // important: dynamically register broadcast messages updated purchases. // register receiver here instead of <receiver> in manifest // because call getpurchases() @ startup, therefore can ignore // broadcasts sent while app isn't running. // note: registering listener in activity bad idea, done here // because sample. regardless, receiver must registered after // iabhelper setup, before first call getpurchases(). currently there's class extends broadcastreceiver : public class iabbroadcastreceiver extends broadcastreceiver { /** * intent action receiver should filter for. */ public static final string action = "com.android.vending.billing.purchases_updated"; private final iabbroadcastlistener mlistener; public iabbroadcastreceiver(iabbroadcastlistener listener) { m...
Read more

go - golang pprof for c library code -

i have been trying profile golang application pprof, seems details of c code(linked static library) missed in output result. flame graph from frame graph can see c code time consuming reported within "runtime._externalcode", no details @ all. , sure static library compiled debug enable. so there way make pprof details(like stack trace) of 3rd party c code? or there other golang profiling tool this?
Read more