runSampleCloudProgram =
  foldFree interpRestIO $ foldFree cloudFtoRestM sampleCloudFilesProgram
runSampleCloudProgram =
  foldFree interpRestIO $ foldFree cloudFtoRestM sampleCloudFilesProgram
runSampleCloudProgram =
  foldFree interpRestIO $ foldFree cloudFtoRestM sampleCloudFilesProgram